1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Composites.C507
15 import Text.Edifact.D96A.Simples (simple2005, simple2379, simple2380)
17 import Text.Edifact.Parsing
18 import Text.Edifact.Types (Value)
20 -- | Derived from this specification:
22 -- > C507 DATE/TIME/PERIOD
24 -- > Desc: Date and/or time, or period relevant to the specified
25 -- > date/time/period type.
27 -- > 010 2005 Date/time/period qualifier M an..3
28 -- > 020 2380 Date/time/period C an..35
29 -- > 030 2379 Date/time/period format qualifier C an..3
31 -- Dependencies: 'simple2005', 'simple2379', 'simple2380'.
32 compositeC507 :: Parser Value
35 [ "010" .@ mandatory simple2005
36 , "020" .@ optional simple2380
37 , "030" .@ optional simple2379