specification/src/Text/Edifact/D96A/Composites/C234.hs


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.D96A.Composites.C234
  ( -- * Definition
    compositeC234
    -- * Dependencies
  , simple7088
  , simple7124
  ) where

import           Text.Edifact.D96A.Simples (simple7088, simple7124)

import           Text.Edifact.Parsing
import           Text.Edifact.Types        (Value)

-- | Derived from this specification:
--
-- >       C234  UNDG INFORMATION
-- >
-- >       Desc: Information on United Nations Dangerous Goods
-- >             classification.
-- >
-- > 010   7124   UNDG number                                   C  n4
-- > 020   7088   Dangerous goods flashpoint                    C  an..8
--
-- Dependencies: 'simple7088', 'simple7124'.
compositeC234 :: Parser Value
compositeC234 =
  composite "C234"
    [ "010" .@ optional  simple7124
    , "020" .@ optional  simple7088
    ]