aboutsummaryrefslogtreecommitdiffhomepage
path: root/specification/src/Text/Edifact/D01B/Messages/IFCSUM.hs
diff options
context:
space:
mode:
Diffstat (limited to 'specification/src/Text/Edifact/D01B/Messages/IFCSUM.hs')
-rw-r--r--specification/src/Text/Edifact/D01B/Messages/IFCSUM.hs1068
1 files changed, 1068 insertions, 0 deletions
diff --git a/specification/src/Text/Edifact/D01B/Messages/IFCSUM.hs b/specification/src/Text/Edifact/D01B/Messages/IFCSUM.hs
new file mode 100644
index 0000000..a7fa4bd
--- /dev/null
+++ b/specification/src/Text/Edifact/D01B/Messages/IFCSUM.hs
@@ -0,0 +1,1068 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D01B.Messages.IFCSUM
7 ( -- * Definition
8 messageIFCSUM
9 -- * Dependencies
10 , segmentBGM
11 , segmentCNI
12 , segmentCNT
13 , segmentCOM
14 , segmentCPI
15 , segmentCTA
16 , segmentCUX
17 , segmentDGS
18 , segmentDIM
19 , segmentDOC
20 , segmentDTM
21 , segmentEQA
22 , segmentEQD
23 , segmentEQN
24 , segmentFTX
25 , segmentGDS
26 , segmentGID
27 , segmentGIN
28 , segmentGOR
29 , segmentHAN
30 , segmentICD
31 , segmentLOC
32 , segmentMEA
33 , segmentMOA
34 , segmentNAD
35 , segmentPCD
36 , segmentPCI
37 , segmentPIA
38 , segmentPRI
39 , segmentQTY
40 , segmentRFF
41 , segmentRNG
42 , segmentSEL
43 , segmentSEQ
44 , segmentSGP
45 , segmentTCC
46 , segmentTDT
47 , segmentTMD
48 , segmentTMP
49 , segmentTOD
50 , segmentTPL
51 , segmentTSR
52 ) where
53
54import Text.Edifact.Common.Segments
55
56import Text.Edifact.D01B.Segments (segmentBGM, segmentCNI,
57 segmentCNT, segmentCOM,
58 segmentCPI, segmentCTA,
59 segmentCUX, segmentDGS,
60 segmentDIM, segmentDOC,
61 segmentDTM, segmentEQA,
62 segmentEQD, segmentEQN,
63 segmentFTX, segmentGDS,
64 segmentGID, segmentGIN,
65 segmentGOR, segmentHAN,
66 segmentICD, segmentLOC,
67 segmentMEA, segmentMOA,
68 segmentNAD, segmentPCD,
69 segmentPCI, segmentPIA,
70 segmentPRI, segmentQTY,
71 segmentRFF, segmentRNG,
72 segmentSEL, segmentSEQ,
73 segmentSGP, segmentTCC,
74 segmentTDT, segmentTMD,
75 segmentTMP, segmentTOD,
76 segmentTPL, segmentTSR)
77
78import Text.Edifact.Parsing
79import Text.Edifact.Types (Value)
80
81-- | Derived from this specification:
82--
83-- > 4.3 Message structure
84-- >
85-- > 4.3.1 Segment table
86-- >
87-- > Pos Tag Name S R
88-- >
89-- > 0010 UNH Message header M 1
90-- > 0020 BGM Beginning of message M 1
91-- > 0030 DTM Date/time/period C 9
92-- > 0040 MOA Monetary amount C 99
93-- > 0050 FTX Free text C 99
94-- > 0060 CNT Control total C 9
95-- > 0070 PCD Percentage details C 1
96-- > 0080 GDS Nature of cargo C 9
97-- >
98-- > 0090 ----- Segment group 1 ------------------ C 9-----------+
99-- > 0100 RFF Reference M 1 |
100-- > 0110 DTM Date/time/period C 9-----------+
101-- >
102-- > 0120 ----- Segment group 2 ------------------ C 9-----------+
103-- > 0130 GOR Governmental requirements M 1 |
104-- > 0140 DTM Date/time/period C 9 |
105-- > 0150 LOC Place/location identification C 9 |
106-- > 0160 SEL Seal number C 9 |
107-- > 0170 FTX Free text C 9 |
108-- > |
109-- > 0180 ----- Segment group 3 ------------------ C 9----------+|
110-- > 0190 DOC Document/message details M 1 ||
111-- > 0200 DTM Date/time/period C 1----------++
112-- >
113-- > 0210 ----- Segment group 4 ------------------ C 9-----------+
114-- > 0220 NAD Name and address M 1 |
115-- > |
116-- > 0230 ----- Segment group 5 ------------------ C 9----------+|
117-- > 0240 CTA Contact information M 1 ||
118-- > 0250 COM Communication contact C 9----------+|
119-- > |
120-- > 0260 ----- Segment group 6 ------------------ C 9----------+|
121-- > 0270 RFF Reference M 1 ||
122-- > 0280 DTM Date/time/period C 9----------++
123-- >
124-- > 0290 ----- Segment group 7 ------------------ C 9-----------+
125-- > 0300 TCC Charge/rate calculations M 1 |
126-- > 0310 CUX Currencies C 1 |
127-- > 0320 PRI Price details C 1 |
128-- > 0330 EQN Number of units C 1 |
129-- > 0340 PCD Percentage details C 1 |
130-- > 0350 MOA Monetary amount C 9 |
131-- > 0360 QTY Quantity C 9 |
132-- > 0370 LOC Place/location identification C 9-----------+
133-- >
134-- > 0380 ----- Segment group 8 ------------------ C 99----------+
135-- > 0390 ICD Insurance cover description M 1 |
136-- > 0400 DTM Date/time/period C 1 |
137-- > 0410 FTX Free text C 9-----------+
138-- >
139-- > 0420 ----- Segment group 9 ------------------ C 9-----------+
140-- > 0430 TDT Details of transport M 1 |
141-- > 0440 DTM Date/time/period C 9 |
142-- > 0450 TSR Transport service requirements C 9 |
143-- > |
144-- > 0460 ----- Segment group 10 ------------------ C 9----------+|
145-- > 0470 LOC Place/location identification M 1 ||
146-- > 0480 DTM Date/time/period C 9----------+|
147-- > 0490 SEL Seal number C 9 |
148-- > 0500 FTX Free text C 9 |
149-- > |
150-- > 0510 ----- Segment group 11 ------------------ C 9----------+|
151-- > 0520 MEA Measurements M 1 ||
152-- > 0530 EQN Number of units C 1----------+|
153-- > |
154-- > 0540 ----- Segment group 12 ------------------ C 9----------+|
155-- > 0550 DIM Dimensions M 1 ||
156-- > 0560 EQN Number of units C 1----------+|
157-- > |
158-- > 0570 ----- Segment group 13 ------------------ C 9----------+|
159-- > 0580 CTA Contact information M 1 ||
160-- > 0590 COM Communication contact C 9----------+|
161-- > |
162-- > 0600 ----- Segment group 14 ------------------ C 99---------+|
163-- > 0610 TCC Charge/rate calculations M 1 ||
164-- > 0620 MOA Monetary amount C 9 ||
165-- > 0630 PCD Percentage details C 1----------+|
166-- > |
167-- > 0640 ----- Segment group 15 ------------------ C 99---------+|
168-- > 0650 ICD Insurance cover description M 1 ||
169-- > 0660 DTM Date/time/period C 1 ||
170-- > 0670 FTX Free text C 9----------+|
171-- > |
172-- > 0680 ----- Segment group 16 ------------------ C 9----------+|
173-- > 0690 NAD Name and address M 1 ||
174-- > 0700 LOC Place/location identification C 9 ||
175-- > ||
176-- > 0710 ----- Segment group 17 ------------------ C 9---------+||
177-- > 0720 CTA Contact information M 1 |||
178-- > 0730 COM Communication contact C 9---------+||
179-- > ||
180-- > 0740 ----- Segment group 18 ------------------ C 9---------+||
181-- > 0750 DOC Document/message details M 1 |||
182-- > 0760 DTM Date/time/period C 1---------+||
183-- > ||
184-- > 0770 ----- Segment group 19 ------------------ C 9---------+||
185-- > 0780 TCC Charge/rate calculations M 1 |||
186-- > 0790 CUX Currencies C 1 |||
187-- > 0800 PRI Price details C 1 |||
188-- > 0810 EQN Number of units C 1 |||
189-- > 0820 PCD Percentage details C 1 |||
190-- > 0830 MOA Monetary amount C 9 |||
191-- > 0840 QTY Quantity C 9---------+||
192-- > ||
193-- > 0850 ----- Segment group 20 ------------------ C 9---------+||
194-- > 0860 RFF Reference M 1 |||
195-- > 0870 DTM Date/time/period C 9---------+++
196-- >
197-- > 0880 ----- Segment group 21 ------------------ C 999---------+
198-- > 0890 EQD Equipment details M 1 |
199-- > 0900 EQN Number of units C 1 |
200-- > 0910 TPL Transport placement C 1 |
201-- > 0920 TMD Transport movement details C 1 |
202-- > 0930 MEA Measurements C 9 |
203-- > 0940 DIM Dimensions C 9 |
204-- > 0950 SEL Seal number C 9 |
205-- > 0960 NAD Name and address C 9 |
206-- > 0970 LOC Place/location identification C 9 |
207-- > 0980 HAN Handling instructions C 1 |
208-- > 0990 TMP Temperature C 1 |
209-- > 1000 FTX Free text C 9 |
210-- > 1010 RFF Reference C 9 |
211-- > 1020 PCD Percentage details C 9 |
212-- > |
213-- > 1030 ----- Segment group 22 ------------------ C 99---------+|
214-- > 1040 EQA Attached equipment M 1 ||
215-- > 1050 EQN Number of units C 1----------+|
216-- > |
217-- > 1060 ----- Segment group 23 ------------------ C 99---------+|
218-- > 1070 DGS Dangerous goods M 1 ||
219-- > 1080 FTX Free text C 9 ||
220-- > ||
221-- > 1090 ----- Segment group 24 ------------------ M 1---------+||
222-- > 1100 CTA Contact information M 1 |||
223-- > 1110 COM Communication contact C 9---------+++
224-- >
225-- > 1120 ----- Segment group 25 ------------------ C 9999--------+
226-- > 1130 CNI Consignment information M 1 |
227-- > |
228-- > 1140 ----- Segment group 26 ------------------ C 9----------+|
229-- > 1150 SGP Split goods placement M 1 ||
230-- > ||
231-- > 1160 ----- Segment group 27 ------------------ C 9---------+||
232-- > 1170 MEA Measurements M 1 |||
233-- > 1180 EQN Number of units C 1---------++|
234-- > |
235-- > 1190 ----- Segment group 28 ------------------ C 9----------+|
236-- > 1200 TPL Transport placement M 1 ||
237-- > ||
238-- > 1210 ----- Segment group 29 ------------------ C 9---------+||
239-- > 1220 MEA Measurements M 1 |||
240-- > 1230 EQN Number of units C 1---------++|
241-- > 1240 CTA Contact information C 1 |
242-- > 1250 COM Communication contact C 9 |
243-- > 1260 DTM Date/time/period C 9 |
244-- > 1270 CNT Control total C 9 |
245-- > 1280 TSR Transport service requirements C 9 |
246-- > 1290 CUX Currencies C 9 |
247-- > 1300 PCD Percentage details C 9 |
248-- > 1310 MOA Monetary amount C 99 |
249-- > 1320 FTX Free text C 99 |
250-- > 1330 GDS Nature of cargo C 9 |
251-- > |
252-- > 1340 ----- Segment group 30 ------------------ C 99---------+|
253-- > 1350 LOC Place/location identification M 1 ||
254-- > 1360 DTM Date/time/period C 9----------+|
255-- > |
256-- > 1370 ----- Segment group 31 ------------------ C 2----------+|
257-- > 1380 TOD Terms of delivery or transport M 1 ||
258-- > 1390 LOC Place/location identification C 9----------+|
259-- > |
260-- > 1400 ----- Segment group 32 ------------------ C 999--------+|
261-- > 1410 RFF Reference M 1 ||
262-- > 1420 DTM Date/time/period C 9----------+|
263-- > |
264-- > 1430 ----- Segment group 33 ------------------ C 9----------+|
265-- > 1440 GOR Governmental requirements M 1 ||
266-- > 1450 DTM Date/time/period C 9 ||
267-- > 1460 LOC Place/location identification C 9 ||
268-- > 1470 SEL Seal number C 9 ||
269-- > 1480 FTX Free text C 9 ||
270-- > ||
271-- > 1490 ----- Segment group 34 ------------------ C 9---------+||
272-- > 1500 DOC Document/message details M 1 |||
273-- > 1510 DTM Date/time/period C 1---------++|
274-- > |
275-- > 1520 ----- Segment group 35 ------------------ C 9----------+|
276-- > 1530 CPI Charge payment instructions M 1 ||
277-- > 1540 RFF Reference C 99 ||
278-- > 1550 CUX Currencies C 1 ||
279-- > 1560 LOC Place/location identification C 9 ||
280-- > 1570 MOA Monetary amount C 9----------+|
281-- > |
282-- > 1580 ----- Segment group 36 ------------------ C 99---------+|
283-- > 1590 TCC Charge/rate calculations M 1 ||
284-- > 1600 LOC Place/location identification C 1 ||
285-- > 1610 FTX Free text C 1 ||
286-- > 1620 CUX Currencies C 1 ||
287-- > 1630 PRI Price details C 1 ||
288-- > 1640 EQN Number of units C 1 ||
289-- > 1650 PCD Percentage details C 1 ||
290-- > 1660 MOA Monetary amount C 9 ||
291-- > 1670 QTY Quantity C 9----------+|
292-- > |
293-- > 1680 ----- Segment group 37 ------------------ C 99---------+|
294-- > 1690 ICD Insurance cover description M 1 ||
295-- > 1700 DTM Date/time/period C 1 ||
296-- > 1710 FTX Free text C 9----------+|
297-- > |
298-- > 1720 ----- Segment group 38 ------------------ C 99---------+|
299-- > 1730 TDT Details of transport M 1 ||
300-- > 1740 DTM Date/time/period C 9 ||
301-- > 1750 TSR Transport service requirements C 9 ||
302-- > ||
303-- > 1760 ----- Segment group 39 ------------------ C 99--------+||
304-- > 1770 LOC Place/location identification M 1 |||
305-- > 1780 DTM Date/time/period C 9---------+||
306-- > ||
307-- > 1790 ----- Segment group 40 ------------------ C 9---------+||
308-- > 1800 RFF Reference M 1 |||
309-- > 1810 DTM Date/time/period C 1---------+||
310-- > ||
311-- > 1820 ----- Segment group 41 ------------------ C 99--------+||
312-- > 1830 TCC Charge/rate calculations M 1 |||
313-- > 1840 MOA Monetary amount C 9 |||
314-- > 1850 PCD Percentage details C 1---------+||
315-- > ||
316-- > 1860 ----- Segment group 42 ------------------ C 99--------+||
317-- > 1870 ICD Insurance cover description M 1 |||
318-- > 1880 DTM Date/time/period C 1 |||
319-- > 1890 FTX Free text C 9---------++|
320-- > |
321-- > 1900 ----- Segment group 43 ------------------ C 99---------+|
322-- > 1910 NAD Name and address M 1 ||
323-- > 1920 LOC Place/location identification C 9 ||
324-- > 1930 MOA Monetary amount C 9 ||
325-- > ||
326-- > 1940 ----- Segment group 44 ------------------ C 9---------+||
327-- > 1950 CTA Contact information M 1 |||
328-- > 1960 COM Communication contact C 9---------+||
329-- > ||
330-- > 1970 ----- Segment group 45 ------------------ C 9---------+||
331-- > 1980 DOC Document/message details M 1 |||
332-- > 1990 DTM Date/time/period C 1---------+||
333-- > ||
334-- > 2000 ----- Segment group 46 ------------------ C 99--------+||
335-- > 2010 TCC Charge/rate calculations M 1 |||
336-- > 2020 CUX Currencies C 1 |||
337-- > 2030 PRI Price details C 1 |||
338-- > 2040 EQN Number of units C 1 |||
339-- > 2050 PCD Percentage details C 1 |||
340-- > 2060 MOA Monetary amount C 9 |||
341-- > 2070 QTY Quantity C 9---------+||
342-- > ||
343-- > 2080 ----- Segment group 47 ------------------ C 9---------+||
344-- > 2090 RFF Reference M 1 |||
345-- > 2100 DTM Date/time/period C 9---------+||
346-- > ||
347-- > 2110 ----- Segment group 48 ------------------ C 9---------+||
348-- > 2120 CPI Charge payment instructions M 1 |||
349-- > 2130 RFF Reference C 99 |||
350-- > 2140 CUX Currencies C 1 |||
351-- > 2150 LOC Place/location identification C 9 |||
352-- > 2160 MOA Monetary amount C 9---------+||
353-- > ||
354-- > 2170 ----- Segment group 49 ------------------ C 99--------+||
355-- > 2180 TSR Transport service requirements M 1 |||
356-- > 2190 RFF Reference C 1 |||
357-- > 2200 LOC Place/location identification C 1 |||
358-- > 2210 TPL Transport placement C 1 |||
359-- > 2220 FTX Free text C 9---------++|
360-- > |
361-- > 2230 ----- Segment group 50 ------------------ C 999--------+|
362-- > 2240 GID Goods item details M 1 ||
363-- > 2250 HAN Handling instructions C 1 ||
364-- > 2260 TMP Temperature C 1 ||
365-- > 2270 RNG Range details C 1 ||
366-- > 2280 TMD Transport movement details C 1 ||
367-- > 2290 LOC Place/location identification C 9 ||
368-- > 2300 MOA Monetary amount C 9 ||
369-- > 2310 PIA Additional product id C 9 ||
370-- > 2320 GIN Goods identity number C 99 ||
371-- > 2330 FTX Free text C 9 ||
372-- > ||
373-- > 2340 ----- Segment group 51 ------------------ C 9---------+||
374-- > 2350 NAD Name and address M 1 |||
375-- > 2360 DTM Date/time/period C 1---------+||
376-- > 2370 GDS Nature of cargo C 9 ||
377-- > ||
378-- > 2380 ----- Segment group 52 ------------------ C 99--------+||
379-- > 2390 MEA Measurements M 1 |||
380-- > 2400 EQN Number of units C 1---------+||
381-- > ||
382-- > 2410 ----- Segment group 53 ------------------ C 99--------+||
383-- > 2420 DIM Dimensions M 1 |||
384-- > 2430 EQN Number of units C 1---------+||
385-- > ||
386-- > 2440 ----- Segment group 54 ------------------ C 9---------+||
387-- > 2450 RFF Reference M 1 |||
388-- > 2460 DTM Date/time/period C 9---------+||
389-- > ||
390-- > 2470 ----- Segment group 55 ------------------ C 999-------+||
391-- > 2480 PCI Package identification M 1 |||
392-- > 2490 RFF Reference C 1 |||
393-- > 2500 DTM Date/time/period C 1 |||
394-- > 2510 GIN Goods identity number C 9 |||
395-- > 2520 MEA Measurements C 9 |||
396-- > 2530 DIM Dimensions C 1 |||
397-- > 2540 FTX Free text C 9---------+||
398-- > ||
399-- > 2550 ----- Segment group 56 ------------------ C 9---------+||
400-- > 2560 DOC Document/message details M 1 |||
401-- > 2570 DTM Date/time/period C 9---------+||
402-- > ||
403-- > 2580 ----- Segment group 57 ------------------ C 9---------+||
404-- > 2590 GOR Governmental requirements M 1 |||
405-- > 2600 DTM Date/time/period C 9 |||
406-- > 2610 LOC Place/location identification C 9 |||
407-- > 2620 SEL Seal number C 9 |||
408-- > 2630 FTX Free text C 9 |||
409-- > |||
410-- > 2640 ----- Segment group 58 ------------------ C 9--------+|||
411-- > 2650 DOC Document/message details M 1 ||||
412-- > 2660 DTM Date/time/period C 1--------++||
413-- > ||
414-- > 2670 ----- Segment group 59 ------------------ C 9---------+||
415-- > 2680 TPL Transport placement M 1 |||
416-- > |||
417-- > 2690 ----- Segment group 60 ------------------ C 9--------+|||
418-- > 2700 MEA Measurements M 1 ||||
419-- > 2710 EQN Number of units C 1--------++||
420-- > ||
421-- > 2720 ----- Segment group 61 ------------------ C 999-------+||
422-- > 2730 SGP Split goods placement M 1 |||
423-- > 2740 SEQ Sequence details C 1 |||
424-- > |||
425-- > 2750 ----- Segment group 62 ------------------ C 9--------+|||
426-- > 2760 MEA Measurements M 1 ||||
427-- > 2770 EQN Number of units C 1--------++||
428-- > ||
429-- > 2780 ----- Segment group 63 ------------------ C 99--------+||
430-- > 2790 TCC Charge/rate calculations M 1 |||
431-- > 2800 CUX Currencies C 1 |||
432-- > 2810 PRI Price details C 1 |||
433-- > 2820 EQN Number of units C 1 |||
434-- > 2830 PCD Percentage details C 1 |||
435-- > 2840 MOA Monetary amount C 9 |||
436-- > 2850 QTY Quantity C 9 |||
437-- > 2860 LOC Place/location identification C 9---------+||
438-- > ||
439-- > 2870 ----- Segment group 64 ------------------ C 99--------+||
440-- > 2880 ICD Insurance cover description M 1 |||
441-- > 2890 DTM Date/time/period C 1 |||
442-- > 2900 FTX Free text C 9---------+||
443-- > ||
444-- > 2910 ----- Segment group 65 ------------------ C 99--------+||
445-- > 2920 DGS Dangerous goods M 1 |||
446-- > 2930 FTX Free text C 99 |||
447-- > |||
448-- > 2940 ----- Segment group 66 ------------------ C 9--------+|||
449-- > 2950 CTA Contact information M 1 ||||
450-- > 2960 COM Communication contact C 9--------+|||
451-- > |||
452-- > 2970 ----- Segment group 67 ------------------ C 9--------+|||
453-- > 2980 MEA Measurements M 1 ||||
454-- > 2990 EQN Number of units C 1--------+|||
455-- > |||
456-- > 3000 ----- Segment group 68 ------------------ C 999------+|||
457-- > 3010 SGP Split goods placement M 1 ||||
458-- > ||||
459-- > 3020 ----- Segment group 69 ------------------ C 9-------+||||
460-- > 3030 MEA Measurements M 1 |||||
461-- > 3040 EQN Number of units C 1-------++++|
462-- > |
463-- > 3050 ----- Segment group 70 ------------------ C 999--------+|
464-- > 3060 EQD Equipment details M 1 ||
465-- > 3070 EQN Number of units C 1 ||
466-- > 3080 TMD Transport movement details C 1 ||
467-- > 3090 MEA Measurements C 9 ||
468-- > 3100 DIM Dimensions C 9 ||
469-- > 3110 SEL Seal number C 99 ||
470-- > 3120 TPL Transport placement C 9 ||
471-- > 3130 HAN Handling instructions C 1 ||
472-- > 3140 TMP Temperature C 1 ||
473-- > 3150 FTX Free text C 9 ||
474-- > 3160 PCD Percentage details C 9 ||
475-- > ||
476-- > 3170 ----- Segment group 71 ------------------ C 99--------+||
477-- > 3180 TCC Charge/rate calculations M 1 |||
478-- > 3190 CUX Currencies C 1 |||
479-- > 3200 PRI Price details C 1 |||
480-- > 3210 EQN Number of units C 1 |||
481-- > 3220 PCD Percentage details C 1 |||
482-- > 3230 MOA Monetary amount C 9 |||
483-- > 3240 QTY Quantity C 9---------+||
484-- > ||
485-- > 3250 ----- Segment group 72 ------------------ C 9---------+||
486-- > 3260 NAD Name and address M 1 |||
487-- > 3270 DTM Date/time/period C 1---------+||
488-- > ||
489-- > 3280 ----- Segment group 73 ------------------ C 99--------+||
490-- > 3290 EQA Attached equipment M 1 |||
491-- > 3300 EQN Number of units C 1---------+||
492-- > ||
493-- > 3310 ----- Segment group 74 ------------------ C 99--------+||
494-- > 3320 DGS Dangerous goods M 1 |||
495-- > 3330 FTX Free text C 9 |||
496-- > |||
497-- > 3340 ----- Segment group 75 ------------------ C 9--------+|||
498-- > 3350 CTA Contact information M 1 ||||
499-- > 3360 COM Communication contact C 9--------++++
500-- > 3370 UNT Message trailer M 1
501--
502-- Dependencies: 'segmentBGM', 'segmentCNI', 'segmentCNT', 'segmentCOM', 'segmentCPI', 'segmentCTA', 'segmentCUX', 'segmentDGS', 'segmentDIM', 'segmentDOC', 'segmentDTM', 'segmentEQA', 'segmentEQD', 'segmentEQN', 'segmentFTX', 'segmentGDS', 'segmentGID', 'segmentGIN', 'segmentGOR', 'segmentHAN', 'segmentICD', 'segmentLOC', 'segmentMEA', 'segmentMOA', 'segmentNAD', 'segmentPCD', 'segmentPCI', 'segmentPIA', 'segmentPRI', 'segmentQTY', 'segmentRFF', 'segmentRNG', 'segmentSEL', 'segmentSEQ', 'segmentSGP', 'segmentTCC', 'segmentTDT', 'segmentTMD', 'segmentTMP', 'segmentTOD', 'segmentTPL', 'segmentTSR'.
503messageIFCSUM :: Parser Value
504messageIFCSUM =
505 message "IFCSUM"
506 [ "0010" .@ once segmentUNH
507 , "0020" .@ once segmentBGM
508 , "0030" .@ repeated 9 segmentDTM
509 , "0040" .@ repeated 99 segmentMOA
510 , "0050" .@ repeated 99 segmentFTX
511 , "0060" .@ repeated 9 segmentCNT
512 , "0070" .@ maybeOnce segmentPCD
513 , "0080" .@ repeated 9 segmentGDS
514 , "0090" .@ repeated 9 (
515 segmentGroup "1"
516 [ "0100" .@ once segmentRFF
517 , "0110" .@ repeated 9 segmentDTM
518 ]
519 )
520 , "0120" .@ repeated 9 (
521 segmentGroup "2"
522 [ "0130" .@ once segmentGOR
523 , "0140" .@ repeated 9 segmentDTM
524 , "0150" .@ repeated 9 segmentLOC
525 , "0160" .@ repeated 9 segmentSEL
526 , "0170" .@ repeated 9 segmentFTX
527 , "0180" .@ repeated 9 (
528 segmentGroup "3"
529 [ "0190" .@ once segmentDOC
530 , "0200" .@ maybeOnce segmentDTM
531 ]
532 )
533 ]
534 )
535 , "0210" .@ repeated 9 (
536 segmentGroup "4"
537 [ "0220" .@ once segmentNAD
538 , "0230" .@ repeated 9 (
539 segmentGroup "5"
540 [ "0240" .@ once segmentCTA
541 , "0250" .@ repeated 9 segmentCOM
542 ]
543 )
544 , "0260" .@ repeated 9 (
545 segmentGroup "6"
546 [ "0270" .@ once segmentRFF
547 , "0280" .@ repeated 9 segmentDTM
548 ]
549 )
550 ]
551 )
552 , "0290" .@ repeated 9 (
553 segmentGroup "7"
554 [ "0300" .@ once segmentTCC
555 , "0310" .@ maybeOnce segmentCUX
556 , "0320" .@ maybeOnce segmentPRI
557 , "0330" .@ maybeOnce segmentEQN
558 , "0340" .@ maybeOnce segmentPCD
559 , "0350" .@ repeated 9 segmentMOA
560 , "0360" .@ repeated 9 segmentQTY
561 , "0370" .@ repeated 9 segmentLOC
562 ]
563 )
564 , "0380" .@ repeated 99 (
565 segmentGroup "8"
566 [ "0390" .@ once segmentICD
567 , "0400" .@ maybeOnce segmentDTM
568 , "0410" .@ repeated 9 segmentFTX
569 ]
570 )
571 , "0420" .@ repeated 9 (
572 segmentGroup "9"
573 [ "0430" .@ once segmentTDT
574 , "0440" .@ repeated 9 segmentDTM
575 , "0450" .@ repeated 9 segmentTSR
576 , "0460" .@ repeated 9 (
577 segmentGroup "10"
578 [ "0470" .@ once segmentLOC
579 , "0480" .@ repeated 9 segmentDTM
580 ]
581 )
582 , "0490" .@ repeated 9 segmentSEL
583 , "0500" .@ repeated 9 segmentFTX
584 , "0510" .@ repeated 9 (
585 segmentGroup "11"
586 [ "0520" .@ once segmentMEA
587 , "0530" .@ maybeOnce segmentEQN
588 ]
589 )
590 , "0540" .@ repeated 9 (
591 segmentGroup "12"
592 [ "0550" .@ once segmentDIM
593 , "0560" .@ maybeOnce segmentEQN
594 ]
595 )
596 , "0570" .@ repeated 9 (
597 segmentGroup "13"
598 [ "0580" .@ once segmentCTA
599 , "0590" .@ repeated 9 segmentCOM
600 ]
601 )
602 , "0600" .@ repeated 99 (
603 segmentGroup "14"
604 [ "0610" .@ once segmentTCC
605 , "0620" .@ repeated 9 segmentMOA
606 , "0630" .@ maybeOnce segmentPCD
607 ]
608 )
609 , "0640" .@ repeated 99 (
610 segmentGroup "15"
611 [ "0650" .@ once segmentICD
612 , "0660" .@ maybeOnce segmentDTM
613 , "0670" .@ repeated 9 segmentFTX
614 ]
615 )
616 , "0680" .@ repeated 9 (
617 segmentGroup "16"
618 [ "0690" .@ once segmentNAD
619 , "0700" .@ repeated 9 segmentLOC
620 , "0710" .@ repeated 9 (
621 segmentGroup "17"
622 [ "0720" .@ once segmentCTA
623 , "0730" .@ repeated 9 segmentCOM
624 ]
625 )
626 , "0740" .@ repeated 9 (
627 segmentGroup "18"
628 [ "0750" .@ once segmentDOC
629 , "0760" .@ maybeOnce segmentDTM
630 ]
631 )
632 , "0770" .@ repeated 9 (
633 segmentGroup "19"
634 [ "0780" .@ once segmentTCC
635 , "0790" .@ maybeOnce segmentCUX
636 , "0800" .@ maybeOnce segmentPRI
637 , "0810" .@ maybeOnce segmentEQN
638 , "0820" .@ maybeOnce segmentPCD
639 , "0830" .@ repeated 9 segmentMOA
640 , "0840" .@ repeated 9 segmentQTY
641 ]
642 )
643 , "0850" .@ repeated 9 (
644 segmentGroup "20"
645 [ "0860" .@ once segmentRFF
646 , "0870" .@ repeated 9 segmentDTM
647 ]
648 )
649 ]
650 )
651 ]
652 )
653 , "0880" .@ repeated 999 (
654 segmentGroup "21"
655 [ "0890" .@ once segmentEQD
656 , "0900" .@ maybeOnce segmentEQN
657 , "0910" .@ maybeOnce segmentTPL
658 , "0920" .@ maybeOnce segmentTMD
659 , "0930" .@ repeated 9 segmentMEA
660 , "0940" .@ repeated 9 segmentDIM
661 , "0950" .@ repeated 9 segmentSEL
662 , "0960" .@ repeated 9 segmentNAD
663 , "0970" .@ repeated 9 segmentLOC
664 , "0980" .@ maybeOnce segmentHAN
665 , "0990" .@ maybeOnce segmentTMP
666 , "1000" .@ repeated 9 segmentFTX
667 , "1010" .@ repeated 9 segmentRFF
668 , "1020" .@ repeated 9 segmentPCD
669 , "1030" .@ repeated 99 (
670 segmentGroup "22"
671 [ "1040" .@ once segmentEQA
672 , "1050" .@ maybeOnce segmentEQN
673 ]
674 )
675 , "1060" .@ repeated 99 (
676 segmentGroup "23"
677 [ "1070" .@ once segmentDGS
678 , "1080" .@ repeated 9 segmentFTX
679 , "1090" .@ once (
680 segmentGroup "24"
681 [ "1100" .@ once segmentCTA
682 , "1110" .@ repeated 9 segmentCOM
683 ]
684 )
685 ]
686 )
687 ]
688 )
689 , "1120" .@ repeated 9999 (
690 segmentGroup "25"
691 [ "1130" .@ once segmentCNI
692 , "1140" .@ repeated 9 (
693 segmentGroup "26"
694 [ "1150" .@ once segmentSGP
695 , "1160" .@ repeated 9 (
696 segmentGroup "27"
697 [ "1170" .@ once segmentMEA
698 , "1180" .@ maybeOnce segmentEQN
699 ]
700 )
701 ]
702 )
703 , "1190" .@ repeated 9 (
704 segmentGroup "28"
705 [ "1200" .@ once segmentTPL
706 , "1210" .@ repeated 9 (
707 segmentGroup "29"
708 [ "1220" .@ once segmentMEA
709 , "1230" .@ maybeOnce segmentEQN
710 ]
711 )
712 ]
713 )
714 , "1240" .@ maybeOnce segmentCTA
715 , "1250" .@ repeated 9 segmentCOM
716 , "1260" .@ repeated 9 segmentDTM
717 , "1270" .@ repeated 9 segmentCNT
718 , "1280" .@ repeated 9 segmentTSR
719 , "1290" .@ repeated 9 segmentCUX
720 , "1300" .@ repeated 9 segmentPCD
721 , "1310" .@ repeated 99 segmentMOA
722 , "1320" .@ repeated 99 segmentFTX
723 , "1330" .@ repeated 9 segmentGDS
724 , "1340" .@ repeated 99 (
725 segmentGroup "30"
726 [ "1350" .@ once segmentLOC
727 , "1360" .@ repeated 9 segmentDTM
728 ]
729 )
730 , "1370" .@ repeated 2 (
731 segmentGroup "31"
732 [ "1380" .@ once segmentTOD
733 , "1390" .@ repeated 9 segmentLOC
734 ]
735 )
736 , "1400" .@ repeated 999 (
737 segmentGroup "32"
738 [ "1410" .@ once segmentRFF
739 , "1420" .@ repeated 9 segmentDTM
740 ]
741 )
742 , "1430" .@ repeated 9 (
743 segmentGroup "33"
744 [ "1440" .@ once segmentGOR
745 , "1450" .@ repeated 9 segmentDTM
746 , "1460" .@ repeated 9 segmentLOC
747 , "1470" .@ repeated 9 segmentSEL
748 , "1480" .@ repeated 9 segmentFTX
749 , "1490" .@ repeated 9 (
750 segmentGroup "34"
751 [ "1500" .@ once segmentDOC
752 , "1510" .@ maybeOnce segmentDTM
753 ]
754 )
755 ]
756 )
757 , "1520" .@ repeated 9 (
758 segmentGroup "35"
759 [ "1530" .@ once segmentCPI
760 , "1540" .@ repeated 99 segmentRFF
761 , "1550" .@ maybeOnce segmentCUX
762 , "1560" .@ repeated 9 segmentLOC
763 , "1570" .@ repeated 9 segmentMOA
764 ]
765 )
766 , "1580" .@ repeated 99 (
767 segmentGroup "36"
768 [ "1590" .@ once segmentTCC
769 , "1600" .@ maybeOnce segmentLOC
770 , "1610" .@ maybeOnce segmentFTX
771 , "1620" .@ maybeOnce segmentCUX
772 , "1630" .@ maybeOnce segmentPRI
773 , "1640" .@ maybeOnce segmentEQN
774 , "1650" .@ maybeOnce segmentPCD
775 , "1660" .@ repeated 9 segmentMOA
776 , "1670" .@ repeated 9 segmentQTY
777 ]
778 )
779 , "1680" .@ repeated 99 (
780 segmentGroup "37"
781 [ "1690" .@ once segmentICD
782 , "1700" .@ maybeOnce segmentDTM
783 , "1710" .@ repeated 9 segmentFTX
784 ]
785 )
786 , "1720" .@ repeated 99 (
787 segmentGroup "38"
788 [ "1730" .@ once segmentTDT
789 , "1740" .@ repeated 9 segmentDTM
790 , "1750" .@ repeated 9 segmentTSR
791 , "1760" .@ repeated 99 (
792 segmentGroup "39"
793 [ "1770" .@ once segmentLOC
794 , "1780" .@ repeated 9 segmentDTM
795 ]
796 )
797 , "1790" .@ repeated 9 (
798 segmentGroup "40"
799 [ "1800" .@ once segmentRFF
800 , "1810" .@ maybeOnce segmentDTM
801 ]
802 )
803 , "1820" .@ repeated 99 (
804 segmentGroup "41"
805 [ "1830" .@ once segmentTCC
806 , "1840" .@ repeated 9 segmentMOA
807 , "1850" .@ maybeOnce segmentPCD
808 ]
809 )
810 , "1860" .@ repeated 99 (
811 segmentGroup "42"
812 [ "1870" .@ once segmentICD
813 , "1880" .@ maybeOnce segmentDTM
814 , "1890" .@ repeated 9 segmentFTX
815 ]
816 )
817 ]
818 )
819 , "1900" .@ repeated 99 (
820 segmentGroup "43"
821 [ "1910" .@ once segmentNAD
822 , "1920" .@ repeated 9 segmentLOC
823 , "1930" .@ repeated 9 segmentMOA
824 , "1940" .@ repeated 9 (
825 segmentGroup "44"
826 [ "1950" .@ once segmentCTA
827 , "1960" .@ repeated 9 segmentCOM
828 ]
829 )
830 , "1970" .@ repeated 9 (
831 segmentGroup "45"
832 [ "1980" .@ once segmentDOC
833 , "1990" .@ maybeOnce segmentDTM
834 ]
835 )
836 , "2000" .@ repeated 99 (
837 segmentGroup "46"
838 [ "2010" .@ once segmentTCC
839 , "2020" .@ maybeOnce segmentCUX
840 , "2030" .@ maybeOnce segmentPRI
841 , "2040" .@ maybeOnce segmentEQN
842 , "2050" .@ maybeOnce segmentPCD
843 , "2060" .@ repeated 9 segmentMOA
844 , "2070" .@ repeated 9 segmentQTY
845 ]
846 )
847 , "2080" .@ repeated 9 (
848 segmentGroup "47"
849 [ "2090" .@ once segmentRFF
850 , "2100" .@ repeated 9 segmentDTM
851 ]
852 )
853 , "2110" .@ repeated 9 (
854 segmentGroup "48"
855 [ "2120" .@ once segmentCPI
856 , "2130" .@ repeated 99 segmentRFF
857 , "2140" .@ maybeOnce segmentCUX
858 , "2150" .@ repeated 9 segmentLOC
859 , "2160" .@ repeated 9 segmentMOA
860 ]
861 )
862 , "2170" .@ repeated 99 (
863 segmentGroup "49"
864 [ "2180" .@ once segmentTSR
865 , "2190" .@ maybeOnce segmentRFF
866 , "2200" .@ maybeOnce segmentLOC
867 , "2210" .@ maybeOnce segmentTPL
868 , "2220" .@ repeated 9 segmentFTX
869 ]
870 )
871 ]
872 )
873 , "2230" .@ repeated 999 (
874 segmentGroup "50"
875 [ "2240" .@ once segmentGID
876 , "2250" .@ maybeOnce segmentHAN
877 , "2260" .@ maybeOnce segmentTMP
878 , "2270" .@ maybeOnce segmentRNG
879 , "2280" .@ maybeOnce segmentTMD
880 , "2290" .@ repeated 9 segmentLOC
881 , "2300" .@ repeated 9 segmentMOA
882 , "2310" .@ repeated 9 segmentPIA
883 , "2320" .@ repeated 99 segmentGIN
884 , "2330" .@ repeated 9 segmentFTX
885 , "2340" .@ repeated 9 (
886 segmentGroup "51"
887 [ "2350" .@ once segmentNAD
888 , "2360" .@ maybeOnce segmentDTM
889 ]
890 )
891 , "2370" .@ repeated 9 segmentGDS
892 , "2380" .@ repeated 99 (
893 segmentGroup "52"
894 [ "2390" .@ once segmentMEA
895 , "2400" .@ maybeOnce segmentEQN
896 ]
897 )
898 , "2410" .@ repeated 99 (
899 segmentGroup "53"
900 [ "2420" .@ once segmentDIM
901 , "2430" .@ maybeOnce segmentEQN
902 ]
903 )
904 , "2440" .@ repeated 9 (
905 segmentGroup "54"
906 [ "2450" .@ once segmentRFF
907 , "2460" .@ repeated 9 segmentDTM
908 ]
909 )
910 , "2470" .@ repeated 999 (
911 segmentGroup "55"
912 [ "2480" .@ once segmentPCI
913 , "2490" .@ maybeOnce segmentRFF
914 , "2500" .@ maybeOnce segmentDTM
915 , "2510" .@ repeated 9 segmentGIN
916 , "2520" .@ repeated 9 segmentMEA
917 , "2530" .@ maybeOnce segmentDIM
918 , "2540" .@ repeated 9 segmentFTX
919 ]
920 )
921 , "2550" .@ repeated 9 (
922 segmentGroup "56"
923 [ "2560" .@ once segmentDOC
924 , "2570" .@ repeated 9 segmentDTM
925 ]
926 )
927 , "2580" .@ repeated 9 (
928 segmentGroup "57"
929 [ "2590" .@ once segmentGOR
930 , "2600" .@ repeated 9 segmentDTM
931 , "2610" .@ repeated 9 segmentLOC
932 , "2620" .@ repeated 9 segmentSEL
933 , "2630" .@ repeated 9 segmentFTX
934 , "2640" .@ repeated 9 (
935 segmentGroup "58"
936 [ "2650" .@ once segmentDOC
937 , "2660" .@ maybeOnce segmentDTM
938 ]
939 )
940 ]
941 )
942 , "2670" .@ repeated 9 (
943 segmentGroup "59"
944 [ "2680" .@ once segmentTPL
945 , "2690" .@ repeated 9 (
946 segmentGroup "60"
947 [ "2700" .@ once segmentMEA
948 , "2710" .@ maybeOnce segmentEQN
949 ]
950 )
951 ]
952 )
953 , "2720" .@ repeated 999 (
954 segmentGroup "61"
955 [ "2730" .@ once segmentSGP
956 , "2740" .@ maybeOnce segmentSEQ
957 , "2750" .@ repeated 9 (
958 segmentGroup "62"
959 [ "2760" .@ once segmentMEA
960 , "2770" .@ maybeOnce segmentEQN
961 ]
962 )
963 ]
964 )
965 , "2780" .@ repeated 99 (
966 segmentGroup "63"
967 [ "2790" .@ once segmentTCC
968 , "2800" .@ maybeOnce segmentCUX
969 , "2810" .@ maybeOnce segmentPRI
970 , "2820" .@ maybeOnce segmentEQN
971 , "2830" .@ maybeOnce segmentPCD
972 , "2840" .@ repeated 9 segmentMOA
973 , "2850" .@ repeated 9 segmentQTY
974 , "2860" .@ repeated 9 segmentLOC
975 ]
976 )
977 , "2870" .@ repeated 99 (
978 segmentGroup "64"
979 [ "2880" .@ once segmentICD
980 , "2890" .@ maybeOnce segmentDTM
981 , "2900" .@ repeated 9 segmentFTX
982 ]
983 )
984 , "2910" .@ repeated 99 (
985 segmentGroup "65"
986 [ "2920" .@ once segmentDGS
987 , "2930" .@ repeated 99 segmentFTX
988 , "2940" .@ repeated 9 (
989 segmentGroup "66"
990 [ "2950" .@ once segmentCTA
991 , "2960" .@ repeated 9 segmentCOM
992 ]
993 )
994 , "2970" .@ repeated 9 (
995 segmentGroup "67"
996 [ "2980" .@ once segmentMEA
997 , "2990" .@ maybeOnce segmentEQN
998 ]
999 )
1000 , "3000" .@ repeated 999 (
1001 segmentGroup "68"
1002 [ "3010" .@ once segmentSGP
1003 , "3020" .@ repeated 9 (
1004 segmentGroup "69"
1005 [ "3030" .@ once segmentMEA
1006 , "3040" .@ maybeOnce segmentEQN
1007 ]
1008 )
1009 ]
1010 )
1011 ]
1012 )
1013 ]
1014 )
1015 , "3050" .@ repeated 999 (
1016 segmentGroup "70"
1017 [ "3060" .@ once segmentEQD
1018 , "3070" .@ maybeOnce segmentEQN
1019 , "3080" .@ maybeOnce segmentTMD
1020 , "3090" .@ repeated 9 segmentMEA
1021 , "3100" .@ repeated 9 segmentDIM
1022 , "3110" .@ repeated 99 segmentSEL
1023 , "3120" .@ repeated 9 segmentTPL
1024 , "3130" .@ maybeOnce segmentHAN
1025 , "3140" .@ maybeOnce segmentTMP
1026 , "3150" .@ repeated 9 segmentFTX
1027 , "3160" .@ repeated 9 segmentPCD
1028 , "3170" .@ repeated 99 (
1029 segmentGroup "71"
1030 [ "3180" .@ once segmentTCC
1031 , "3190" .@ maybeOnce segmentCUX
1032 , "3200" .@ maybeOnce segmentPRI
1033 , "3210" .@ maybeOnce segmentEQN
1034 , "3220" .@ maybeOnce segmentPCD
1035 , "3230" .@ repeated 9 segmentMOA
1036 , "3240" .@ repeated 9 segmentQTY
1037 ]
1038 )
1039 , "3250" .@ repeated 9 (
1040 segmentGroup "72"
1041 [ "3260" .@ once segmentNAD
1042 , "3270" .@ maybeOnce segmentDTM
1043 ]
1044 )
1045 , "3280" .@ repeated 99 (
1046 segmentGroup "73"
1047 [ "3290" .@ once segmentEQA
1048 , "3300" .@ maybeOnce segmentEQN
1049 ]
1050 )
1051 , "3310" .@ repeated 99 (
1052 segmentGroup "74"
1053 [ "3320" .@ once segmentDGS
1054 , "3330" .@ repeated 9 segmentFTX
1055 , "3340" .@ repeated 9 (
1056 segmentGroup "75"
1057 [ "3350" .@ once segmentCTA
1058 , "3360" .@ repeated 9 segmentCOM
1059 ]
1060 )
1061 ]
1062 )
1063 ]
1064 )
1065 ]
1066 )
1067 , "3370" .@ once segmentUNT
1068 ]