1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Composites.C228
14 import Text.Edifact.D01B.Simples (simple8178, simple8179)
16 import Text.Edifact.Parsing
17 import Text.Edifact.Types (Value)
19 -- | Derived from this specification:
21 -- > C228 TRANSPORT MEANS
23 -- > Desc: Code and/or name identifying the type of means of
26 -- > 010 8179 Transport means description code C an..8
27 -- > 020 8178 Transport means description C an..17
29 -- Dependencies: 'simple8178', 'simple8179'.
30 compositeC228 :: Parser Value
33 [ "010" .@ optional simple8179
34 , "020" .@ optional simple8178