1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Composites.C220
14 import Text.Edifact.D01B.Simples (simple8066, simple8067)
16 import Text.Edifact.Parsing
17 import Text.Edifact.Types (Value)
19 -- | Derived from this specification:
21 -- > C220 MODE OF TRANSPORT
23 -- > Desc: Method of transport code or name. Code preferred.
25 -- > 010 8067 Transport mode name code C an..3
26 -- > 020 8066 Transport mode name C an..17
28 -- Dependencies: 'simple8066', 'simple8067'.
29 compositeC220 :: Parser Value
32 [ "010" .@ optional simple8067
33 , "020" .@ optional simple8066