blob: c245bb13fce48d1aff096e0094815ed4e048cff6 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
{-# LANGUAGE OverloadedStrings #-}
---- Machine generated code.
---- Output of edi-parser-scaffolder
module Text.Edifact.D01B.Composites.C076
( -- * Definition
compositeC076
-- * Dependencies
, simple3148
, simple3155
) where
import Text.Edifact.D01B.Simples (simple3148, simple3155)
import Text.Edifact.Parsing
import Text.Edifact.Types (Value)
-- | Derived from this specification:
--
-- > C076 COMMUNICATION CONTACT
-- >
-- > Desc: Communication number of a department or employee in
-- > a specified channel.
-- >
-- > 010 3148 Communication address identifier M an..512
-- > 020 3155 Communication address code qualifier M an..3
--
-- Dependencies: 'simple3148', 'simple3155'.
compositeC076 :: Parser Value
compositeC076 =
composite "C076"
[ "010" .@ mandatory simple3148
, "020" .@ mandatory simple3155
]
|