1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Simples.S6321
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > 6321 Measurement significance, coded
17 -- > Desc: Code specifying the significance of a measurement value.
22 -- > Self explanatory.
24 -- > Self explanatory.
25 -- > 5 Greater than or equal to
26 -- > Self explanatory.
28 -- > Self explanatory.
30 -- > Self explanatory.
31 -- > 8 Less than or equal to
32 -- > Self explanatory.
34 -- > Self explanatory.
36 -- > Description to be provided.
38 -- > Description to be provided.
39 -- > 13 Observed value
40 -- > Description to be provided.
42 -- > Self explanatory.
43 simple6321 :: Parser Value
44 simple6321 = simple "6321" (alphaNumeric `upTo` 3)