1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Composites.C219
14 import Text.Edifact.D01B.Simples (simple8334, simple8335)
16 import Text.Edifact.Parsing
17 import Text.Edifact.Types (Value)
19 -- | Derived from this specification:
21 -- > C219 MOVEMENT TYPE
23 -- > Desc: Description of type of service for movement of
26 -- > 010 8335 Movement type description code C an..3
27 -- > 020 8334 Movement type description C an..35
29 -- Dependencies: 'simple8334', 'simple8335'.
30 compositeC219 :: Parser Value
33 [ "010" .@ optional simple8335
34 , "020" .@ optional simple8334