diff options
Diffstat (limited to 'specification/src/Text/Edifact/D01B/Messages')
| -rw-r--r-- | specification/src/Text/Edifact/D01B/Messages/IFCSUM.hs | 1068 | ||||
| -rw-r--r-- | specification/src/Text/Edifact/D01B/Messages/IFTSTA.hs | 265 |
2 files changed, 1333 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 | |||
| 6 | module 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 | |||
| 54 | import Text.Edifact.Common.Segments | ||
| 55 | |||
| 56 | import 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 | |||
| 78 | import Text.Edifact.Parsing | ||
| 79 | import 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'. | ||
| 503 | messageIFCSUM :: Parser Value | ||
| 504 | messageIFCSUM = | ||
| 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 | ] | ||
diff --git a/specification/src/Text/Edifact/D01B/Messages/IFTSTA.hs b/specification/src/Text/Edifact/D01B/Messages/IFTSTA.hs new file mode 100644 index 0000000..23e53c3 --- /dev/null +++ b/specification/src/Text/Edifact/D01B/Messages/IFTSTA.hs | |||
| @@ -0,0 +1,265 @@ | |||
| 1 | {-# LANGUAGE OverloadedStrings #-} | ||
| 2 | |||
| 3 | ---- Machine generated code. | ||
| 4 | ---- Output of edi-parser-scaffolder | ||
| 5 | |||
| 6 | module Text.Edifact.D01B.Messages.IFTSTA | ||
| 7 | ( -- * Definition | ||
| 8 | messageIFTSTA | ||
| 9 | -- * Dependencies | ||
| 10 | , segmentBGM | ||
| 11 | , segmentCNI | ||
| 12 | , segmentCNT | ||
| 13 | , segmentCOM | ||
| 14 | , segmentCTA | ||
| 15 | , segmentDGS | ||
| 16 | , segmentDIM | ||
| 17 | , segmentDOC | ||
| 18 | , segmentDTM | ||
| 19 | , segmentEQA | ||
| 20 | , segmentEQD | ||
| 21 | , segmentEQN | ||
| 22 | , segmentFTX | ||
| 23 | , segmentGID | ||
| 24 | , segmentGIN | ||
| 25 | , segmentHAN | ||
| 26 | , segmentLOC | ||
| 27 | , segmentMEA | ||
| 28 | , segmentNAD | ||
| 29 | , segmentPCI | ||
| 30 | , segmentRFF | ||
| 31 | , segmentSEL | ||
| 32 | , segmentSGP | ||
| 33 | , segmentSTS | ||
| 34 | , segmentTDT | ||
| 35 | , segmentTMD | ||
| 36 | , segmentTPL | ||
| 37 | , segmentTSR | ||
| 38 | ) where | ||
| 39 | |||
| 40 | import Text.Edifact.Common.Segments | ||
| 41 | |||
| 42 | import Text.Edifact.D01B.Segments (segmentBGM, segmentCNI, | ||
| 43 | segmentCNT, segmentCOM, | ||
| 44 | segmentCTA, segmentDGS, | ||
| 45 | segmentDIM, segmentDOC, | ||
| 46 | segmentDTM, segmentEQA, | ||
| 47 | segmentEQD, segmentEQN, | ||
| 48 | segmentFTX, segmentGID, | ||
| 49 | segmentGIN, segmentHAN, | ||
| 50 | segmentLOC, segmentMEA, | ||
| 51 | segmentNAD, segmentPCI, | ||
| 52 | segmentRFF, segmentSEL, | ||
| 53 | segmentSGP, segmentSTS, | ||
| 54 | segmentTDT, segmentTMD, | ||
| 55 | segmentTPL, segmentTSR) | ||
| 56 | |||
| 57 | import Text.Edifact.Parsing | ||
| 58 | import Text.Edifact.Types (Value) | ||
| 59 | |||
| 60 | -- | Derived from this specification: | ||
| 61 | -- | ||
| 62 | -- > 4.3 Message structure | ||
| 63 | -- > | ||
| 64 | -- > 4.3.1 Segment table | ||
| 65 | -- > | ||
| 66 | -- > Pos Tag Name S R | ||
| 67 | -- > | ||
| 68 | -- > 0010 UNH Message header M 1 | ||
| 69 | -- > 0020 BGM Beginning of message M 1 | ||
| 70 | -- > 0030 DTM Date/time/period C 9 | ||
| 71 | -- > 0040 TSR Transport service requirements C 1 | ||
| 72 | -- > | ||
| 73 | -- > 0050 ----- Segment group 1 ------------------ C 9-----------+ | ||
| 74 | -- > 0060 NAD Name and address M 1 | | ||
| 75 | -- > | | ||
| 76 | -- > 0070 ----- Segment group 2 ------------------ C 9----------+| | ||
| 77 | -- > 0080 CTA Contact information M 1 || | ||
| 78 | -- > 0090 COM Communication contact C 9----------++ | ||
| 79 | -- > | ||
| 80 | -- > 0100 ----- Segment group 3 ------------------ C 9-----------+ | ||
| 81 | -- > 0110 RFF Reference M 1 | | ||
| 82 | -- > 0120 DTM Date/time/period C 1-----------+ | ||
| 83 | -- > 0130 LOC Place/location identification C 9 | ||
| 84 | -- > 0140 FTX Free text C 9 | ||
| 85 | -- > 0150 CNT Control total C 9 | ||
| 86 | -- > | ||
| 87 | -- > 0160 ----- Segment group 4 ------------------ C 99999-------+ | ||
| 88 | -- > 0170 CNI Consignment information M 1 | | ||
| 89 | -- > 0180 LOC Place/location identification C 9 | | ||
| 90 | -- > 0190 CNT Control total C 9 | | ||
| 91 | -- > | | ||
| 92 | -- > 0200 ----- Segment group 5 ------------------ M 99---------+| | ||
| 93 | -- > 0210 STS Status M 1 || | ||
| 94 | -- > 0220 RFF Reference C 999 || | ||
| 95 | -- > 0230 DTM Date/time/period C 9 || | ||
| 96 | -- > 0240 DOC Document/message details C 1 || | ||
| 97 | -- > 0250 FTX Free text C 9 || | ||
| 98 | -- > || | ||
| 99 | -- > 0260 ----- Segment group 6 ------------------ C 9---------+|| | ||
| 100 | -- > 0270 NAD Name and address M 1 ||| | ||
| 101 | -- > ||| | ||
| 102 | -- > 0280 ----- Segment group 7 ------------------ C 9--------+||| | ||
| 103 | -- > 0290 CTA Contact information M 1 |||| | ||
| 104 | -- > 0300 COM Communication contact C 9--------++|| | ||
| 105 | -- > 0310 LOC Place/location identification C 1 || | ||
| 106 | -- > 0320 PCI Package identification C 99 || | ||
| 107 | -- > || | ||
| 108 | -- > 0330 ----- Segment group 8 ------------------ C 99--------+|| | ||
| 109 | -- > 0340 TDT Details of transport M 1 ||| | ||
| 110 | -- > 0350 DTM Date/time/period C 9 ||| | ||
| 111 | -- > 0360 RFF Reference C 9 ||| | ||
| 112 | -- > ||| | ||
| 113 | -- > 0370 ----- Segment group 9 ------------------ C 9--------+||| | ||
| 114 | -- > 0380 LOC Place/location identification M 1 |||| | ||
| 115 | -- > 0390 DTM Date/time/period C 9--------++|| | ||
| 116 | -- > || | ||
| 117 | -- > 0400 ----- Segment group 10 ------------------ C 99--------+|| | ||
| 118 | -- > 0410 EQD Equipment details M 1 ||| | ||
| 119 | -- > 0420 MEA Measurements C 9 ||| | ||
| 120 | -- > 0430 DIM Dimensions C 9 ||| | ||
| 121 | -- > 0440 SEL Seal number C 9 ||| | ||
| 122 | -- > 0450 RFF Reference C 9 ||| | ||
| 123 | -- > 0460 TPL Transport placement C 9 ||| | ||
| 124 | -- > 0470 TMD Transport movement details C 1 ||| | ||
| 125 | -- > ||| | ||
| 126 | -- > 0480 ----- Segment group 11 ------------------ C 99-------+||| | ||
| 127 | -- > 0490 EQA Attached equipment M 1 |||| | ||
| 128 | -- > 0500 SEL Seal number C 9--------++|| | ||
| 129 | -- > || | ||
| 130 | -- > 0510 ----- Segment group 12 ------------------ C 99--------+|| | ||
| 131 | -- > 0520 GID Goods item details M 1 ||| | ||
| 132 | -- > 0530 HAN Handling instructions C 9 ||| | ||
| 133 | -- > 0540 SGP Split goods placement C 99 ||| | ||
| 134 | -- > 0550 DGS Dangerous goods C 9 ||| | ||
| 135 | -- > 0560 FTX Free text C 9 ||| | ||
| 136 | -- > ||| | ||
| 137 | -- > 0570 ----- Segment group 13 ------------------ C 99-------+||| | ||
| 138 | -- > 0580 MEA Measurements M 1 |||| | ||
| 139 | -- > 0590 EQN Number of units C 1--------+||| | ||
| 140 | -- > ||| | ||
| 141 | -- > 0600 ----- Segment group 14 ------------------ C 99-------+||| | ||
| 142 | -- > 0610 DIM Dimensions M 1 |||| | ||
| 143 | -- > 0620 EQN Number of units C 1--------+||| | ||
| 144 | -- > ||| | ||
| 145 | -- > 0630 ----- Segment group 15 ------------------ C 99-------+||| | ||
| 146 | -- > 0640 PCI Package identification M 1 |||| | ||
| 147 | -- > 0650 GIN Goods identity number C 9--------++++ | ||
| 148 | -- > 0660 UNT Message trailer M 1 | ||
| 149 | -- | ||
| 150 | -- Dependencies: 'segmentBGM', 'segmentCNI', 'segmentCNT', 'segmentCOM', 'segmentCTA', 'segmentDGS', 'segmentDIM', 'segmentDOC', 'segmentDTM', 'segmentEQA', 'segmentEQD', 'segmentEQN', 'segmentFTX', 'segmentGID', 'segmentGIN', 'segmentHAN', 'segmentLOC', 'segmentMEA', 'segmentNAD', 'segmentPCI', 'segmentRFF', 'segmentSEL', 'segmentSGP', 'segmentSTS', 'segmentTDT', 'segmentTMD', 'segmentTPL', 'segmentTSR'. | ||
| 151 | messageIFTSTA :: Parser Value | ||
| 152 | messageIFTSTA = | ||
| 153 | message "IFTSTA" | ||
| 154 | [ "0010" .@ once segmentUNH | ||
| 155 | , "0020" .@ once segmentBGM | ||
| 156 | , "0030" .@ repeated 9 segmentDTM | ||
| 157 | , "0040" .@ maybeOnce segmentTSR | ||
| 158 | , "0050" .@ repeated 9 ( | ||
| 159 | segmentGroup "1" | ||
| 160 | [ "0060" .@ once segmentNAD | ||
| 161 | , "0070" .@ repeated 9 ( | ||
| 162 | segmentGroup "2" | ||
| 163 | [ "0080" .@ once segmentCTA | ||
| 164 | , "0090" .@ repeated 9 segmentCOM | ||
| 165 | ] | ||
| 166 | ) | ||
| 167 | ] | ||
| 168 | ) | ||
| 169 | , "0100" .@ repeated 9 ( | ||
| 170 | segmentGroup "3" | ||
| 171 | [ "0110" .@ once segmentRFF | ||
| 172 | , "0120" .@ maybeOnce segmentDTM | ||
| 173 | ] | ||
| 174 | ) | ||
| 175 | , "0130" .@ repeated 9 segmentLOC | ||
| 176 | , "0140" .@ repeated 9 segmentFTX | ||
| 177 | , "0150" .@ repeated 9 segmentCNT | ||
| 178 | , "0160" .@ repeated 99999 ( | ||
| 179 | segmentGroup "4" | ||
| 180 | [ "0170" .@ once segmentCNI | ||
| 181 | , "0180" .@ repeated 9 segmentLOC | ||
| 182 | , "0190" .@ repeated 9 segmentCNT | ||
| 183 | , "0200" .@ repeatedAtLeastOnce 99 ( | ||
| 184 | segmentGroup "5" | ||
| 185 | [ "0210" .@ once segmentSTS | ||
| 186 | , "0220" .@ repeated 999 segmentRFF | ||
| 187 | , "0230" .@ repeated 9 segmentDTM | ||
| 188 | , "0240" .@ maybeOnce segmentDOC | ||
| 189 | , "0250" .@ repeated 9 segmentFTX | ||
| 190 | , "0260" .@ repeated 9 ( | ||
| 191 | segmentGroup "6" | ||
| 192 | [ "0270" .@ once segmentNAD | ||
| 193 | , "0280" .@ repeated 9 ( | ||
| 194 | segmentGroup "7" | ||
| 195 | [ "0290" .@ once segmentCTA | ||
| 196 | , "0300" .@ repeated 9 segmentCOM | ||
| 197 | ] | ||
| 198 | ) | ||
| 199 | ] | ||
| 200 | ) | ||
| 201 | , "0310" .@ maybeOnce segmentLOC | ||
| 202 | , "0320" .@ repeated 99 segmentPCI | ||
| 203 | , "0330" .@ repeated 99 ( | ||
| 204 | segmentGroup "8" | ||
| 205 | [ "0340" .@ once segmentTDT | ||
| 206 | , "0350" .@ repeated 9 segmentDTM | ||
| 207 | , "0360" .@ repeated 9 segmentRFF | ||
| 208 | , "0370" .@ repeated 9 ( | ||
| 209 | segmentGroup "9" | ||
| 210 | [ "0380" .@ once segmentLOC | ||
| 211 | , "0390" .@ repeated 9 segmentDTM | ||
| 212 | ] | ||
| 213 | ) | ||
| 214 | ] | ||
| 215 | ) | ||
| 216 | , "0400" .@ repeated 99 ( | ||
| 217 | segmentGroup "10" | ||
| 218 | [ "0410" .@ once segmentEQD | ||
| 219 | , "0420" .@ repeated 9 segmentMEA | ||
| 220 | , "0430" .@ repeated 9 segmentDIM | ||
| 221 | , "0440" .@ repeated 9 segmentSEL | ||
| 222 | , "0450" .@ repeated 9 segmentRFF | ||
| 223 | , "0460" .@ repeated 9 segmentTPL | ||
| 224 | , "0470" .@ maybeOnce segmentTMD | ||
| 225 | , "0480" .@ repeated 99 ( | ||
| 226 | segmentGroup "11" | ||
| 227 | [ "0490" .@ once segmentEQA | ||
| 228 | , "0500" .@ repeated 9 segmentSEL | ||
| 229 | ] | ||
| 230 | ) | ||
| 231 | ] | ||
| 232 | ) | ||
| 233 | , "0510" .@ repeated 99 ( | ||
| 234 | segmentGroup "12" | ||
| 235 | [ "0520" .@ once segmentGID | ||
| 236 | , "0530" .@ repeated 9 segmentHAN | ||
| 237 | , "0540" .@ repeated 99 segmentSGP | ||
| 238 | , "0550" .@ repeated 9 segmentDGS | ||
| 239 | , "0560" .@ repeated 9 segmentFTX | ||
| 240 | , "0570" .@ repeated 99 ( | ||
| 241 | segmentGroup "13" | ||
| 242 | [ "0580" .@ once segmentMEA | ||
| 243 | , "0590" .@ maybeOnce segmentEQN | ||
| 244 | ] | ||
| 245 | ) | ||
| 246 | , "0600" .@ repeated 99 ( | ||
| 247 | segmentGroup "14" | ||
| 248 | [ "0610" .@ once segmentDIM | ||
| 249 | , "0620" .@ maybeOnce segmentEQN | ||
| 250 | ] | ||
| 251 | ) | ||
| 252 | , "0630" .@ repeated 99 ( | ||
| 253 | segmentGroup "15" | ||
| 254 | [ "0640" .@ once segmentPCI | ||
| 255 | , "0650" .@ repeated 9 segmentGIN | ||
| 256 | ] | ||
| 257 | ) | ||
| 258 | ] | ||
| 259 | ) | ||
| 260 | ] | ||
| 261 | ) | ||
| 262 | ] | ||
| 263 | ) | ||
| 264 | , "0660" .@ once segmentUNT | ||
| 265 | ] | ||