aboutsummaryrefslogtreecommitdiffhomepage
path: root/specification/src/Text/Edifact/D96A/Segments/TMD.hs
diff options
context:
space:
mode:
Diffstat (limited to 'specification/src/Text/Edifact/D96A/Segments/TMD.hs')
-rw-r--r--specification/src/Text/Edifact/D96A/Segments/TMD.hs44
1 files changed, 44 insertions, 0 deletions
diff --git a/specification/src/Text/Edifact/D96A/Segments/TMD.hs b/specification/src/Text/Edifact/D96A/Segments/TMD.hs
new file mode 100644
index 0000000..df7157a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/TMD.hs
@@ -0,0 +1,44 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D96A.Segments.TMD
7 ( -- * Definition
8 segmentTMD
9 -- * Dependencies
10 , compositeC219
11 , simple8332
12 , simple8341
13 ) where
14
15import Text.Edifact.D96A.Composites (compositeC219)
16import Text.Edifact.D96A.Simples (simple8332, simple8341)
17
18import Text.Edifact.Parsing
19import Text.Edifact.Types (Value)
20
21-- | Derived from this specification:
22--
23-- > | TMD TRANSPORT MOVEMENT DETAILS
24-- >
25-- > | Function: To specify operational transport movement details for
26-- > a goods item or equipment (which may differ from the
27-- > contractual conditions).
28-- >
29-- > 010 C219 MOVEMENT TYPE C
30-- > 8335 Movement type, coded C an..3
31-- > 8334 Movement type C an..35
32-- >
33-- > 020 8332 EQUIPMENT PLAN C an..26
34-- >
35-- > 030 8341 HAULAGE ARRANGEMENTS, CODED C an..3
36--
37-- Dependencies: 'compositeC219', 'simple8332', 'simple8341'.
38segmentTMD :: Parser Value
39segmentTMD =
40 segment "TMD"
41 [ "010" .@ optional compositeC219
42 , "020" .@ optional simple8332
43 , "030" .@ optional simple8341
44 ]