1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Composites.C503
16 import Text.Edifact.D96A.Simples (simple1004, simple1366, simple1373,
19 import Text.Edifact.Parsing
20 import Text.Edifact.Types (Value)
22 -- | Derived from this specification:
24 -- > C503 DOCUMENT/MESSAGE DETAILS
26 -- > Desc: Identification of document/message by number, status,
27 -- > source and/or language.
29 -- > 010 1004 Document/message number C an..35
30 -- > 020 1373 Document/message status, coded C an..3
31 -- > 030 1366 Document/message source C an..35
32 -- > 040 3453 Language, coded C an..3
34 -- Dependencies: 'simple1004', 'simple1366', 'simple1373', 'simple3453'.
35 compositeC503 :: Parser Value
38 [ "010" .@ optional simple1004
39 , "020" .@ optional simple1373
40 , "030" .@ optional simple1366
41 , "040" .@ optional simple3453