aboutsummaryrefslogtreecommitdiffhomepage
path: root/specification/src/Text/Edifact/D96A/Simples/S4055.hs
blob: 6ac2e0978642248fd3f7c5c3e1e1a3738176fedd (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.D96A.Simples.S4055
  ( simple4055
  ) where

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

-- | Derived from this specification:
--
-- >   4055  Terms of delivery or transport function, coded
-- >
-- >   Desc: Indication whether the terms relate to e.g. price conditions,
-- >         delivery conditions, transport conditions, or a combination of
-- >         these.
-- >
-- >   Repr: an..3
-- >
-- >         1 Price condition
-- >              Description to be provided.
-- >         2 Despatch condition
-- >              Condition requested by the customer under which the
-- >              supplier shall deliver: Extent of freight costs, means of
-- >              transport.
-- >         3 Price and despatch condition
-- >              Description to be provided.
-- >         4 Collected by customer
-- >              Indicates that the customer will pick up the goods at the
-- >              supplier. He will take care of the means of transport.
-- >         5 Transport condition
-- >              Specifies the conditions under which the transport takes
-- >              place under the responsibility of the carrier.
-- >         6 Delivery condition
-- >              Specifies the conditions under which the goods must be
-- >              delivered to the consignee.
simple4055 :: Parser Value
simple4055 = simple "4055" (alphaNumeric `upTo` 3)