aboutsummaryrefslogtreecommitdiffhomepage
path: root/specification/src/Text/Edifact/D01B/Segments
diff options
context:
space:
mode:
Diffstat (limited to 'specification/src/Text/Edifact/D01B/Segments')
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/BGM.hs52
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/CNI.hs46
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/CNT.hs34
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/COM.hs35
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/CPI.hs46
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/CTA.hs39
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/CUX.hs52
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/DGS.hs102
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/DIM.hs40
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/DOC.hs60
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/DTM.hs35
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/EQA.hs40
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/EQD.hs61
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/EQN.hs33
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/FTX.hs61
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/GDS.hs35
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/GID.hs78
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/GIN.hs59
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/GOR.hs64
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/HAN.hs44
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/ICD.hs43
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/LOC.hs62
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/MEA.hs54
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/MOA.hs36
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/NAD.hs96
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/PCD.hs41
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/PCI.hs59
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/PIA.hs69
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/PRI.hs42
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/QTY.hs34
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/RFF.hs36
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/RNG.hs39
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/SEL.hs51
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/SEQ.hs41
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/SGP.hs41
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/STS.hs81
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/TCC.hs67
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/TDT.hs90
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/TMD.hs44
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/TMP.hs38
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/TOD.hs46
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/TPL.hs39
-rw-r--r--specification/src/Text/Edifact/D01B/Segments/TSR.hs61
43 files changed, 2226 insertions, 0 deletions
diff --git a/specification/src/Text/Edifact/D01B/Segments/BGM.hs b/specification/src/Text/Edifact/D01B/Segments/BGM.hs
new file mode 100644
index 0000000..616ea65
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/BGM.hs
@@ -0,0 +1,52 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.BGM
7 ( -- * Definition
8 segmentBGM
9 -- * Dependencies
10 , compositeC002
11 , compositeC106
12 , simple1225
13 , simple4343
14 ) where
15
16import Text.Edifact.D01B.Composites (compositeC002, compositeC106)
17import Text.Edifact.D01B.Simples (simple1225, simple4343)
18
19import Text.Edifact.Parsing
20import Text.Edifact.Types (Value)
21
22-- | Derived from this specification:
23--
24-- > BGM BEGINNING OF MESSAGE
25-- >
26-- > Function: To indicate the type and function of a message
27-- > and to transmit the identifying number.
28-- >
29-- > 010 C002 DOCUMENT/MESSAGE NAME C 1
30-- > 1001 Document name code C an..3
31-- > 1131 Code list identification code C an..17
32-- > 3055 Code list responsible agency code C an..3
33-- > 1000 Document name C an..35
34-- >
35-- > 020 C106 DOCUMENT/MESSAGE IDENTIFICATION C 1
36-- > 1004 Document identifier C an..35
37-- > 1056 Version identifier C an..9
38-- > 1060 Revision identifier C an..6
39-- >
40-- > 030 1225 MESSAGE FUNCTION CODE C 1 an..3
41-- >
42-- > 040 4343 RESPONSE TYPE CODE C 1 an..3
43--
44-- Dependencies: 'compositeC002', 'compositeC106', 'simple1225', 'simple4343'.
45segmentBGM :: Parser Value
46segmentBGM =
47 segment "BGM"
48 [ "010" .@ optional compositeC002
49 , "020" .@ optional compositeC106
50 , "030" .@ optional simple1225
51 , "040" .@ optional simple4343
52 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/CNI.hs b/specification/src/Text/Edifact/D01B/Segments/CNI.hs
new file mode 100644
index 0000000..2b4aabe
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/CNI.hs
@@ -0,0 +1,46 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.CNI
7 ( -- * Definition
8 segmentCNI
9 -- * Dependencies
10 , compositeC503
11 , simple1312
12 , simple1490
13 ) where
14
15import Text.Edifact.D01B.Composites (compositeC503)
16import Text.Edifact.D01B.Simples (simple1312, simple1490)
17
18import Text.Edifact.Parsing
19import Text.Edifact.Types (Value)
20
21-- | Derived from this specification:
22--
23-- > CNI CONSIGNMENT INFORMATION
24-- >
25-- > Function: To identify one consignment.
26-- >
27-- > 010 1490 CONSOLIDATION ITEM NUMBER C 1 n..4
28-- >
29-- > 020 C503 DOCUMENT/MESSAGE DETAILS C 1
30-- > 1004 Document identifier C an..35
31-- > 1373 Document status code C an..3
32-- > 1366 Document source description C an..70
33-- > 3453 Language name code C an..3
34-- > 1056 Version identifier C an..9
35-- > 1060 Revision identifier C an..6
36-- >
37-- > 030 1312 CONSIGNMENT LOAD SEQUENCE IDENTIFIER C 1 n..4
38--
39-- Dependencies: 'compositeC503', 'simple1312', 'simple1490'.
40segmentCNI :: Parser Value
41segmentCNI =
42 segment "CNI"
43 [ "010" .@ optional simple1490
44 , "020" .@ optional compositeC503
45 , "030" .@ optional simple1312
46 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/CNT.hs b/specification/src/Text/Edifact/D01B/Segments/CNT.hs
new file mode 100644
index 0000000..2fac649
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/CNT.hs
@@ -0,0 +1,34 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.CNT
7 ( -- * Definition
8 segmentCNT
9 -- * Dependencies
10 , compositeC270
11 ) where
12
13import Text.Edifact.D01B.Composites (compositeC270)
14
15import Text.Edifact.Parsing
16import Text.Edifact.Types (Value)
17
18-- | Derived from this specification:
19--
20-- > CNT CONTROL TOTAL
21-- >
22-- > Function: To provide control total.
23-- >
24-- > 010 C270 CONTROL M 1
25-- > 6069 Control total type code qualifier M an..3
26-- > 6066 Control total value M n..18
27-- > 6411 Measurement unit code C an..3
28--
29-- Dependencies: 'compositeC270'.
30segmentCNT :: Parser Value
31segmentCNT =
32 segment "CNT"
33 [ "010" .@ mandatory compositeC270
34 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/COM.hs b/specification/src/Text/Edifact/D01B/Segments/COM.hs
new file mode 100644
index 0000000..b437259
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/COM.hs
@@ -0,0 +1,35 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.COM
7 ( -- * Definition
8 segmentCOM
9 -- * Dependencies
10 , compositeC076
11 ) where
12
13import Text.Edifact.D01B.Composites (compositeC076)
14
15import Text.Edifact.Parsing
16import Text.Edifact.Types (Value)
17
18-- | Derived from this specification:
19--
20-- > COM COMMUNICATION CONTACT
21-- >
22-- > Function: To identify a communication number of a
23-- > department or a person to whom communication
24-- > should be directed.
25-- >
26-- > 010 C076 COMMUNICATION CONTACT M 3
27-- > 3148 Communication address identifier M an..512
28-- > 3155 Communication address code qualifier M an..3
29--
30-- Dependencies: 'compositeC076'.
31segmentCOM :: Parser Value
32segmentCOM =
33 segment "COM"
34 [ "010" .@ mandatory compositeC076
35 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/CPI.hs b/specification/src/Text/Edifact/D01B/Segments/CPI.hs
new file mode 100644
index 0000000..a61301b
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/CPI.hs
@@ -0,0 +1,46 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.CPI
7 ( -- * Definition
8 segmentCPI
9 -- * Dependencies
10 , compositeC229
11 , compositeC231
12 , simple4237
13 ) where
14
15import Text.Edifact.D01B.Composites (compositeC229, compositeC231)
16import Text.Edifact.D01B.Simples (simple4237)
17
18import Text.Edifact.Parsing
19import Text.Edifact.Types (Value)
20
21-- | Derived from this specification:
22--
23-- > CPI CHARGE PAYMENT INSTRUCTIONS
24-- >
25-- > Function: To identify a charge.
26-- >
27-- > 010 C229 CHARGE CATEGORY C 1
28-- > 5237 Charge category code M an..3
29-- > 1131 Code list identification code C an..17
30-- > 3055 Code list responsible agency code C an..3
31-- >
32-- > 020 C231 METHOD OF PAYMENT C 1
33-- > 4215 Transport charges payment method code M an..3
34-- > 1131 Code list identification code C an..17
35-- > 3055 Code list responsible agency code C an..3
36-- >
37-- > 030 4237 PAYMENT ARRANGEMENT CODE C 1 an..3
38--
39-- Dependencies: 'compositeC229', 'compositeC231', 'simple4237'.
40segmentCPI :: Parser Value
41segmentCPI =
42 segment "CPI"
43 [ "010" .@ optional compositeC229
44 , "020" .@ optional compositeC231
45 , "030" .@ optional simple4237
46 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/CTA.hs b/specification/src/Text/Edifact/D01B/Segments/CTA.hs
new file mode 100644
index 0000000..8fe1056
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/CTA.hs
@@ -0,0 +1,39 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.CTA
7 ( -- * Definition
8 segmentCTA
9 -- * Dependencies
10 , compositeC056
11 , simple3139
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC056)
15import Text.Edifact.D01B.Simples (simple3139)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > CTA CONTACT INFORMATION
23-- >
24-- > Function: To identify a person or a department to whom
25-- > communication should be directed.
26-- >
27-- > 010 3139 CONTACT FUNCTION CODE C 1 an..3
28-- >
29-- > 020 C056 DEPARTMENT OR EMPLOYEE DETAILS C 1
30-- > 3413 Department or employee name code C an..17
31-- > 3412 Department or employee name C an..35
32--
33-- Dependencies: 'compositeC056', 'simple3139'.
34segmentCTA :: Parser Value
35segmentCTA =
36 segment "CTA"
37 [ "010" .@ optional simple3139
38 , "020" .@ optional compositeC056
39 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/CUX.hs b/specification/src/Text/Edifact/D01B/Segments/CUX.hs
new file mode 100644
index 0000000..439619a
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/CUX.hs
@@ -0,0 +1,52 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.CUX
7 ( -- * Definition
8 segmentCUX
9 -- * Dependencies
10 , compositeC504
11 , simple5402
12 , simple6341
13 ) where
14
15import Text.Edifact.D01B.Composites (compositeC504)
16import Text.Edifact.D01B.Simples (simple5402, simple6341)
17
18import Text.Edifact.Parsing
19import Text.Edifact.Types (Value)
20
21-- | Derived from this specification:
22--
23-- > CUX CURRENCIES
24-- >
25-- > Function: To specify currencies used in the transaction
26-- > and relevant details for the rate of exchange.
27-- >
28-- > 010 C504 CURRENCY DETAILS C 1
29-- > 6347 Currency usage code qualifier M an..3
30-- > 6345 Currency identification code C an..3
31-- > 6343 Currency type code qualifier C an..3
32-- > 6348 Currency rate value C n..4
33-- >
34-- > 020 C504 CURRENCY DETAILS C 1
35-- > 6347 Currency usage code qualifier M an..3
36-- > 6345 Currency identification code C an..3
37-- > 6343 Currency type code qualifier C an..3
38-- > 6348 Currency rate value C n..4
39-- >
40-- > 030 5402 CURRENCY EXCHANGE RATE C 1 n..12
41-- >
42-- > 040 6341 EXCHANGE RATE CURRENCY MARKET IDENTIFIER C 1 an..3
43--
44-- Dependencies: 'compositeC504', 'simple5402', 'simple6341'.
45segmentCUX :: Parser Value
46segmentCUX =
47 segment "CUX"
48 [ "010" .@ optional compositeC504
49 , "020" .@ optional compositeC504
50 , "030" .@ optional simple5402
51 , "040" .@ optional simple6341
52 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/DGS.hs b/specification/src/Text/Edifact/D01B/Segments/DGS.hs
new file mode 100644
index 0000000..921aae3
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/DGS.hs
@@ -0,0 +1,102 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.DGS
7 ( -- * Definition
8 segmentDGS
9 -- * Dependencies
10 , compositeC205
11 , compositeC223
12 , compositeC234
13 , compositeC235
14 , compositeC236
15 , simple8126
16 , simple8211
17 , simple8255
18 , simple8273
19 , simple8325
20 , simple8339
21 , simple8364
22 , simple8410
23 ) where
24
25import Text.Edifact.D01B.Composites (compositeC205, compositeC223,
26 compositeC234, compositeC235,
27 compositeC236)
28import Text.Edifact.D01B.Simples (simple8126, simple8211,
29 simple8255, simple8273,
30 simple8325, simple8339,
31 simple8364, simple8410)
32
33import Text.Edifact.Parsing
34import Text.Edifact.Types (Value)
35
36-- | Derived from this specification:
37--
38-- > DGS DANGEROUS GOODS
39-- >
40-- > Function: To identify dangerous goods.
41-- >
42-- > 010 8273 DANGEROUS GOODS REGULATIONS CODE C 1 an..3
43-- >
44-- > 020 C205 HAZARD CODE C 1
45-- > 8351 Hazard identification code M an..7
46-- > 8078 Additional hazard classification
47-- > identifier C an..7
48-- > 8092 Hazard code version identifier C an..10
49-- >
50-- > 030 C234 UNDG INFORMATION C 1
51-- > 7124 United Nations Dangerous Goods (UNDG)
52-- > identifier C n4
53-- > 7088 Dangerous goods flashpoint value C an..8
54-- >
55-- > 040 C223 DANGEROUS GOODS SHIPMENT FLASHPOINT C 1
56-- > 7106 Shipment flashpoint value C n3
57-- > 6411 Measurement unit code C an..3
58-- >
59-- > 050 8339 PACKAGING DANGER LEVEL CODE C 1 an..3
60-- >
61-- > 060 8364 EMERGENCY PROCEDURE FOR SHIPS IDENTIFIER C 1 an..6
62-- >
63-- > 070 8410 HAZARD MEDICAL FIRST AID GUIDE IDENTIFIER C 1 an..4
64-- >
65-- > 080 8126 TRANSPORT EMERGENCY CARD IDENTIFIER C 1 an..10
66-- >
67-- > 090 C235 HAZARD IDENTIFICATION PLACARD DETAILS C 1
68-- > 8158 Orange hazard placard upper part
69-- > identifier C an..4
70-- > 8186 Orange hazard placard lower part
71-- > identifier C an4
72-- >
73-- > 100 C236 DANGEROUS GOODS LABEL C 1
74-- > 8246 Dangerous goods marking identifier C an..4
75-- > 8246 Dangerous goods marking identifier C an..4
76-- > 8246 Dangerous goods marking identifier C an..4
77-- >
78-- > 110 8255 PACKING INSTRUCTION TYPE CODE C 1 an..3
79-- >
80-- > 120 8325 HAZARDOUS MEANS OF TRANSPORT CATEGORY CODE C 1 an..3
81-- >
82-- > 130 8211 HAZARDOUS CARGO TRANSPORT AUTHORISATION
83-- > CODE C 1 an..3
84--
85-- Dependencies: 'compositeC205', 'compositeC223', 'compositeC234', 'compositeC235', 'compositeC236', 'simple8126', 'simple8211', 'simple8255', 'simple8273', 'simple8325', 'simple8339', 'simple8364', 'simple8410'.
86segmentDGS :: Parser Value
87segmentDGS =
88 segment "DGS"
89 [ "010" .@ optional simple8273
90 , "020" .@ optional compositeC205
91 , "030" .@ optional compositeC234
92 , "040" .@ optional compositeC223
93 , "050" .@ optional simple8339
94 , "060" .@ optional simple8364
95 , "070" .@ optional simple8410
96 , "080" .@ optional simple8126
97 , "090" .@ optional compositeC235
98 , "100" .@ optional compositeC236
99 , "110" .@ optional simple8255
100 , "120" .@ optional simple8325
101 , "130" .@ optional simple8211
102 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/DIM.hs b/specification/src/Text/Edifact/D01B/Segments/DIM.hs
new file mode 100644
index 0000000..eb47b5c
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/DIM.hs
@@ -0,0 +1,40 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.DIM
7 ( -- * Definition
8 segmentDIM
9 -- * Dependencies
10 , compositeC211
11 , simple6145
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC211)
15import Text.Edifact.D01B.Simples (simple6145)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > DIM DIMENSIONS
23-- >
24-- > Function: To specify dimensions.
25-- >
26-- > 010 6145 DIMENSION TYPE CODE QUALIFIER M 1 an..3
27-- >
28-- > 020 C211 DIMENSIONS M 1
29-- > 6411 Measurement unit code M an..3
30-- > 6168 Length dimension value C n..15
31-- > 6140 Width dimension value C n..15
32-- > 6008 Height dimension value C n..15
33--
34-- Dependencies: 'compositeC211', 'simple6145'.
35segmentDIM :: Parser Value
36segmentDIM =
37 segment "DIM"
38 [ "010" .@ mandatory simple6145
39 , "020" .@ mandatory compositeC211
40 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/DOC.hs b/specification/src/Text/Edifact/D01B/Segments/DOC.hs
new file mode 100644
index 0000000..5c4ee19
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/DOC.hs
@@ -0,0 +1,60 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.DOC
7 ( -- * Definition
8 segmentDOC
9 -- * Dependencies
10 , compositeC002
11 , compositeC503
12 , simple1218
13 , simple1220
14 , simple3153
15 ) where
16
17import Text.Edifact.D01B.Composites (compositeC002, compositeC503)
18import Text.Edifact.D01B.Simples (simple1218, simple1220,
19 simple3153)
20
21import Text.Edifact.Parsing
22import Text.Edifact.Types (Value)
23
24-- | Derived from this specification:
25--
26-- > DOC DOCUMENT/MESSAGE DETAILS
27-- >
28-- > Function: To identify documents and details directly
29-- > related to it.
30-- >
31-- > 010 C002 DOCUMENT/MESSAGE NAME M 1
32-- > 1001 Document name code C an..3
33-- > 1131 Code list identification code C an..17
34-- > 3055 Code list responsible agency code C an..3
35-- > 1000 Document name C an..35
36-- >
37-- > 020 C503 DOCUMENT/MESSAGE DETAILS C 1
38-- > 1004 Document identifier C an..35
39-- > 1373 Document status code C an..3
40-- > 1366 Document source description C an..70
41-- > 3453 Language name code C an..3
42-- > 1056 Version identifier C an..9
43-- > 1060 Revision identifier C an..6
44-- >
45-- > 030 3153 COMMUNICATION MEDIUM TYPE CODE C 1 an..3
46-- >
47-- > 040 1220 DOCUMENT COPIES REQUIRED QUANTITY C 1 n..2
48-- >
49-- > 050 1218 DOCUMENT ORIGINALS REQUIRED QUANTITY C 1 n..2
50--
51-- Dependencies: 'compositeC002', 'compositeC503', 'simple1218', 'simple1220', 'simple3153'.
52segmentDOC :: Parser Value
53segmentDOC =
54 segment "DOC"
55 [ "010" .@ mandatory compositeC002
56 , "020" .@ optional compositeC503
57 , "030" .@ optional simple3153
58 , "040" .@ optional simple1220
59 , "050" .@ optional simple1218
60 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/DTM.hs b/specification/src/Text/Edifact/D01B/Segments/DTM.hs
new file mode 100644
index 0000000..82e0975
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/DTM.hs
@@ -0,0 +1,35 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.DTM
7 ( -- * Definition
8 segmentDTM
9 -- * Dependencies
10 , compositeC507
11 ) where
12
13import Text.Edifact.D01B.Composites (compositeC507)
14
15import Text.Edifact.Parsing
16import Text.Edifact.Types (Value)
17
18-- | Derived from this specification:
19--
20-- > DTM DATE/TIME/PERIOD
21-- >
22-- > Function: To specify date, and/or time, or period.
23-- >
24-- > 010 C507 DATE/TIME/PERIOD M 1
25-- > 2005 Date or time or period function code
26-- > qualifier M an..3
27-- > 2380 Date or time or period value C an..35
28-- > 2379 Date or time or period format code C an..3
29--
30-- Dependencies: 'compositeC507'.
31segmentDTM :: Parser Value
32segmentDTM =
33 segment "DTM"
34 [ "010" .@ mandatory compositeC507
35 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/EQA.hs b/specification/src/Text/Edifact/D01B/Segments/EQA.hs
new file mode 100644
index 0000000..2c4f7da
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/EQA.hs
@@ -0,0 +1,40 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.EQA
7 ( -- * Definition
8 segmentEQA
9 -- * Dependencies
10 , compositeC237
11 , simple8053
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC237)
15import Text.Edifact.D01B.Simples (simple8053)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > EQA ATTACHED EQUIPMENT
23-- >
24-- > Function: To specify attached or related equipment.
25-- >
26-- > 010 8053 EQUIPMENT TYPE CODE QUALIFIER M 1 an..3
27-- >
28-- > 020 C237 EQUIPMENT IDENTIFICATION C 1
29-- > 8260 Equipment identifier C an..17
30-- > 1131 Code list identification code C an..17
31-- > 3055 Code list responsible agency code C an..3
32-- > 3207 Country name code C an..3
33--
34-- Dependencies: 'compositeC237', 'simple8053'.
35segmentEQA :: Parser Value
36segmentEQA =
37 segment "EQA"
38 [ "010" .@ mandatory simple8053
39 , "020" .@ optional compositeC237
40 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/EQD.hs b/specification/src/Text/Edifact/D01B/Segments/EQD.hs
new file mode 100644
index 0000000..4eb45a7
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/EQD.hs
@@ -0,0 +1,61 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.EQD
7 ( -- * Definition
8 segmentEQD
9 -- * Dependencies
10 , compositeC224
11 , compositeC237
12 , simple8053
13 , simple8077
14 , simple8169
15 , simple8249
16 ) where
17
18import Text.Edifact.D01B.Composites (compositeC224, compositeC237)
19import Text.Edifact.D01B.Simples (simple8053, simple8077,
20 simple8169, simple8249)
21
22import Text.Edifact.Parsing
23import Text.Edifact.Types (Value)
24
25-- | Derived from this specification:
26--
27-- > EQD EQUIPMENT DETAILS
28-- >
29-- > Function: To identify a unit of equipment.
30-- >
31-- > 010 8053 EQUIPMENT TYPE CODE QUALIFIER M 1 an..3
32-- >
33-- > 020 C237 EQUIPMENT IDENTIFICATION C 1
34-- > 8260 Equipment identifier C an..17
35-- > 1131 Code list identification code C an..17
36-- > 3055 Code list responsible agency code C an..3
37-- > 3207 Country name code C an..3
38-- >
39-- > 030 C224 EQUIPMENT SIZE AND TYPE C 1
40-- > 8155 Equipment size and type description code C an..10
41-- > 1131 Code list identification code C an..17
42-- > 3055 Code list responsible agency code C an..3
43-- > 8154 Equipment size and type description C an..35
44-- >
45-- > 040 8077 EQUIPMENT SUPPLIER CODE C 1 an..3
46-- >
47-- > 050 8249 EQUIPMENT STATUS CODE C 1 an..3
48-- >
49-- > 060 8169 FULL OR EMPTY INDICATOR CODE C 1 an..3
50--
51-- Dependencies: 'compositeC224', 'compositeC237', 'simple8053', 'simple8077', 'simple8169', 'simple8249'.
52segmentEQD :: Parser Value
53segmentEQD =
54 segment "EQD"
55 [ "010" .@ mandatory simple8053
56 , "020" .@ optional compositeC237
57 , "030" .@ optional compositeC224
58 , "040" .@ optional simple8077
59 , "050" .@ optional simple8249
60 , "060" .@ optional simple8169
61 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/EQN.hs b/specification/src/Text/Edifact/D01B/Segments/EQN.hs
new file mode 100644
index 0000000..9d6a579
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/EQN.hs
@@ -0,0 +1,33 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.EQN
7 ( -- * Definition
8 segmentEQN
9 -- * Dependencies
10 , compositeC523
11 ) where
12
13import Text.Edifact.D01B.Composites (compositeC523)
14
15import Text.Edifact.Parsing
16import Text.Edifact.Types (Value)
17
18-- | Derived from this specification:
19--
20-- > EQN NUMBER OF UNITS
21-- >
22-- > Function: To specify the number of units.
23-- >
24-- > 010 C523 NUMBER OF UNIT DETAILS M 1
25-- > 6350 Units quantity C n..15
26-- > 6353 Unit type code qualifier C an..3
27--
28-- Dependencies: 'compositeC523'.
29segmentEQN :: Parser Value
30segmentEQN =
31 segment "EQN"
32 [ "010" .@ mandatory compositeC523
33 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/FTX.hs b/specification/src/Text/Edifact/D01B/Segments/FTX.hs
new file mode 100644
index 0000000..72a4836
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/FTX.hs
@@ -0,0 +1,61 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.FTX
7 ( -- * Definition
8 segmentFTX
9 -- * Dependencies
10 , compositeC107
11 , compositeC108
12 , simple3453
13 , simple4447
14 , simple4451
15 , simple4453
16 ) where
17
18import Text.Edifact.D01B.Composites (compositeC107, compositeC108)
19import Text.Edifact.D01B.Simples (simple3453, simple4447,
20 simple4451, simple4453)
21
22import Text.Edifact.Parsing
23import Text.Edifact.Types (Value)
24
25-- | Derived from this specification:
26--
27-- > FTX FREE TEXT
28-- >
29-- > Function: To provide free form or coded text information.
30-- >
31-- > 010 4451 TEXT SUBJECT CODE QUALIFIER M 1 an..3
32-- >
33-- > 020 4453 FREE TEXT FUNCTION CODE C 1 an..3
34-- >
35-- > 030 C107 TEXT REFERENCE C 1
36-- > 4441 Free text value code M an..17
37-- > 1131 Code list identification code C an..17
38-- > 3055 Code list responsible agency code C an..3
39-- >
40-- > 040 C108 TEXT LITERAL C 1
41-- > 4440 Free text value M an..512
42-- > 4440 Free text value C an..512
43-- > 4440 Free text value C an..512
44-- > 4440 Free text value C an..512
45-- > 4440 Free text value C an..512
46-- >
47-- > 050 3453 LANGUAGE NAME CODE C 1 an..3
48-- >
49-- > 060 4447 FREE TEXT FORMAT CODE C 1 an..3
50--
51-- Dependencies: 'compositeC107', 'compositeC108', 'simple3453', 'simple4447', 'simple4451', 'simple4453'.
52segmentFTX :: Parser Value
53segmentFTX =
54 segment "FTX"
55 [ "010" .@ mandatory simple4451
56 , "020" .@ optional simple4453
57 , "030" .@ optional compositeC107
58 , "040" .@ optional compositeC108
59 , "050" .@ optional simple3453
60 , "060" .@ optional simple4447
61 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/GDS.hs b/specification/src/Text/Edifact/D01B/Segments/GDS.hs
new file mode 100644
index 0000000..b7238ff
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/GDS.hs
@@ -0,0 +1,35 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.GDS
7 ( -- * Definition
8 segmentGDS
9 -- * Dependencies
10 , compositeC703
11 ) where
12
13import Text.Edifact.D01B.Composites (compositeC703)
14
15import Text.Edifact.Parsing
16import Text.Edifact.Types (Value)
17
18-- | Derived from this specification:
19--
20-- > GDS NATURE OF CARGO
21-- >
22-- > Function: To indicate the type of cargo as a general
23-- > classification.
24-- >
25-- > 010 C703 NATURE OF CARGO C 1
26-- > 7085 Cargo type classification code M an..3
27-- > 1131 Code list identification code C an..17
28-- > 3055 Code list responsible agency code C an..3
29--
30-- Dependencies: 'compositeC703'.
31segmentGDS :: Parser Value
32segmentGDS =
33 segment "GDS"
34 [ "010" .@ optional compositeC703
35 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/GID.hs b/specification/src/Text/Edifact/D01B/Segments/GID.hs
new file mode 100644
index 0000000..4bb41b1
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/GID.hs
@@ -0,0 +1,78 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.GID
7 ( -- * Definition
8 segmentGID
9 -- * Dependencies
10 , compositeC213
11 , simple1496
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC213)
15import Text.Edifact.D01B.Simples (simple1496)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > GID GOODS ITEM DETAILS
23-- >
24-- > Function: To indicate totals of a goods item.
25-- >
26-- > 010 1496 GOODS ITEM NUMBER C 1 n..5
27-- >
28-- > 020 C213 NUMBER AND TYPE OF PACKAGES C 1
29-- > 7224 Package quantity C n..8
30-- > 7065 Package type description code C an..17
31-- > 1131 Code list identification code C an..17
32-- > 3055 Code list responsible agency code C an..3
33-- > 7064 Type of packages C an..35
34-- > 7233 Packaging related description code C an..3
35-- >
36-- > 030 C213 NUMBER AND TYPE OF PACKAGES C 1
37-- > 7224 Package quantity C n..8
38-- > 7065 Package type description code C an..17
39-- > 1131 Code list identification code C an..17
40-- > 3055 Code list responsible agency code C an..3
41-- > 7064 Type of packages C an..35
42-- > 7233 Packaging related description code C an..3
43-- >
44-- > 040 C213 NUMBER AND TYPE OF PACKAGES C 1
45-- > 7224 Package quantity C n..8
46-- > 7065 Package type description code C an..17
47-- > 1131 Code list identification code C an..17
48-- > 3055 Code list responsible agency code C an..3
49-- > 7064 Type of packages C an..35
50-- > 7233 Packaging related description code C an..3
51-- >
52-- > 050 C213 NUMBER AND TYPE OF PACKAGES C 1
53-- > 7224 Package quantity C n..8
54-- > 7065 Package type description code C an..17
55-- > 1131 Code list identification code C an..17
56-- > 3055 Code list responsible agency code C an..3
57-- > 7064 Type of packages C an..35
58-- > 7233 Packaging related description code C an..3
59-- >
60-- > 060 C213 NUMBER AND TYPE OF PACKAGES C 1
61-- > 7224 Package quantity C n..8
62-- > 7065 Package type description code C an..17
63-- > 1131 Code list identification code C an..17
64-- > 3055 Code list responsible agency code C an..3
65-- > 7064 Type of packages C an..35
66-- > 7233 Packaging related description code C an..3
67--
68-- Dependencies: 'compositeC213', 'simple1496'.
69segmentGID :: Parser Value
70segmentGID =
71 segment "GID"
72 [ "010" .@ optional simple1496
73 , "020" .@ optional compositeC213
74 , "030" .@ optional compositeC213
75 , "040" .@ optional compositeC213
76 , "050" .@ optional compositeC213
77 , "060" .@ optional compositeC213
78 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/GIN.hs b/specification/src/Text/Edifact/D01B/Segments/GIN.hs
new file mode 100644
index 0000000..3a6cc8f
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/GIN.hs
@@ -0,0 +1,59 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.GIN
7 ( -- * Definition
8 segmentGIN
9 -- * Dependencies
10 , compositeC208
11 , simple7405
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC208)
15import Text.Edifact.D01B.Simples (simple7405)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > GIN GOODS IDENTITY NUMBER
23-- >
24-- > Function: To give specific identification numbers, either
25-- > as single numbers or ranges.
26-- >
27-- > 010 7405 OBJECT IDENTIFICATION CODE QUALIFIER M 1 an..3
28-- >
29-- > 020 C208 IDENTITY NUMBER RANGE M 1
30-- > 7402 Object identifier M an..35
31-- > 7402 Object identifier C an..35
32-- >
33-- > 030 C208 IDENTITY NUMBER RANGE C 1
34-- > 7402 Object identifier M an..35
35-- > 7402 Object identifier C an..35
36-- >
37-- > 040 C208 IDENTITY NUMBER RANGE C 1
38-- > 7402 Object identifier M an..35
39-- > 7402 Object identifier C an..35
40-- >
41-- > 050 C208 IDENTITY NUMBER RANGE C 1
42-- > 7402 Object identifier M an..35
43-- > 7402 Object identifier C an..35
44-- >
45-- > 060 C208 IDENTITY NUMBER RANGE C 1
46-- > 7402 Object identifier M an..35
47-- > 7402 Object identifier C an..35
48--
49-- Dependencies: 'compositeC208', 'simple7405'.
50segmentGIN :: Parser Value
51segmentGIN =
52 segment "GIN"
53 [ "010" .@ mandatory simple7405
54 , "020" .@ mandatory compositeC208
55 , "030" .@ optional compositeC208
56 , "040" .@ optional compositeC208
57 , "050" .@ optional compositeC208
58 , "060" .@ optional compositeC208
59 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/GOR.hs b/specification/src/Text/Edifact/D01B/Segments/GOR.hs
new file mode 100644
index 0000000..857f3ce
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/GOR.hs
@@ -0,0 +1,64 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.GOR
7 ( -- * Definition
8 segmentGOR
9 -- * Dependencies
10 , compositeC232
11 , simple8323
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC232)
15import Text.Edifact.D01B.Simples (simple8323)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > GOR GOVERNMENTAL REQUIREMENTS
23-- >
24-- > Function: To indicate the requirement for a specific
25-- > governmental action and/or procedure or which
26-- > specific procedure is valid for a specific part
27-- > of the transport.
28-- >
29-- > 010 8323 TRANSPORT MOVEMENT CODE C 1 an..3
30-- >
31-- > 020 C232 GOVERNMENT ACTION C 1
32-- > 9415 Government agency identification code C an..3
33-- > 9411 Government involvement code C an..3
34-- > 9417 Government action code C an..3
35-- > 9353 Government procedure code C an..3
36-- >
37-- > 030 C232 GOVERNMENT ACTION C 1
38-- > 9415 Government agency identification code C an..3
39-- > 9411 Government involvement code C an..3
40-- > 9417 Government action code C an..3
41-- > 9353 Government procedure code C an..3
42-- >
43-- > 040 C232 GOVERNMENT ACTION C 1
44-- > 9415 Government agency identification code C an..3
45-- > 9411 Government involvement code C an..3
46-- > 9417 Government action code C an..3
47-- > 9353 Government procedure code C an..3
48-- >
49-- > 050 C232 GOVERNMENT ACTION C 1
50-- > 9415 Government agency identification code C an..3
51-- > 9411 Government involvement code C an..3
52-- > 9417 Government action code C an..3
53-- > 9353 Government procedure code C an..3
54--
55-- Dependencies: 'compositeC232', 'simple8323'.
56segmentGOR :: Parser Value
57segmentGOR =
58 segment "GOR"
59 [ "010" .@ optional simple8323
60 , "020" .@ optional compositeC232
61 , "030" .@ optional compositeC232
62 , "040" .@ optional compositeC232
63 , "050" .@ optional compositeC232
64 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/HAN.hs b/specification/src/Text/Edifact/D01B/Segments/HAN.hs
new file mode 100644
index 0000000..90b8f94
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/HAN.hs
@@ -0,0 +1,44 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.HAN
7 ( -- * Definition
8 segmentHAN
9 -- * Dependencies
10 , compositeC218
11 , compositeC524
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC218, compositeC524)
15
16import Text.Edifact.Parsing
17import Text.Edifact.Types (Value)
18
19-- | Derived from this specification:
20--
21-- > HAN HANDLING INSTRUCTIONS
22-- >
23-- > Function: To specify handling and where necessary, notify
24-- > hazards.
25-- >
26-- > 010 C524 HANDLING INSTRUCTIONS C 1
27-- > 4079 Handling instruction description code C an..3
28-- > 1131 Code list identification code C an..17
29-- > 3055 Code list responsible agency code C an..3
30-- > 4078 Handling instruction description C an..70
31-- >
32-- > 020 C218 HAZARDOUS MATERIAL C 1
33-- > 7419 Hazardous material category name code C an..7
34-- > 1131 Code list identification code C an..17
35-- > 3055 Code list responsible agency code C an..3
36-- > 7418 Hazardous material category name C an..35
37--
38-- Dependencies: 'compositeC218', 'compositeC524'.
39segmentHAN :: Parser Value
40segmentHAN =
41 segment "HAN"
42 [ "010" .@ optional compositeC524
43 , "020" .@ optional compositeC218
44 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/ICD.hs b/specification/src/Text/Edifact/D01B/Segments/ICD.hs
new file mode 100644
index 0000000..1181092
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/ICD.hs
@@ -0,0 +1,43 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.ICD
7 ( -- * Definition
8 segmentICD
9 -- * Dependencies
10 , compositeC330
11 , compositeC331
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC330, compositeC331)
15
16import Text.Edifact.Parsing
17import Text.Edifact.Types (Value)
18
19-- | Derived from this specification:
20--
21-- > ICD INSURANCE COVER DESCRIPTION
22-- >
23-- > Function: To describe the insurance cover.
24-- >
25-- > 010 C330 INSURANCE COVER TYPE M 1
26-- > 4497 Insurance cover type code M an..3
27-- > 1131 Code list identification code C an..17
28-- > 3055 Code list responsible agency code C an..3
29-- >
30-- > 020 C331 INSURANCE COVER DETAILS M 1
31-- > 4495 Insurance cover description code C an..17
32-- > 1131 Code list identification code C an..17
33-- > 3055 Code list responsible agency code C an..3
34-- > 4494 Insurance cover description C an..35
35-- > 4494 Insurance cover description C an..35
36--
37-- Dependencies: 'compositeC330', 'compositeC331'.
38segmentICD :: Parser Value
39segmentICD =
40 segment "ICD"
41 [ "010" .@ mandatory compositeC330
42 , "020" .@ mandatory compositeC331
43 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/LOC.hs b/specification/src/Text/Edifact/D01B/Segments/LOC.hs
new file mode 100644
index 0000000..6b67b99
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/LOC.hs
@@ -0,0 +1,62 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.LOC
7 ( -- * Definition
8 segmentLOC
9 -- * Dependencies
10 , compositeC517
11 , compositeC519
12 , compositeC553
13 , simple3227
14 , simple5479
15 ) where
16
17import Text.Edifact.D01B.Composites (compositeC517, compositeC519,
18 compositeC553)
19import Text.Edifact.D01B.Simples (simple3227, simple5479)
20
21import Text.Edifact.Parsing
22import Text.Edifact.Types (Value)
23
24-- | Derived from this specification:
25--
26-- > LOC PLACE/LOCATION IDENTIFICATION
27-- >
28-- > Function: To identify a place or a location and/or related
29-- > locations.
30-- >
31-- > 010 3227 LOCATION FUNCTION CODE QUALIFIER M 1 an..3
32-- >
33-- > 020 C517 LOCATION IDENTIFICATION C 1
34-- > 3225 Location name code C an..25
35-- > 1131 Code list identification code C an..17
36-- > 3055 Code list responsible agency code C an..3
37-- > 3224 Location name C an..256
38-- >
39-- > 030 C519 RELATED LOCATION ONE IDENTIFICATION C 1
40-- > 3223 First related location name code C an..25
41-- > 1131 Code list identification code C an..17
42-- > 3055 Code list responsible agency code C an..3
43-- > 3222 First related location name C an..70
44-- >
45-- > 040 C553 RELATED LOCATION TWO IDENTIFICATION C 1
46-- > 3233 Second related location name code C an..25
47-- > 1131 Code list identification code C an..17
48-- > 3055 Code list responsible agency code C an..3
49-- > 3232 Second related location name C an..70
50-- >
51-- > 050 5479 RELATION CODE C 1 an..3
52--
53-- Dependencies: 'compositeC517', 'compositeC519', 'compositeC553', 'simple3227', 'simple5479'.
54segmentLOC :: Parser Value
55segmentLOC =
56 segment "LOC"
57 [ "010" .@ mandatory simple3227
58 , "020" .@ optional compositeC517
59 , "030" .@ optional compositeC519
60 , "040" .@ optional compositeC553
61 , "050" .@ optional simple5479
62 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/MEA.hs b/specification/src/Text/Edifact/D01B/Segments/MEA.hs
new file mode 100644
index 0000000..9806557
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/MEA.hs
@@ -0,0 +1,54 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.MEA
7 ( -- * Definition
8 segmentMEA
9 -- * Dependencies
10 , compositeC174
11 , compositeC502
12 , simple6311
13 , simple7383
14 ) where
15
16import Text.Edifact.D01B.Composites (compositeC174, compositeC502)
17import Text.Edifact.D01B.Simples (simple6311, simple7383)
18
19import Text.Edifact.Parsing
20import Text.Edifact.Types (Value)
21
22-- | Derived from this specification:
23--
24-- > MEA MEASUREMENTS
25-- >
26-- > Function: To specify physical measurements, including
27-- > dimension tolerances, weights and counts.
28-- >
29-- > 010 6311 MEASUREMENT PURPOSE CODE QUALIFIER M 1 an..3
30-- >
31-- > 020 C502 MEASUREMENT DETAILS C 1
32-- > 6313 Measured attribute code C an..3
33-- > 6321 Measurement significance code C an..3
34-- > 6155 Non-discrete measurement name code C an..17
35-- > 6154 Non-discrete measurement name C an..70
36-- >
37-- > 030 C174 VALUE/RANGE C 1
38-- > 6411 Measurement unit code M an..3
39-- > 6314 Measurement value C an..18
40-- > 6162 Range minimum value C n..18
41-- > 6152 Range maximum value C n..18
42-- > 6432 Significant digits quantity C n..2
43-- >
44-- > 040 7383 SURFACE OR LAYER CODE C 1 an..3
45--
46-- Dependencies: 'compositeC174', 'compositeC502', 'simple6311', 'simple7383'.
47segmentMEA :: Parser Value
48segmentMEA =
49 segment "MEA"
50 [ "010" .@ mandatory simple6311
51 , "020" .@ optional compositeC502
52 , "030" .@ optional compositeC174
53 , "040" .@ optional simple7383
54 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/MOA.hs b/specification/src/Text/Edifact/D01B/Segments/MOA.hs
new file mode 100644
index 0000000..223e1a9
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/MOA.hs
@@ -0,0 +1,36 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.MOA
7 ( -- * Definition
8 segmentMOA
9 -- * Dependencies
10 , compositeC516
11 ) where
12
13import Text.Edifact.D01B.Composites (compositeC516)
14
15import Text.Edifact.Parsing
16import Text.Edifact.Types (Value)
17
18-- | Derived from this specification:
19--
20-- > MOA MONETARY AMOUNT
21-- >
22-- > Function: To specify a monetary amount.
23-- >
24-- > 010 C516 MONETARY AMOUNT M 1
25-- > 5025 Monetary amount type code qualifier M an..3
26-- > 5004 Monetary amount C n..35
27-- > 6345 Currency identification code C an..3
28-- > 6343 Currency type code qualifier C an..3
29-- > 4405 Status description code C an..3
30--
31-- Dependencies: 'compositeC516'.
32segmentMOA :: Parser Value
33segmentMOA =
34 segment "MOA"
35 [ "010" .@ mandatory compositeC516
36 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/NAD.hs b/specification/src/Text/Edifact/D01B/Segments/NAD.hs
new file mode 100644
index 0000000..0f9c39e
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/NAD.hs
@@ -0,0 +1,96 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.NAD
7 ( -- * Definition
8 segmentNAD
9 -- * Dependencies
10 , compositeC058
11 , compositeC059
12 , compositeC080
13 , compositeC082
14 , compositeC819
15 , simple3035
16 , simple3164
17 , simple3207
18 , simple3251
19 ) where
20
21import Text.Edifact.D01B.Composites (compositeC058, compositeC059,
22 compositeC080, compositeC082,
23 compositeC819)
24import Text.Edifact.D01B.Simples (simple3035, simple3164,
25 simple3207, simple3251)
26
27import Text.Edifact.Parsing
28import Text.Edifact.Types (Value)
29
30-- | Derived from this specification:
31--
32-- > NAD NAME AND ADDRESS
33-- >
34-- > Function: To specify the name/address and their related
35-- > function, either by C082 only and/or
36-- > unstructured by C058 or structured by C080 thru
37-- > 3207.
38-- >
39-- > 010 3035 PARTY FUNCTION CODE QUALIFIER M 1 an..3
40-- >
41-- > 020 C082 PARTY IDENTIFICATION DETAILS C 1
42-- > 3039 Party identifier M an..35
43-- > 1131 Code list identification code C an..17
44-- > 3055 Code list responsible agency code C an..3
45-- >
46-- > 030 C058 NAME AND ADDRESS C 1
47-- > 3124 Name and address description M an..35
48-- > 3124 Name and address description C an..35
49-- > 3124 Name and address description C an..35
50-- > 3124 Name and address description C an..35
51-- > 3124 Name and address description C an..35
52-- >
53-- > 040 C080 PARTY NAME C 1
54-- > 3036 Party name M an..35
55-- > 3036 Party name C an..35
56-- > 3036 Party name C an..35
57-- > 3036 Party name C an..35
58-- > 3036 Party name C an..35
59-- > 3045 Party name format code C an..3
60-- >
61-- > 050 C059 STREET C 1
62-- > 3042 Street and number or post office box
63-- > identifier M an..35
64-- > 3042 Street and number or post office box
65-- > identifier C an..35
66-- > 3042 Street and number or post office box
67-- > identifier C an..35
68-- > 3042 Street and number or post office box
69-- > identifier C an..35
70-- >
71-- > 060 3164 CITY NAME C 1 an..35
72-- >
73-- > 070 C819 COUNTRY SUB-ENTITY DETAILS C 1
74-- > 3229 Country sub-entity name code C an..9
75-- > 1131 Code list identification code C an..17
76-- > 3055 Code list responsible agency code C an..3
77-- > 3228 Country sub-entity name C an..70
78-- >
79-- > 080 3251 POSTAL IDENTIFICATION CODE C 1 an..17
80-- >
81-- > 090 3207 COUNTRY NAME CODE C 1 an..3
82--
83-- Dependencies: 'compositeC058', 'compositeC059', 'compositeC080', 'compositeC082', 'compositeC819', 'simple3035', 'simple3164', 'simple3207', 'simple3251'.
84segmentNAD :: Parser Value
85segmentNAD =
86 segment "NAD"
87 [ "010" .@ mandatory simple3035
88 , "020" .@ optional compositeC082
89 , "030" .@ optional compositeC058
90 , "040" .@ optional compositeC080
91 , "050" .@ optional compositeC059
92 , "060" .@ optional simple3164
93 , "070" .@ optional compositeC819
94 , "080" .@ optional simple3251
95 , "090" .@ optional simple3207
96 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/PCD.hs b/specification/src/Text/Edifact/D01B/Segments/PCD.hs
new file mode 100644
index 0000000..773af26
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/PCD.hs
@@ -0,0 +1,41 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.PCD
7 ( -- * Definition
8 segmentPCD
9 -- * Dependencies
10 , compositeC501
11 , simple4405
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC501)
15import Text.Edifact.D01B.Simples (simple4405)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > PCD PERCENTAGE DETAILS
23-- >
24-- > Function: To specify percentage information.
25-- >
26-- > 010 C501 PERCENTAGE DETAILS M 1
27-- > 5245 Percentage type code qualifier M an..3
28-- > 5482 Percentage C n..10
29-- > 5249 Percentage basis identification code C an..3
30-- > 1131 Code list identification code C an..17
31-- > 3055 Code list responsible agency code C an..3
32-- >
33-- > 020 4405 STATUS DESCRIPTION CODE C 1 an..3
34--
35-- Dependencies: 'compositeC501', 'simple4405'.
36segmentPCD :: Parser Value
37segmentPCD =
38 segment "PCD"
39 [ "010" .@ mandatory compositeC501
40 , "020" .@ optional simple4405
41 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/PCI.hs b/specification/src/Text/Edifact/D01B/Segments/PCI.hs
new file mode 100644
index 0000000..afb275b
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/PCI.hs
@@ -0,0 +1,59 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.PCI
7 ( -- * Definition
8 segmentPCI
9 -- * Dependencies
10 , compositeC210
11 , compositeC827
12 , simple4233
13 , simple8275
14 ) where
15
16import Text.Edifact.D01B.Composites (compositeC210, compositeC827)
17import Text.Edifact.D01B.Simples (simple4233, simple8275)
18
19import Text.Edifact.Parsing
20import Text.Edifact.Types (Value)
21
22-- | Derived from this specification:
23--
24-- > PCI PACKAGE IDENTIFICATION
25-- >
26-- > Function: To specify markings and labels on individual
27-- > packages or physical units.
28-- >
29-- > 010 4233 MARKING INSTRUCTIONS CODE C 1 an..3
30-- >
31-- > 020 C210 MARKS & LABELS C 1
32-- > 7102 Shipping marks description M an..35
33-- > 7102 Shipping marks description C an..35
34-- > 7102 Shipping marks description C an..35
35-- > 7102 Shipping marks description C an..35
36-- > 7102 Shipping marks description C an..35
37-- > 7102 Shipping marks description C an..35
38-- > 7102 Shipping marks description C an..35
39-- > 7102 Shipping marks description C an..35
40-- > 7102 Shipping marks description C an..35
41-- > 7102 Shipping marks description C an..35
42-- >
43-- > 030 8275 CONTAINER OR PACKAGE CONTENTS INDICATOR
44-- > CODE C 1 an..3
45-- >
46-- > 040 C827 TYPE OF MARKING C 1
47-- > 7511 Marking type code M an..3
48-- > 1131 Code list identification code C an..17
49-- > 3055 Code list responsible agency code C an..3
50--
51-- Dependencies: 'compositeC210', 'compositeC827', 'simple4233', 'simple8275'.
52segmentPCI :: Parser Value
53segmentPCI =
54 segment "PCI"
55 [ "010" .@ optional simple4233
56 , "020" .@ optional compositeC210
57 , "030" .@ optional simple8275
58 , "040" .@ optional compositeC827
59 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/PIA.hs b/specification/src/Text/Edifact/D01B/Segments/PIA.hs
new file mode 100644
index 0000000..61dd2c1
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/PIA.hs
@@ -0,0 +1,69 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.PIA
7 ( -- * Definition
8 segmentPIA
9 -- * Dependencies
10 , compositeC212
11 , simple4347
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC212)
15import Text.Edifact.D01B.Simples (simple4347)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > PIA ADDITIONAL PRODUCT ID
23-- >
24-- > Function: To specify additional or substitutional item
25-- > identification codes.
26-- >
27-- > 010 4347 PRODUCT IDENTIFIER CODE QUALIFIER M 1 an..3
28-- >
29-- > 020 C212 ITEM NUMBER IDENTIFICATION M 1
30-- > 7140 Item identifier C an..35
31-- > 7143 Item type identification code C an..3
32-- > 1131 Code list identification code C an..17
33-- > 3055 Code list responsible agency code C an..3
34-- >
35-- > 030 C212 ITEM NUMBER IDENTIFICATION C 1
36-- > 7140 Item identifier C an..35
37-- > 7143 Item type identification code C an..3
38-- > 1131 Code list identification code C an..17
39-- > 3055 Code list responsible agency code C an..3
40-- >
41-- > 040 C212 ITEM NUMBER IDENTIFICATION C 1
42-- > 7140 Item identifier C an..35
43-- > 7143 Item type identification code C an..3
44-- > 1131 Code list identification code C an..17
45-- > 3055 Code list responsible agency code C an..3
46-- >
47-- > 050 C212 ITEM NUMBER IDENTIFICATION C 1
48-- > 7140 Item identifier C an..35
49-- > 7143 Item type identification code C an..3
50-- > 1131 Code list identification code C an..17
51-- > 3055 Code list responsible agency code C an..3
52-- >
53-- > 060 C212 ITEM NUMBER IDENTIFICATION C 1
54-- > 7140 Item identifier C an..35
55-- > 7143 Item type identification code C an..3
56-- > 1131 Code list identification code C an..17
57-- > 3055 Code list responsible agency code C an..3
58--
59-- Dependencies: 'compositeC212', 'simple4347'.
60segmentPIA :: Parser Value
61segmentPIA =
62 segment "PIA"
63 [ "010" .@ mandatory simple4347
64 , "020" .@ mandatory compositeC212
65 , "030" .@ optional compositeC212
66 , "040" .@ optional compositeC212
67 , "050" .@ optional compositeC212
68 , "060" .@ optional compositeC212
69 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/PRI.hs b/specification/src/Text/Edifact/D01B/Segments/PRI.hs
new file mode 100644
index 0000000..302c2a8
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/PRI.hs
@@ -0,0 +1,42 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.PRI
7 ( -- * Definition
8 segmentPRI
9 -- * Dependencies
10 , compositeC509
11 , simple5213
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC509)
15import Text.Edifact.D01B.Simples (simple5213)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > PRI PRICE DETAILS
23-- >
24-- > Function: To specify price information.
25-- >
26-- > 010 C509 PRICE INFORMATION C 1
27-- > 5125 Price code qualifier M an..3
28-- > 5118 Price amount C n..15
29-- > 5375 Price type code C an..3
30-- > 5387 Price specification code C an..3
31-- > 5284 Unit price basis value C n..9
32-- > 6411 Measurement unit code C an..3
33-- >
34-- > 020 5213 SUB-LINE ITEM PRICE CHANGE OPERATION CODE C 1 an..3
35--
36-- Dependencies: 'compositeC509', 'simple5213'.
37segmentPRI :: Parser Value
38segmentPRI =
39 segment "PRI"
40 [ "010" .@ optional compositeC509
41 , "020" .@ optional simple5213
42 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/QTY.hs b/specification/src/Text/Edifact/D01B/Segments/QTY.hs
new file mode 100644
index 0000000..5ef207f
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/QTY.hs
@@ -0,0 +1,34 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.QTY
7 ( -- * Definition
8 segmentQTY
9 -- * Dependencies
10 , compositeC186
11 ) where
12
13import Text.Edifact.D01B.Composites (compositeC186)
14
15import Text.Edifact.Parsing
16import Text.Edifact.Types (Value)
17
18-- | Derived from this specification:
19--
20-- > QTY QUANTITY
21-- >
22-- > Function: To specify a pertinent quantity.
23-- >
24-- > 010 C186 QUANTITY DETAILS M 1
25-- > 6063 Quantity type code qualifier M an..3
26-- > 6060 Quantity M an..35
27-- > 6411 Measurement unit code C an..3
28--
29-- Dependencies: 'compositeC186'.
30segmentQTY :: Parser Value
31segmentQTY =
32 segment "QTY"
33 [ "010" .@ mandatory compositeC186
34 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/RFF.hs b/specification/src/Text/Edifact/D01B/Segments/RFF.hs
new file mode 100644
index 0000000..525508c
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/RFF.hs
@@ -0,0 +1,36 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.RFF
7 ( -- * Definition
8 segmentRFF
9 -- * Dependencies
10 , compositeC506
11 ) where
12
13import Text.Edifact.D01B.Composites (compositeC506)
14
15import Text.Edifact.Parsing
16import Text.Edifact.Types (Value)
17
18-- | Derived from this specification:
19--
20-- > RFF REFERENCE
21-- >
22-- > Function: To specify a reference.
23-- >
24-- > 010 C506 REFERENCE M 1
25-- > 1153 Reference code qualifier M an..3
26-- > 1154 Reference identifier C an..70
27-- > 1156 Document line identifier C an..6
28-- > 4000 Reference version identifier C an..35
29-- > 1060 Revision identifier C an..6
30--
31-- Dependencies: 'compositeC506'.
32segmentRFF :: Parser Value
33segmentRFF =
34 segment "RFF"
35 [ "010" .@ mandatory compositeC506
36 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/RNG.hs b/specification/src/Text/Edifact/D01B/Segments/RNG.hs
new file mode 100644
index 0000000..49bba26
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/RNG.hs
@@ -0,0 +1,39 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.RNG
7 ( -- * Definition
8 segmentRNG
9 -- * Dependencies
10 , compositeC280
11 , simple6167
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC280)
15import Text.Edifact.D01B.Simples (simple6167)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > RNG RANGE DETAILS
23-- >
24-- > Function: To identify a range.
25-- >
26-- > 010 6167 RANGE TYPE CODE QUALIFIER M 1 an..3
27-- >
28-- > 020 C280 RANGE C 1
29-- > 6411 Measurement unit code M an..3
30-- > 6162 Range minimum value C n..18
31-- > 6152 Range maximum value C n..18
32--
33-- Dependencies: 'compositeC280', 'simple6167'.
34segmentRNG :: Parser Value
35segmentRNG =
36 segment "RNG"
37 [ "010" .@ mandatory simple6167
38 , "020" .@ optional compositeC280
39 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/SEL.hs b/specification/src/Text/Edifact/D01B/Segments/SEL.hs
new file mode 100644
index 0000000..2549616
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/SEL.hs
@@ -0,0 +1,51 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.SEL
7 ( -- * Definition
8 segmentSEL
9 -- * Dependencies
10 , compositeC208
11 , compositeC215
12 , simple4517
13 , simple9308
14 ) where
15
16import Text.Edifact.D01B.Composites (compositeC208, compositeC215)
17import Text.Edifact.D01B.Simples (simple4517, simple9308)
18
19import Text.Edifact.Parsing
20import Text.Edifact.Types (Value)
21
22-- | Derived from this specification:
23--
24-- > SEL SEAL NUMBER
25-- >
26-- > Function: To specify the seal number or a range of seal
27-- > numbers.
28-- >
29-- > 010 9308 SEAL IDENTIFIER C 1 an..35
30-- >
31-- > 020 C215 SEAL ISSUER C 1
32-- > 9303 Sealing party name code C an..3
33-- > 1131 Code list identification code C an..17
34-- > 3055 Code list responsible agency code C an..3
35-- > 9302 Sealing party name C an..35
36-- >
37-- > 030 4517 SEAL CONDITION CODE C 1 an..3
38-- >
39-- > 040 C208 IDENTITY NUMBER RANGE C 1
40-- > 7402 Object identifier M an..35
41-- > 7402 Object identifier C an..35
42--
43-- Dependencies: 'compositeC208', 'compositeC215', 'simple4517', 'simple9308'.
44segmentSEL :: Parser Value
45segmentSEL =
46 segment "SEL"
47 [ "010" .@ optional simple9308
48 , "020" .@ optional compositeC215
49 , "030" .@ optional simple4517
50 , "040" .@ optional compositeC208
51 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/SEQ.hs b/specification/src/Text/Edifact/D01B/Segments/SEQ.hs
new file mode 100644
index 0000000..daacc6a
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/SEQ.hs
@@ -0,0 +1,41 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.SEQ
7 ( -- * Definition
8 segmentSEQ
9 -- * Dependencies
10 , compositeC286
11 , simple1229
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC286)
15import Text.Edifact.D01B.Simples (simple1229)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > SEQ SEQUENCE DETAILS
23-- >
24-- > Function: To provide details relating to the sequence.
25-- >
26-- > 010 1229 ACTION REQUEST/NOTIFICATION DESCRIPTION
27-- > CODE C 1 an..3
28-- >
29-- > 020 C286 SEQUENCE INFORMATION C 1
30-- > 1050 Sequence position identifier M an..10
31-- > 1159 Sequence identifier source code C an..3
32-- > 1131 Code list identification code C an..17
33-- > 3055 Code list responsible agency code C an..3
34--
35-- Dependencies: 'compositeC286', 'simple1229'.
36segmentSEQ :: Parser Value
37segmentSEQ =
38 segment "SEQ"
39 [ "010" .@ optional simple1229
40 , "020" .@ optional compositeC286
41 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/SGP.hs b/specification/src/Text/Edifact/D01B/Segments/SGP.hs
new file mode 100644
index 0000000..bb9bd98
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/SGP.hs
@@ -0,0 +1,41 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.SGP
7 ( -- * Definition
8 segmentSGP
9 -- * Dependencies
10 , compositeC237
11 , simple7224
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC237)
15import Text.Edifact.D01B.Simples (simple7224)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > SGP SPLIT GOODS PLACEMENT
23-- >
24-- > Function: To specify the placement of goods in relation to
25-- > equipment.
26-- >
27-- > 010 C237 EQUIPMENT IDENTIFICATION M 1
28-- > 8260 Equipment identifier C an..17
29-- > 1131 Code list identification code C an..17
30-- > 3055 Code list responsible agency code C an..3
31-- > 3207 Country name code C an..3
32-- >
33-- > 020 7224 PACKAGE QUANTITY C 1 n..8
34--
35-- Dependencies: 'compositeC237', 'simple7224'.
36segmentSGP :: Parser Value
37segmentSGP =
38 segment "SGP"
39 [ "010" .@ mandatory compositeC237
40 , "020" .@ optional simple7224
41 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/STS.hs b/specification/src/Text/Edifact/D01B/Segments/STS.hs
new file mode 100644
index 0000000..6ef4742
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/STS.hs
@@ -0,0 +1,81 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.STS
7 ( -- * Definition
8 segmentSTS
9 -- * Dependencies
10 , compositeC555
11 , compositeC556
12 , compositeC601
13 ) where
14
15import Text.Edifact.D01B.Composites (compositeC555, compositeC556,
16 compositeC601)
17
18import Text.Edifact.Parsing
19import Text.Edifact.Types (Value)
20
21-- | Derived from this specification:
22--
23-- > STS STATUS
24-- >
25-- > Function: To specify the status of an object or service,
26-- > including its category and the reason(s) for the
27-- > status.
28-- >
29-- > 010 C601 STATUS CATEGORY C 1
30-- > 9015 Status category code M an..3
31-- > 1131 Code list identification code C an..17
32-- > 3055 Code list responsible agency code C an..3
33-- >
34-- > 020 C555 STATUS C 1
35-- > 4405 Status description code M an..3
36-- > 1131 Code list identification code C an..17
37-- > 3055 Code list responsible agency code C an..3
38-- > 4404 Status description C an..35
39-- >
40-- > 030 C556 STATUS REASON C 1
41-- > 9013 Status reason description code M an..3
42-- > 1131 Code list identification code C an..17
43-- > 3055 Code list responsible agency code C an..3
44-- > 9012 Status reason description C an..256
45-- >
46-- > 040 C556 STATUS REASON C 1
47-- > 9013 Status reason description code M an..3
48-- > 1131 Code list identification code C an..17
49-- > 3055 Code list responsible agency code C an..3
50-- > 9012 Status reason description C an..256
51-- >
52-- > 050 C556 STATUS REASON C 1
53-- > 9013 Status reason description code M an..3
54-- > 1131 Code list identification code C an..17
55-- > 3055 Code list responsible agency code C an..3
56-- > 9012 Status reason description C an..256
57-- >
58-- > 060 C556 STATUS REASON C 1
59-- > 9013 Status reason description code M an..3
60-- > 1131 Code list identification code C an..17
61-- > 3055 Code list responsible agency code C an..3
62-- > 9012 Status reason description C an..256
63-- >
64-- > 070 C556 STATUS REASON C 1
65-- > 9013 Status reason description code M an..3
66-- > 1131 Code list identification code C an..17
67-- > 3055 Code list responsible agency code C an..3
68-- > 9012 Status reason description C an..256
69--
70-- Dependencies: 'compositeC555', 'compositeC556', 'compositeC601'.
71segmentSTS :: Parser Value
72segmentSTS =
73 segment "STS"
74 [ "010" .@ optional compositeC601
75 , "020" .@ optional compositeC555
76 , "030" .@ optional compositeC556
77 , "040" .@ optional compositeC556
78 , "050" .@ optional compositeC556
79 , "060" .@ optional compositeC556
80 , "070" .@ optional compositeC556
81 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/TCC.hs b/specification/src/Text/Edifact/D01B/Segments/TCC.hs
new file mode 100644
index 0000000..df46a10
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/TCC.hs
@@ -0,0 +1,67 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.TCC
7 ( -- * Definition
8 segmentTCC
9 -- * Dependencies
10 , compositeC200
11 , compositeC203
12 , compositeC528
13 , compositeC554
14 ) where
15
16import Text.Edifact.D01B.Composites (compositeC200, compositeC203,
17 compositeC528, compositeC554)
18
19import Text.Edifact.Parsing
20import Text.Edifact.Types (Value)
21
22-- | Derived from this specification:
23--
24-- > TCC CHARGE/RATE CALCULATIONS
25-- >
26-- > Function: To specify charges.
27-- >
28-- > 010 C200 CHARGE C 1
29-- > 8023 Freight and other charges description
30-- > identifier C an..17
31-- > 1131 Code list identification code C an..17
32-- > 3055 Code list responsible agency code C an..3
33-- > 8022 Freight and other charges description C an..26
34-- > 4237 Payment arrangement code C an..3
35-- > 7140 Item identifier C an..35
36-- >
37-- > 020 C203 RATE/TARIFF CLASS C 1
38-- > 5243 Rate or tariff class description code M an..9
39-- > 1131 Code list identification code C an..17
40-- > 3055 Code list responsible agency code C an..3
41-- > 5242 Rate or tariff class description C an..35
42-- > 5275 Supplementary rate or tariff code C an..6
43-- > 1131 Code list identification code C an..17
44-- > 3055 Code list responsible agency code C an..3
45-- > 5275 Supplementary rate or tariff code C an..6
46-- > 1131 Code list identification code C an..17
47-- > 3055 Code list responsible agency code C an..3
48-- >
49-- > 030 C528 COMMODITY/RATE DETAIL C 1
50-- > 7357 Commodity identification code C an..18
51-- > 1131 Code list identification code C an..17
52-- > 3055 Code list responsible agency code C an..3
53-- >
54-- > 040 C554 RATE/TARIFF CLASS DETAIL C 1
55-- > 5243 Rate or tariff class description code C an..9
56-- > 1131 Code list identification code C an..17
57-- > 3055 Code list responsible agency code C an..3
58--
59-- Dependencies: 'compositeC200', 'compositeC203', 'compositeC528', 'compositeC554'.
60segmentTCC :: Parser Value
61segmentTCC =
62 segment "TCC"
63 [ "010" .@ optional compositeC200
64 , "020" .@ optional compositeC203
65 , "030" .@ optional compositeC528
66 , "040" .@ optional compositeC554
67 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/TDT.hs b/specification/src/Text/Edifact/D01B/Segments/TDT.hs
new file mode 100644
index 0000000..82315f2
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/TDT.hs
@@ -0,0 +1,90 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.TDT
7 ( -- * Definition
8 segmentTDT
9 -- * Dependencies
10 , compositeC040
11 , compositeC220
12 , compositeC222
13 , compositeC228
14 , compositeC401
15 , simple8028
16 , simple8051
17 , simple8101
18 , simple8281
19 ) where
20
21import Text.Edifact.D01B.Composites (compositeC040, compositeC220,
22 compositeC222, compositeC228,
23 compositeC401)
24import Text.Edifact.D01B.Simples (simple8028, simple8051,
25 simple8101, simple8281)
26
27import Text.Edifact.Parsing
28import Text.Edifact.Types (Value)
29
30-- | Derived from this specification:
31--
32-- > TDT DETAILS OF TRANSPORT
33-- >
34-- > Function: To specify the transport details such as mode of
35-- > transport, means of transport, its conveyance
36-- > reference number and the identification of the
37-- > means of transport.
38-- > The segment may be pointed to by the TPL
39-- > segment.
40-- >
41-- > 010 8051 TRANSPORT STAGE CODE QUALIFIER M 1 an..3
42-- >
43-- > 020 8028 MEANS OF TRANSPORT JOURNEY IDENTIFIER C 1 an..17
44-- >
45-- > 030 C220 MODE OF TRANSPORT C 1
46-- > 8067 Transport mode name code C an..3
47-- > 8066 Transport mode name C an..17
48-- >
49-- > 040 C228 TRANSPORT MEANS C 1
50-- > 8179 Transport means description code C an..8
51-- > 8178 Transport means description C an..17
52-- >
53-- > 050 C040 CARRIER C 1
54-- > 3127 Carrier identifier C an..17
55-- > 1131 Code list identification code C an..17
56-- > 3055 Code list responsible agency code C an..3
57-- > 3128 Carrier name C an..35
58-- >
59-- > 060 8101 TRANSIT DIRECTION INDICATOR CODE C 1 an..3
60-- >
61-- > 070 C401 EXCESS TRANSPORTATION INFORMATION C 1
62-- > 8457 Excess transportation reason code M an..3
63-- > 8459 Excess transportation responsibility code M an..3
64-- > 7130 Customer shipment authorisation
65-- > identifier C an..17
66-- >
67-- > 080 C222 TRANSPORT IDENTIFICATION C 1
68-- > 8213 Transport means identification name
69-- > identifier C an..9
70-- > 1131 Code list identification code C an..17
71-- > 3055 Code list responsible agency code C an..3
72-- > 8212 Transport means identification name C an..35
73-- > 8453 Transport means nationality code C an..3
74-- >
75-- > 090 8281 TRANSPORT MEANS OWNERSHIP INDICATOR CODE C 1 an..3
76--
77-- Dependencies: 'compositeC040', 'compositeC220', 'compositeC222', 'compositeC228', 'compositeC401', 'simple8028', 'simple8051', 'simple8101', 'simple8281'.
78segmentTDT :: Parser Value
79segmentTDT =
80 segment "TDT"
81 [ "010" .@ mandatory simple8051
82 , "020" .@ optional simple8028
83 , "030" .@ optional compositeC220
84 , "040" .@ optional compositeC228
85 , "050" .@ optional compositeC040
86 , "060" .@ optional simple8101
87 , "070" .@ optional compositeC401
88 , "080" .@ optional compositeC222
89 , "090" .@ optional simple8281
90 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/TMD.hs b/specification/src/Text/Edifact/D01B/Segments/TMD.hs
new file mode 100644
index 0000000..8da1b95
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/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.D01B.Segments.TMD
7 ( -- * Definition
8 segmentTMD
9 -- * Dependencies
10 , compositeC219
11 , simple8332
12 , simple8341
13 ) where
14
15import Text.Edifact.D01B.Composites (compositeC219)
16import Text.Edifact.D01B.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
26-- > details for a goods item or equipment (which may
27-- > differ from the contractual conditions).
28-- >
29-- > 010 C219 MOVEMENT TYPE C 1
30-- > 8335 Movement type description code C an..3
31-- > 8334 Movement type description C an..35
32-- >
33-- > 020 8332 EQUIPMENT PLAN DESCRIPTION C 1 an..26
34-- >
35-- > 030 8341 HAULAGE ARRANGEMENTS CODE C 1 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 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/TMP.hs b/specification/src/Text/Edifact/D01B/Segments/TMP.hs
new file mode 100644
index 0000000..b78f915
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/TMP.hs
@@ -0,0 +1,38 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.TMP
7 ( -- * Definition
8 segmentTMP
9 -- * Dependencies
10 , compositeC239
11 , simple6245
12 ) where
13
14import Text.Edifact.D01B.Composites (compositeC239)
15import Text.Edifact.D01B.Simples (simple6245)
16
17import Text.Edifact.Parsing
18import Text.Edifact.Types (Value)
19
20-- | Derived from this specification:
21--
22-- > TMP TEMPERATURE
23-- >
24-- > Function: To specify the temperature setting.
25-- >
26-- > 010 6245 TEMPERATURE TYPE CODE QUALIFIER M 1 an..3
27-- >
28-- > 020 C239 TEMPERATURE SETTING C 1
29-- > 6246 Temperature value C n..15
30-- > 6411 Measurement unit code C an..3
31--
32-- Dependencies: 'compositeC239', 'simple6245'.
33segmentTMP :: Parser Value
34segmentTMP =
35 segment "TMP"
36 [ "010" .@ mandatory simple6245
37 , "020" .@ optional compositeC239
38 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/TOD.hs b/specification/src/Text/Edifact/D01B/Segments/TOD.hs
new file mode 100644
index 0000000..8a77d32
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/TOD.hs
@@ -0,0 +1,46 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.TOD
7 ( -- * Definition
8 segmentTOD
9 -- * Dependencies
10 , compositeC100
11 , simple4055
12 , simple4215
13 ) where
14
15import Text.Edifact.D01B.Composites (compositeC100)
16import Text.Edifact.D01B.Simples (simple4055, simple4215)
17
18import Text.Edifact.Parsing
19import Text.Edifact.Types (Value)
20
21-- | Derived from this specification:
22--
23-- > TOD TERMS OF DELIVERY OR TRANSPORT
24-- >
25-- > Function: To specify terms of delivery or transport.
26-- >
27-- > 010 4055 DELIVERY OR TRANSPORT TERMS FUNCTION CODE C 1 an..3
28-- >
29-- > 020 4215 TRANSPORT CHARGES PAYMENT METHOD CODE C 1 an..3
30-- >
31-- > 030 C100 TERMS OF DELIVERY OR TRANSPORT C 1
32-- > 4053 Delivery or transport terms description
33-- > code C an..3
34-- > 1131 Code list identification code C an..17
35-- > 3055 Code list responsible agency code C an..3
36-- > 4052 Delivery or transport terms description C an..70
37-- > 4052 Delivery or transport terms description C an..70
38--
39-- Dependencies: 'compositeC100', 'simple4055', 'simple4215'.
40segmentTOD :: Parser Value
41segmentTOD =
42 segment "TOD"
43 [ "010" .@ optional simple4055
44 , "020" .@ optional simple4215
45 , "030" .@ optional compositeC100
46 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/TPL.hs b/specification/src/Text/Edifact/D01B/Segments/TPL.hs
new file mode 100644
index 0000000..568adfc
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/TPL.hs
@@ -0,0 +1,39 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.TPL
7 ( -- * Definition
8 segmentTPL
9 -- * Dependencies
10 , compositeC222
11 ) where
12
13import Text.Edifact.D01B.Composites (compositeC222)
14
15import Text.Edifact.Parsing
16import Text.Edifact.Types (Value)
17
18-- | Derived from this specification:
19--
20-- > TPL TRANSPORT PLACEMENT
21-- >
22-- > Function: To specify placement of goods or equipment in
23-- > relation to the transport used. The segment
24-- > serves as a pointer to the TDT segment group.
25-- >
26-- > 010 C222 TRANSPORT IDENTIFICATION M 1
27-- > 8213 Transport means identification name
28-- > identifier C an..9
29-- > 1131 Code list identification code C an..17
30-- > 3055 Code list responsible agency code C an..3
31-- > 8212 Transport means identification name C an..35
32-- > 8453 Transport means nationality code C an..3
33--
34-- Dependencies: 'compositeC222'.
35segmentTPL :: Parser Value
36segmentTPL =
37 segment "TPL"
38 [ "010" .@ mandatory compositeC222
39 ]
diff --git a/specification/src/Text/Edifact/D01B/Segments/TSR.hs b/specification/src/Text/Edifact/D01B/Segments/TSR.hs
new file mode 100644
index 0000000..3a87475
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Segments/TSR.hs
@@ -0,0 +1,61 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Segments.TSR
7 ( -- * Definition
8 segmentTSR
9 -- * Dependencies
10 , compositeC233
11 , compositeC536
12 , compositeC537
13 , compositeC703
14 ) where
15
16import Text.Edifact.D01B.Composites (compositeC233, compositeC536,
17 compositeC537, compositeC703)
18
19import Text.Edifact.Parsing
20import Text.Edifact.Types (Value)
21
22-- | Derived from this specification:
23--
24-- > TSR TRANSPORT SERVICE REQUIREMENTS
25-- >
26-- > Function: To specify the contract and carriage conditions
27-- > and service and priority requirements for the
28-- > transport.
29-- >
30-- > 010 C536 CONTRACT AND CARRIAGE CONDITION C 1
31-- > 4065 Contract and carriage condition code M an..3
32-- > 1131 Code list identification code C an..17
33-- > 3055 Code list responsible agency code C an..3
34-- >
35-- > 020 C233 SERVICE C 1
36-- > 7273 Service requirement code M an..3
37-- > 1131 Code list identification code C an..17
38-- > 3055 Code list responsible agency code C an..3
39-- > 7273 Service requirement code C an..3
40-- > 1131 Code list identification code C an..17
41-- > 3055 Code list responsible agency code C an..3
42-- >
43-- > 030 C537 TRANSPORT PRIORITY C 1
44-- > 4219 Transport service priority code M an..3
45-- > 1131 Code list identification code C an..17
46-- > 3055 Code list responsible agency code C an..3
47-- >
48-- > 040 C703 NATURE OF CARGO C 1
49-- > 7085 Cargo type classification code M an..3
50-- > 1131 Code list identification code C an..17
51-- > 3055 Code list responsible agency code C an..3
52--
53-- Dependencies: 'compositeC233', 'compositeC536', 'compositeC537', 'compositeC703'.
54segmentTSR :: Parser Value
55segmentTSR =
56 segment "TSR"
57 [ "010" .@ optional compositeC536
58 , "020" .@ optional compositeC233
59 , "030" .@ optional compositeC537
60 , "040" .@ optional compositeC703
61 ]
generated by cgit v1.2.3 (git 2.25.1) at 2024-12-12 15:41:25 +0000