1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Composites.C076
14 import Text.Edifact.D96A.Simples (simple3148, simple3155)
16 import Text.Edifact.Parsing
17 import Text.Edifact.Types (Value)
19 -- | Derived from this specification:
21 -- > C076 COMMUNICATION CONTACT
23 -- > Desc: Communication number of a department or employee in a
24 -- > specified channel.
26 -- > 010 3148 Communication number M an..512
27 -- > 020 3155 Communication channel qualifier M an..3
29 -- Dependencies: 'simple3148', 'simple3155'.
30 compositeC076 :: Parser Value
33 [ "010" .@ mandatory simple3148
34 , "020" .@ mandatory simple3155