1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Composites.C506
17 import Text.Edifact.D01B.Simples (simple1060, simple1153, simple1154,
18 simple1156, simple4000)
20 import Text.Edifact.Parsing
21 import Text.Edifact.Types (Value)
23 -- | Derived from this specification:
27 -- > Desc: Identification of a reference.
29 -- > 010 1153 Reference code qualifier M an..3
30 -- > 020 1154 Reference identifier C an..70
31 -- > 030 1156 Document line identifier C an..6
32 -- > 040 4000 Reference version identifier C an..35
33 -- > 050 1060 Revision identifier C an..6
35 -- Dependencies: 'simple1060', 'simple1153', 'simple1154', 'simple1156', 'simple4000'.
36 compositeC506 :: Parser Value
39 [ "010" .@ mandatory simple1153
40 , "020" .@ optional simple1154
41 , "030" .@ optional simple1156
42 , "040" .@ optional simple4000
43 , "050" .@ optional simple1060