aboutsummaryrefslogtreecommitdiffhomepage
path: root/specification/src/Text/Edifact/D01B/Simples/S6245.hs
blob: 3fd6c6655bf7e45bda2f2283fbe051d91671ea11 (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
36
37
38
39
40
41
{-# LANGUAGE OverloadedStrings #-}

---- Machine generated code.
---- Output of edi-parser-scaffolder

module Text.Edifact.D01B.Simples.S6245
  ( simple6245
  ) where

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

-- | Derived from this specification:
--
-- >      6245  Temperature type code qualifier                         [B]
-- >
-- >      Desc: Code qualifying the type of a temperature.
-- >
-- >      Repr: an..3
-- >
-- >      1     Storage temperature
-- >               The temperature at which the cargo is to be kept while
-- >               it is in storage.
-- >
-- >      2     Transport temperature
-- >               The temperature at which cargo is to be kept while it is
-- >               under transport.
-- >
-- >      3     Cargo operating temperature
-- >               The temperature at which cargo is to be kept during
-- >               cargo handling.
-- >
-- >      4     Transport emergency temperature
-- >               The temperature at which emergency procedures apply for
-- >               the disposal of temperature-controlled goods.
-- >
-- >      5     Transport control temperature
-- >               The maximum temperature at which certain products can be
-- >               safely transported.
simple6245 :: Parser Value
simple6245 = simple "6245" (alphaNumeric `upTo` 3)