diff options
Diffstat (limited to 'specification/src/Text/Edifact/D96A/Composites')
74 files changed, 2944 insertions, 0 deletions
diff --git a/specification/src/Text/Edifact/D96A/Composites/C002.hs b/specification/src/Text/Edifact/D96A/Composites/C002.hs new file mode 100644 index 0000000..6581f16 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C002.hs | |||
@@ -0,0 +1,42 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C002 | ||
7 | ( -- * Definition | ||
8 | compositeC002 | ||
9 | -- * Dependencies | ||
10 | , simple1000 | ||
11 | , simple1001 | ||
12 | , simple1131 | ||
13 | , simple3055 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1000, simple1001, simple1131, | ||
17 | simple3055) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C002 DOCUMENT/MESSAGE NAME | ||
25 | -- > | ||
26 | -- > Desc: Identification of a type of document/message by code or | ||
27 | -- > name. Code preferred. | ||
28 | -- > | ||
29 | -- > 010 1001 Document/message name, coded C an..3 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 1000 Document/message name C an..35 | ||
33 | -- | ||
34 | -- Dependencies: 'simple1000', 'simple1001', 'simple1131', 'simple3055'. | ||
35 | compositeC002 :: Parser Value | ||
36 | compositeC002 = | ||
37 | composite "C002" | ||
38 | [ "010" .@ optional simple1001 | ||
39 | , "020" .@ optional simple1131 | ||
40 | , "030" .@ optional simple3055 | ||
41 | , "040" .@ optional simple1000 | ||
42 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C040.hs b/specification/src/Text/Edifact/D96A/Composites/C040.hs new file mode 100644 index 0000000..cb5ba61 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C040.hs | |||
@@ -0,0 +1,42 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C040 | ||
7 | ( -- * Definition | ||
8 | compositeC040 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple3127 | ||
13 | , simple3128 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple3127, | ||
17 | simple3128) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C040 CARRIER | ||
25 | -- > | ||
26 | -- > Desc: Identification of a carrier by code and/or by name. Code | ||
27 | -- > preferred. | ||
28 | -- > | ||
29 | -- > 010 3127 Carrier identification C an..17 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 3128 Carrier name C an..35 | ||
33 | -- | ||
34 | -- Dependencies: 'simple1131', 'simple3055', 'simple3127', 'simple3128'. | ||
35 | compositeC040 :: Parser Value | ||
36 | compositeC040 = | ||
37 | composite "C040" | ||
38 | [ "010" .@ optional simple3127 | ||
39 | , "020" .@ optional simple1131 | ||
40 | , "030" .@ optional simple3055 | ||
41 | , "040" .@ optional simple3128 | ||
42 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C056.hs b/specification/src/Text/Edifact/D96A/Composites/C056.hs new file mode 100644 index 0000000..9bd5a02 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C056.hs | |||
@@ -0,0 +1,35 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C056 | ||
7 | ( -- * Definition | ||
8 | compositeC056 | ||
9 | -- * Dependencies | ||
10 | , simple3412 | ||
11 | , simple3413 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple3412, simple3413) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C056 DEPARTMENT OR EMPLOYEE DETAILS | ||
22 | -- > | ||
23 | -- > Desc: Code and/or name of a department or employee. Code | ||
24 | -- > preferred. | ||
25 | -- > | ||
26 | -- > 010 3413 Department or employee identification C an..17 | ||
27 | -- > 020 3412 Department or employee C an..35 | ||
28 | -- | ||
29 | -- Dependencies: 'simple3412', 'simple3413'. | ||
30 | compositeC056 :: Parser Value | ||
31 | compositeC056 = | ||
32 | composite "C056" | ||
33 | [ "010" .@ optional simple3413 | ||
34 | , "020" .@ optional simple3412 | ||
35 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C058.hs b/specification/src/Text/Edifact/D96A/Composites/C058.hs new file mode 100644 index 0000000..1c10294 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C058.hs | |||
@@ -0,0 +1,39 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C058 | ||
7 | ( -- * Definition | ||
8 | compositeC058 | ||
9 | -- * Dependencies | ||
10 | , simple3124 | ||
11 | ) where | ||
12 | |||
13 | import Text.Edifact.D96A.Simples (simple3124) | ||
14 | |||
15 | import Text.Edifact.Parsing | ||
16 | import Text.Edifact.Types (Value) | ||
17 | |||
18 | -- | Derived from this specification: | ||
19 | -- | ||
20 | -- > C058 NAME AND ADDRESS | ||
21 | -- > | ||
22 | -- > Desc: Unstructured name and address: one to five lines. | ||
23 | -- > | ||
24 | -- > 010 3124 Name and address line M an..35 | ||
25 | -- > 020 3124 Name and address line C an..35 | ||
26 | -- > 030 3124 Name and address line C an..35 | ||
27 | -- > 040 3124 Name and address line C an..35 | ||
28 | -- > 050 3124 Name and address line C an..35 | ||
29 | -- | ||
30 | -- Dependencies: 'simple3124'. | ||
31 | compositeC058 :: Parser Value | ||
32 | compositeC058 = | ||
33 | composite "C058" | ||
34 | [ "010" .@ mandatory simple3124 | ||
35 | , "020" .@ optional simple3124 | ||
36 | , "030" .@ optional simple3124 | ||
37 | , "040" .@ optional simple3124 | ||
38 | , "050" .@ optional simple3124 | ||
39 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C059.hs b/specification/src/Text/Edifact/D96A/Composites/C059.hs new file mode 100644 index 0000000..fa4e744 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C059.hs | |||
@@ -0,0 +1,38 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C059 | ||
7 | ( -- * Definition | ||
8 | compositeC059 | ||
9 | -- * Dependencies | ||
10 | , simple3042 | ||
11 | ) where | ||
12 | |||
13 | import Text.Edifact.D96A.Simples (simple3042) | ||
14 | |||
15 | import Text.Edifact.Parsing | ||
16 | import Text.Edifact.Types (Value) | ||
17 | |||
18 | -- | Derived from this specification: | ||
19 | -- | ||
20 | -- > * C059 STREET | ||
21 | -- > | ||
22 | -- > Desc: Street address and/or PO Box number in a structured | ||
23 | -- > address: one to three lines. | ||
24 | -- > | ||
25 | -- > 010 3042 Street and number/p.o. box M an..35 | ||
26 | -- > 020 3042 Street and number/p.o. box C an..35 | ||
27 | -- > 030 3042 Street and number/p.o. box C an..35 | ||
28 | -- > 040 + 3042 Street and number/p.o. box C an..35 | ||
29 | -- | ||
30 | -- Dependencies: 'simple3042'. | ||
31 | compositeC059 :: Parser Value | ||
32 | compositeC059 = | ||
33 | composite "C059" | ||
34 | [ "010" .@ mandatory simple3042 | ||
35 | , "020" .@ optional simple3042 | ||
36 | , "030" .@ optional simple3042 | ||
37 | , "040" .@ optional simple3042 | ||
38 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C076.hs b/specification/src/Text/Edifact/D96A/Composites/C076.hs new file mode 100644 index 0000000..6c9771c --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C076.hs | |||
@@ -0,0 +1,35 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C076 | ||
7 | ( -- * Definition | ||
8 | compositeC076 | ||
9 | -- * Dependencies | ||
10 | , simple3148 | ||
11 | , simple3155 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple3148, simple3155) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C076 COMMUNICATION CONTACT | ||
22 | -- > | ||
23 | -- > Desc: Communication number of a department or employee in a | ||
24 | -- > specified channel. | ||
25 | -- > | ||
26 | -- > 010 3148 Communication number M an..512 | ||
27 | -- > 020 3155 Communication channel qualifier M an..3 | ||
28 | -- | ||
29 | -- Dependencies: 'simple3148', 'simple3155'. | ||
30 | compositeC076 :: Parser Value | ||
31 | compositeC076 = | ||
32 | composite "C076" | ||
33 | [ "010" .@ mandatory simple3148 | ||
34 | , "020" .@ mandatory simple3155 | ||
35 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C080.hs b/specification/src/Text/Edifact/D96A/Composites/C080.hs new file mode 100644 index 0000000..fbeb348 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C080.hs | |||
@@ -0,0 +1,43 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C080 | ||
7 | ( -- * Definition | ||
8 | compositeC080 | ||
9 | -- * Dependencies | ||
10 | , simple3036 | ||
11 | , simple3045 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple3036, simple3045) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C080 PARTY NAME | ||
22 | -- > | ||
23 | -- > Desc: Identification of a transaction party by name, one to five | ||
24 | -- > lines. Party name may be formatted. | ||
25 | -- > | ||
26 | -- > 010 3036 Party name M an..35 | ||
27 | -- > 020 3036 Party name C an..35 | ||
28 | -- > 030 3036 Party name C an..35 | ||
29 | -- > 040 3036 Party name C an..35 | ||
30 | -- > 050 3036 Party name C an..35 | ||
31 | -- > 060 3045 Party name format, coded C an..3 | ||
32 | -- | ||
33 | -- Dependencies: 'simple3036', 'simple3045'. | ||
34 | compositeC080 :: Parser Value | ||
35 | compositeC080 = | ||
36 | composite "C080" | ||
37 | [ "010" .@ mandatory simple3036 | ||
38 | , "020" .@ optional simple3036 | ||
39 | , "030" .@ optional simple3036 | ||
40 | , "040" .@ optional simple3036 | ||
41 | , "050" .@ optional simple3036 | ||
42 | , "060" .@ optional simple3045 | ||
43 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C082.hs b/specification/src/Text/Edifact/D96A/Composites/C082.hs new file mode 100644 index 0000000..c891099 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C082.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C082 | ||
7 | ( -- * Definition | ||
8 | compositeC082 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3039 | ||
12 | , simple3055 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3039, simple3055) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C082 PARTY IDENTIFICATION DETAILS | ||
23 | -- > | ||
24 | -- > Desc: Identification of a transaction party by code. | ||
25 | -- > | ||
26 | -- > 010 3039 Party id. identification M an..35 | ||
27 | -- > 020 1131 Code list qualifier C an..3 | ||
28 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1131', 'simple3039', 'simple3055'. | ||
31 | compositeC082 :: Parser Value | ||
32 | compositeC082 = | ||
33 | composite "C082" | ||
34 | [ "010" .@ mandatory simple3039 | ||
35 | , "020" .@ optional simple1131 | ||
36 | , "030" .@ optional simple3055 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C100.hs b/specification/src/Text/Edifact/D96A/Composites/C100.hs new file mode 100644 index 0000000..2b45e00 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C100.hs | |||
@@ -0,0 +1,44 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C100 | ||
7 | ( -- * Definition | ||
8 | compositeC100 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple4052 | ||
13 | , simple4053 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple4052, | ||
17 | simple4053) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C100 TERMS OF DELIVERY OR TRANSPORT | ||
25 | -- > | ||
26 | -- > Desc: Terms of delivery or transport code from a specified | ||
27 | -- > source. | ||
28 | -- > | ||
29 | -- > 010 4053 Terms of delivery or transport, coded C an..3 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 4052 Terms of delivery or transport C an..70 | ||
33 | -- > 050 4052 Terms of delivery or transport C an..70 | ||
34 | -- | ||
35 | -- Dependencies: 'simple1131', 'simple3055', 'simple4052', 'simple4053'. | ||
36 | compositeC100 :: Parser Value | ||
37 | compositeC100 = | ||
38 | composite "C100" | ||
39 | [ "010" .@ optional simple4053 | ||
40 | , "020" .@ optional simple1131 | ||
41 | , "030" .@ optional simple3055 | ||
42 | , "040" .@ optional simple4052 | ||
43 | , "050" .@ optional simple4052 | ||
44 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C107.hs b/specification/src/Text/Edifact/D96A/Composites/C107.hs new file mode 100644 index 0000000..4a62e80 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C107.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C107 | ||
7 | ( -- * Definition | ||
8 | compositeC107 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple4441 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple4441) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C107 TEXT REFERENCE | ||
23 | -- > | ||
24 | -- > Desc: Coded reference to a standard text and its source. | ||
25 | -- > | ||
26 | -- > 010 4441 Free text, coded M an..3 | ||
27 | -- > 020 1131 Code list qualifier C an..3 | ||
28 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1131', 'simple3055', 'simple4441'. | ||
31 | compositeC107 :: Parser Value | ||
32 | compositeC107 = | ||
33 | composite "C107" | ||
34 | [ "010" .@ mandatory simple4441 | ||
35 | , "020" .@ optional simple1131 | ||
36 | , "030" .@ optional simple3055 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C108.hs b/specification/src/Text/Edifact/D96A/Composites/C108.hs new file mode 100644 index 0000000..47ae303 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C108.hs | |||
@@ -0,0 +1,39 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C108 | ||
7 | ( -- * Definition | ||
8 | compositeC108 | ||
9 | -- * Dependencies | ||
10 | , simple4440 | ||
11 | ) where | ||
12 | |||
13 | import Text.Edifact.D96A.Simples (simple4440) | ||
14 | |||
15 | import Text.Edifact.Parsing | ||
16 | import Text.Edifact.Types (Value) | ||
17 | |||
18 | -- | Derived from this specification: | ||
19 | -- | ||
20 | -- > C108 TEXT LITERAL | ||
21 | -- > | ||
22 | -- > Desc: Free text; one to five lines. | ||
23 | -- > | ||
24 | -- > 010 4440 Free text M an..70 | ||
25 | -- > 020 4440 Free text C an..70 | ||
26 | -- > 030 4440 Free text C an..70 | ||
27 | -- > 040 4440 Free text C an..70 | ||
28 | -- > 050 4440 Free text C an..70 | ||
29 | -- | ||
30 | -- Dependencies: 'simple4440'. | ||
31 | compositeC108 :: Parser Value | ||
32 | compositeC108 = | ||
33 | composite "C108" | ||
34 | [ "010" .@ mandatory simple4440 | ||
35 | , "020" .@ optional simple4440 | ||
36 | , "030" .@ optional simple4440 | ||
37 | , "040" .@ optional simple4440 | ||
38 | , "050" .@ optional simple4440 | ||
39 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C174.hs b/specification/src/Text/Edifact/D96A/Composites/C174.hs new file mode 100644 index 0000000..69ad7d6 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C174.hs | |||
@@ -0,0 +1,45 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C174 | ||
7 | ( -- * Definition | ||
8 | compositeC174 | ||
9 | -- * Dependencies | ||
10 | , simple6152 | ||
11 | , simple6162 | ||
12 | , simple6314 | ||
13 | , simple6411 | ||
14 | , simple6432 | ||
15 | ) where | ||
16 | |||
17 | import Text.Edifact.D96A.Simples (simple6152, simple6162, simple6314, | ||
18 | simple6411, simple6432) | ||
19 | |||
20 | import Text.Edifact.Parsing | ||
21 | import Text.Edifact.Types (Value) | ||
22 | |||
23 | -- | Derived from this specification: | ||
24 | -- | ||
25 | -- > C174 VALUE/RANGE | ||
26 | -- > | ||
27 | -- > Desc: Measurement value and relevant minimum and maximum | ||
28 | -- > tolerances in that order. | ||
29 | -- > | ||
30 | -- > 010 6411 Measure unit qualifier M an..3 | ||
31 | -- > 020 6314 Measurement value C n..18 | ||
32 | -- > 030 6162 Range minimum C n..18 | ||
33 | -- > 040 6152 Range maximum C n..18 | ||
34 | -- > 050 6432 Significant digits C n..2 | ||
35 | -- | ||
36 | -- Dependencies: 'simple6152', 'simple6162', 'simple6314', 'simple6411', 'simple6432'. | ||
37 | compositeC174 :: Parser Value | ||
38 | compositeC174 = | ||
39 | composite "C174" | ||
40 | [ "010" .@ mandatory simple6411 | ||
41 | , "020" .@ optional simple6314 | ||
42 | , "030" .@ optional simple6162 | ||
43 | , "040" .@ optional simple6152 | ||
44 | , "050" .@ optional simple6432 | ||
45 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C186.hs b/specification/src/Text/Edifact/D96A/Composites/C186.hs new file mode 100644 index 0000000..065d2d7 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C186.hs | |||
@@ -0,0 +1,38 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C186 | ||
7 | ( -- * Definition | ||
8 | compositeC186 | ||
9 | -- * Dependencies | ||
10 | , simple6060 | ||
11 | , simple6063 | ||
12 | , simple6411 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple6060, simple6063, simple6411) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C186 QUANTITY DETAILS | ||
23 | -- > | ||
24 | -- > Desc: Quantity information in a transaction, qualified when | ||
25 | -- > relevant. | ||
26 | -- > | ||
27 | -- > 010 6063 Quantity qualifier M an..3 | ||
28 | -- > 020 6060 Quantity M n..15 | ||
29 | -- > 030 6411 Measure unit qualifier C an..3 | ||
30 | -- | ||
31 | -- Dependencies: 'simple6060', 'simple6063', 'simple6411'. | ||
32 | compositeC186 :: Parser Value | ||
33 | compositeC186 = | ||
34 | composite "C186" | ||
35 | [ "010" .@ mandatory simple6063 | ||
36 | , "020" .@ mandatory simple6060 | ||
37 | , "030" .@ optional simple6411 | ||
38 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C200.hs b/specification/src/Text/Edifact/D96A/Composites/C200.hs new file mode 100644 index 0000000..b5183b8 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C200.hs | |||
@@ -0,0 +1,47 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C200 | ||
7 | ( -- * Definition | ||
8 | compositeC200 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple4237 | ||
13 | , simple7140 | ||
14 | , simple8022 | ||
15 | , simple8023 | ||
16 | ) where | ||
17 | |||
18 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple4237, | ||
19 | simple7140, simple8022, simple8023) | ||
20 | |||
21 | import Text.Edifact.Parsing | ||
22 | import Text.Edifact.Types (Value) | ||
23 | |||
24 | -- | Derived from this specification: | ||
25 | -- | ||
26 | -- > * C200 CHARGE | ||
27 | -- > | ||
28 | -- > Desc: Identification of a charge by code and/or by name. | ||
29 | -- > | ||
30 | -- > 010 8023 Freight and charges identification C an..17 | ||
31 | -- > 020 1131 Code list qualifier C an..3 | ||
32 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
33 | -- > 040 8022 Freight and charges C an..26 | ||
34 | -- > 050 4237 Prepaid/collect indicator, coded C an..3 | ||
35 | -- > 060 + 7140 Item number C an..35 | ||
36 | -- | ||
37 | -- Dependencies: 'simple1131', 'simple3055', 'simple4237', 'simple7140', 'simple8022', 'simple8023'. | ||
38 | compositeC200 :: Parser Value | ||
39 | compositeC200 = | ||
40 | composite "C200" | ||
41 | [ "010" .@ optional simple8023 | ||
42 | , "020" .@ optional simple1131 | ||
43 | , "030" .@ optional simple3055 | ||
44 | , "040" .@ optional simple8022 | ||
45 | , "050" .@ optional simple4237 | ||
46 | , "060" .@ optional simple7140 | ||
47 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C202.hs b/specification/src/Text/Edifact/D96A/Composites/C202.hs new file mode 100644 index 0000000..0ec5279 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C202.hs | |||
@@ -0,0 +1,42 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C202 | ||
7 | ( -- * Definition | ||
8 | compositeC202 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple7064 | ||
13 | , simple7065 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple7064, | ||
17 | simple7065) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C202 PACKAGE TYPE | ||
25 | -- > | ||
26 | -- > Desc: Type of package by name or by code from a specified | ||
27 | -- > source. | ||
28 | -- > | ||
29 | -- > 010 7065 Type of packages identification C an..17 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 7064 Type of packages C an..35 | ||
33 | -- | ||
34 | -- Dependencies: 'simple1131', 'simple3055', 'simple7064', 'simple7065'. | ||
35 | compositeC202 :: Parser Value | ||
36 | compositeC202 = | ||
37 | composite "C202" | ||
38 | [ "010" .@ optional simple7065 | ||
39 | , "020" .@ optional simple1131 | ||
40 | , "030" .@ optional simple3055 | ||
41 | , "040" .@ optional simple7064 | ||
42 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C203.hs b/specification/src/Text/Edifact/D96A/Composites/C203.hs new file mode 100644 index 0000000..d188bf1 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C203.hs | |||
@@ -0,0 +1,56 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C203 | ||
7 | ( -- * Definition | ||
8 | compositeC203 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple5242 | ||
13 | , simple5243 | ||
14 | , simple5275 | ||
15 | ) where | ||
16 | |||
17 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple5242, | ||
18 | simple5243, simple5275) | ||
19 | |||
20 | import Text.Edifact.Parsing | ||
21 | import Text.Edifact.Types (Value) | ||
22 | |||
23 | -- | Derived from this specification: | ||
24 | -- | ||
25 | -- > C203 RATE/TARIFF CLASS | ||
26 | -- > | ||
27 | -- > Desc: Identification of the applicable rate/tariff class. | ||
28 | -- > | ||
29 | -- > 010 5243 Rate/tariff class identification M an..9 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 5242 Rate/tariff class C an..35 | ||
33 | -- > 050 5275 Supplementary rate/tariff basis C an..6 | ||
34 | -- > identification | ||
35 | -- > 060 1131 Code list qualifier C an..3 | ||
36 | -- > 070 3055 Code list responsible agency, coded C an..3 | ||
37 | -- > 080 5275 Supplementary rate/tariff basis C an..6 | ||
38 | -- > identification | ||
39 | -- > 090 1131 Code list qualifier C an..3 | ||
40 | -- > 100 3055 Code list responsible agency, coded C an..3 | ||
41 | -- | ||
42 | -- Dependencies: 'simple1131', 'simple3055', 'simple5242', 'simple5243', 'simple5275'. | ||
43 | compositeC203 :: Parser Value | ||
44 | compositeC203 = | ||
45 | composite "C203" | ||
46 | [ "010" .@ mandatory simple5243 | ||
47 | , "020" .@ optional simple1131 | ||
48 | , "030" .@ optional simple3055 | ||
49 | , "040" .@ optional simple5242 | ||
50 | , "050" .@ optional simple5275 | ||
51 | , "060" .@ optional simple1131 | ||
52 | , "070" .@ optional simple3055 | ||
53 | , "080" .@ optional simple5275 | ||
54 | , "090" .@ optional simple1131 | ||
55 | , "100" .@ optional simple3055 | ||
56 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C205.hs b/specification/src/Text/Edifact/D96A/Composites/C205.hs new file mode 100644 index 0000000..c83dac3 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C205.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C205 | ||
7 | ( -- * Definition | ||
8 | compositeC205 | ||
9 | -- * Dependencies | ||
10 | , simple8078 | ||
11 | , simple8092 | ||
12 | , simple8351 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple8078, simple8092, simple8351) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C205 HAZARD CODE | ||
23 | -- > | ||
24 | -- > Desc: The identification of the dangerous goods in code. | ||
25 | -- > | ||
26 | -- > 010 8351 Hazard code identification M an..7 | ||
27 | -- > 020 8078 Hazard substance/item/page number C an..7 | ||
28 | -- > 030 8092 Hazard code version number C an..10 | ||
29 | -- | ||
30 | -- Dependencies: 'simple8078', 'simple8092', 'simple8351'. | ||
31 | compositeC205 :: Parser Value | ||
32 | compositeC205 = | ||
33 | composite "C205" | ||
34 | [ "010" .@ mandatory simple8351 | ||
35 | , "020" .@ optional simple8078 | ||
36 | , "030" .@ optional simple8092 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C206.hs b/specification/src/Text/Edifact/D96A/Composites/C206.hs new file mode 100644 index 0000000..2af9360 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C206.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C206 | ||
7 | ( -- * Definition | ||
8 | compositeC206 | ||
9 | -- * Dependencies | ||
10 | , simple4405 | ||
11 | , simple7402 | ||
12 | , simple7405 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple4405, simple7402, simple7405) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C206 IDENTIFICATION NUMBER | ||
23 | -- > | ||
24 | -- > Desc: The identification of an object. | ||
25 | -- > | ||
26 | -- > 010 7402 Identity number M an..35 | ||
27 | -- > 020 7405 Identity number qualifier C an..3 | ||
28 | -- > 030 4405 Status, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple4405', 'simple7402', 'simple7405'. | ||
31 | compositeC206 :: Parser Value | ||
32 | compositeC206 = | ||
33 | composite "C206" | ||
34 | [ "010" .@ mandatory simple7402 | ||
35 | , "020" .@ optional simple7405 | ||
36 | , "030" .@ optional simple4405 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C208.hs b/specification/src/Text/Edifact/D96A/Composites/C208.hs new file mode 100644 index 0000000..c9652cc --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C208.hs | |||
@@ -0,0 +1,34 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C208 | ||
7 | ( -- * Definition | ||
8 | compositeC208 | ||
9 | -- * Dependencies | ||
10 | , simple7402 | ||
11 | ) where | ||
12 | |||
13 | import Text.Edifact.D96A.Simples (simple7402) | ||
14 | |||
15 | import Text.Edifact.Parsing | ||
16 | import Text.Edifact.Types (Value) | ||
17 | |||
18 | -- | Derived from this specification: | ||
19 | -- | ||
20 | -- > C208 IDENTITY NUMBER RANGE | ||
21 | -- > | ||
22 | -- > Desc: Goods item identification numbers, start and end of | ||
23 | -- > consecutively numbered range. | ||
24 | -- > | ||
25 | -- > 010 7402 Identity number M an..35 | ||
26 | -- > 020 7402 Identity number C an..35 | ||
27 | -- | ||
28 | -- Dependencies: 'simple7402'. | ||
29 | compositeC208 :: Parser Value | ||
30 | compositeC208 = | ||
31 | composite "C208" | ||
32 | [ "010" .@ mandatory simple7402 | ||
33 | , "020" .@ optional simple7402 | ||
34 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C210.hs b/specification/src/Text/Edifact/D96A/Composites/C210.hs new file mode 100644 index 0000000..f1732ba --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C210.hs | |||
@@ -0,0 +1,49 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C210 | ||
7 | ( -- * Definition | ||
8 | compositeC210 | ||
9 | -- * Dependencies | ||
10 | , simple7102 | ||
11 | ) where | ||
12 | |||
13 | import Text.Edifact.D96A.Simples (simple7102) | ||
14 | |||
15 | import Text.Edifact.Parsing | ||
16 | import Text.Edifact.Types (Value) | ||
17 | |||
18 | -- | Derived from this specification: | ||
19 | -- | ||
20 | -- > | C210 MARKS & LABELS | ||
21 | -- > | ||
22 | -- > | Desc: Shipping marks on packages in free text; one to ten lines. | ||
23 | -- > | ||
24 | -- > 010 7102 Shipping marks M an..35 | ||
25 | -- > 020 7102 Shipping marks C an..35 | ||
26 | -- > 030 7102 Shipping marks C an..35 | ||
27 | -- > 040 7102 Shipping marks C an..35 | ||
28 | -- > 050 7102 Shipping marks C an..35 | ||
29 | -- > 060 7102 Shipping marks C an..35 | ||
30 | -- > 070 7102 Shipping marks C an..35 | ||
31 | -- > 080 7102 Shipping marks C an..35 | ||
32 | -- > 090 7102 Shipping marks C an..35 | ||
33 | -- > 100 7102 Shipping marks C an..35 | ||
34 | -- | ||
35 | -- Dependencies: 'simple7102'. | ||
36 | compositeC210 :: Parser Value | ||
37 | compositeC210 = | ||
38 | composite "C210" | ||
39 | [ "010" .@ mandatory simple7102 | ||
40 | , "020" .@ optional simple7102 | ||
41 | , "030" .@ optional simple7102 | ||
42 | , "040" .@ optional simple7102 | ||
43 | , "050" .@ optional simple7102 | ||
44 | , "060" .@ optional simple7102 | ||
45 | , "070" .@ optional simple7102 | ||
46 | , "080" .@ optional simple7102 | ||
47 | , "090" .@ optional simple7102 | ||
48 | , "100" .@ optional simple7102 | ||
49 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C211.hs b/specification/src/Text/Edifact/D96A/Composites/C211.hs new file mode 100644 index 0000000..cd54f20 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C211.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C211 | ||
7 | ( -- * Definition | ||
8 | compositeC211 | ||
9 | -- * Dependencies | ||
10 | , simple6008 | ||
11 | , simple6140 | ||
12 | , simple6168 | ||
13 | , simple6411 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple6008, simple6140, simple6168, | ||
17 | simple6411) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C211 DIMENSIONS | ||
25 | -- > | ||
26 | -- > Desc: Specification of the dimensions of a transportable unit. | ||
27 | -- > | ||
28 | -- > 010 6411 Measure unit qualifier M an..3 | ||
29 | -- > 020 6168 Length dimension C n..15 | ||
30 | -- > 030 6140 Width dimension C n..15 | ||
31 | -- > 040 6008 Height dimension C n..15 | ||
32 | -- | ||
33 | -- Dependencies: 'simple6008', 'simple6140', 'simple6168', 'simple6411'. | ||
34 | compositeC211 :: Parser Value | ||
35 | compositeC211 = | ||
36 | composite "C211" | ||
37 | [ "010" .@ mandatory simple6411 | ||
38 | , "020" .@ optional simple6168 | ||
39 | , "030" .@ optional simple6140 | ||
40 | , "040" .@ optional simple6008 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C212.hs b/specification/src/Text/Edifact/D96A/Composites/C212.hs new file mode 100644 index 0000000..c6faaae --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C212.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C212 | ||
7 | ( -- * Definition | ||
8 | compositeC212 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple7140 | ||
13 | , simple7143 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple7140, | ||
17 | simple7143) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C212 ITEM NUMBER IDENTIFICATION | ||
25 | -- > | ||
26 | -- > Desc: Goods identification for a specified source. | ||
27 | -- > | ||
28 | -- > 010 7140 Item number C an..35 | ||
29 | -- > 020 7143 Item number type, coded C an..3 | ||
30 | -- > 030 1131 Code list qualifier C an..3 | ||
31 | -- > 040 3055 Code list responsible agency, coded C an..3 | ||
32 | -- | ||
33 | -- Dependencies: 'simple1131', 'simple3055', 'simple7140', 'simple7143'. | ||
34 | compositeC212 :: Parser Value | ||
35 | compositeC212 = | ||
36 | composite "C212" | ||
37 | [ "010" .@ optional simple7140 | ||
38 | , "020" .@ optional simple7143 | ||
39 | , "030" .@ optional simple1131 | ||
40 | , "040" .@ optional simple3055 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C213.hs b/specification/src/Text/Edifact/D96A/Composites/C213.hs new file mode 100644 index 0000000..cf3fc36 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C213.hs | |||
@@ -0,0 +1,44 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C213 | ||
7 | ( -- * Definition | ||
8 | compositeC213 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple7064 | ||
13 | , simple7065 | ||
14 | , simple7224 | ||
15 | ) where | ||
16 | |||
17 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple7064, | ||
18 | simple7065, simple7224) | ||
19 | |||
20 | import Text.Edifact.Parsing | ||
21 | import Text.Edifact.Types (Value) | ||
22 | |||
23 | -- | Derived from this specification: | ||
24 | -- | ||
25 | -- > C213 NUMBER AND TYPE OF PACKAGES | ||
26 | -- > | ||
27 | -- > Desc: Number and type of individual parts of a shipment. | ||
28 | -- > | ||
29 | -- > 010 7224 Number of packages C n..8 | ||
30 | -- > 020 7065 Type of packages identification C an..17 | ||
31 | -- > 030 1131 Code list qualifier C an..3 | ||
32 | -- > 040 3055 Code list responsible agency, coded C an..3 | ||
33 | -- > 050 7064 Type of packages C an..35 | ||
34 | -- | ||
35 | -- Dependencies: 'simple1131', 'simple3055', 'simple7064', 'simple7065', 'simple7224'. | ||
36 | compositeC213 :: Parser Value | ||
37 | compositeC213 = | ||
38 | composite "C213" | ||
39 | [ "010" .@ optional simple7224 | ||
40 | , "020" .@ optional simple7065 | ||
41 | , "030" .@ optional simple1131 | ||
42 | , "040" .@ optional simple3055 | ||
43 | , "050" .@ optional simple7064 | ||
44 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C214.hs b/specification/src/Text/Edifact/D96A/Composites/C214.hs new file mode 100644 index 0000000..2f7180c --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C214.hs | |||
@@ -0,0 +1,44 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C214 | ||
7 | ( -- * Definition | ||
8 | compositeC214 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple7160 | ||
13 | , simple7161 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple7160, | ||
17 | simple7161) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > * C214 SPECIAL SERVICES IDENTIFICATION | ||
25 | -- > | ||
26 | -- > Desc: Identification of a special service by a code from a | ||
27 | -- > specified source or by description. | ||
28 | -- > | ||
29 | -- > 010 7161 Special services, coded C an..3 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 7160 Special service C an..35 | ||
33 | -- > 050 + 7160 Special service C an..35 | ||
34 | -- | ||
35 | -- Dependencies: 'simple1131', 'simple3055', 'simple7160', 'simple7161'. | ||
36 | compositeC214 :: Parser Value | ||
37 | compositeC214 = | ||
38 | composite "C214" | ||
39 | [ "010" .@ optional simple7161 | ||
40 | , "020" .@ optional simple1131 | ||
41 | , "030" .@ optional simple3055 | ||
42 | , "040" .@ optional simple7160 | ||
43 | , "050" .@ optional simple7160 | ||
44 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C215.hs b/specification/src/Text/Edifact/D96A/Composites/C215.hs new file mode 100644 index 0000000..ae355b2 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C215.hs | |||
@@ -0,0 +1,42 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C215 | ||
7 | ( -- * Definition | ||
8 | compositeC215 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple9302 | ||
13 | , simple9303 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple9302, | ||
17 | simple9303) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C215 SEAL ISSUER | ||
25 | -- > | ||
26 | -- > Desc: Identification of the issuer of a seal on equipment either | ||
27 | -- > by code or by name. | ||
28 | -- > | ||
29 | -- > 010 9303 Sealing party, coded C an..3 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 9302 Sealing party C an..35 | ||
33 | -- | ||
34 | -- Dependencies: 'simple1131', 'simple3055', 'simple9302', 'simple9303'. | ||
35 | compositeC215 :: Parser Value | ||
36 | compositeC215 = | ||
37 | composite "C215" | ||
38 | [ "010" .@ optional simple9303 | ||
39 | , "020" .@ optional simple1131 | ||
40 | , "030" .@ optional simple3055 | ||
41 | , "040" .@ optional simple9302 | ||
42 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C218.hs b/specification/src/Text/Edifact/D96A/Composites/C218.hs new file mode 100644 index 0000000..80f5a8d --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C218.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C218 | ||
7 | ( -- * Definition | ||
8 | compositeC218 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple7419 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple7419) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C218 HAZARDOUS MATERIAL | ||
23 | -- > | ||
24 | -- > Desc: Hazardous material code from a specified source. | ||
25 | -- > | ||
26 | -- > 010 7419 Hazardous material class code, identification C an..4 | ||
27 | -- > 020 1131 Code list qualifier C an..3 | ||
28 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1131', 'simple3055', 'simple7419'. | ||
31 | compositeC218 :: Parser Value | ||
32 | compositeC218 = | ||
33 | composite "C218" | ||
34 | [ "010" .@ optional simple7419 | ||
35 | , "020" .@ optional simple1131 | ||
36 | , "030" .@ optional simple3055 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C219.hs b/specification/src/Text/Edifact/D96A/Composites/C219.hs new file mode 100644 index 0000000..df98581 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C219.hs | |||
@@ -0,0 +1,34 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C219 | ||
7 | ( -- * Definition | ||
8 | compositeC219 | ||
9 | -- * Dependencies | ||
10 | , simple8334 | ||
11 | , simple8335 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple8334, simple8335) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C219 MOVEMENT TYPE | ||
22 | -- > | ||
23 | -- > Desc: Description of type of service for movement of cargo. | ||
24 | -- > | ||
25 | -- > 010 8335 Movement type, coded C an..3 | ||
26 | -- > 020 8334 Movement type C an..35 | ||
27 | -- | ||
28 | -- Dependencies: 'simple8334', 'simple8335'. | ||
29 | compositeC219 :: Parser Value | ||
30 | compositeC219 = | ||
31 | composite "C219" | ||
32 | [ "010" .@ optional simple8335 | ||
33 | , "020" .@ optional simple8334 | ||
34 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C220.hs b/specification/src/Text/Edifact/D96A/Composites/C220.hs new file mode 100644 index 0000000..480c86d --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C220.hs | |||
@@ -0,0 +1,34 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C220 | ||
7 | ( -- * Definition | ||
8 | compositeC220 | ||
9 | -- * Dependencies | ||
10 | , simple8066 | ||
11 | , simple8067 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple8066, simple8067) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C220 MODE OF TRANSPORT | ||
22 | -- > | ||
23 | -- > Desc: Method of transport code or name. Code preferred. | ||
24 | -- > | ||
25 | -- > 010 8067 Mode of transport, coded C an..3 | ||
26 | -- > 020 8066 Mode of transport C an..17 | ||
27 | -- | ||
28 | -- Dependencies: 'simple8066', 'simple8067'. | ||
29 | compositeC220 :: Parser Value | ||
30 | compositeC220 = | ||
31 | composite "C220" | ||
32 | [ "010" .@ optional simple8067 | ||
33 | , "020" .@ optional simple8066 | ||
34 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C222.hs b/specification/src/Text/Edifact/D96A/Composites/C222.hs new file mode 100644 index 0000000..5f5b116 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C222.hs | |||
@@ -0,0 +1,44 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C222 | ||
7 | ( -- * Definition | ||
8 | compositeC222 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple8212 | ||
13 | , simple8213 | ||
14 | , simple8453 | ||
15 | ) where | ||
16 | |||
17 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple8212, | ||
18 | simple8213, simple8453) | ||
19 | |||
20 | import Text.Edifact.Parsing | ||
21 | import Text.Edifact.Types (Value) | ||
22 | |||
23 | -- | Derived from this specification: | ||
24 | -- | ||
25 | -- > C222 TRANSPORT IDENTIFICATION | ||
26 | -- > | ||
27 | -- > Desc: Code and/or name identifying the means of transport. | ||
28 | -- > | ||
29 | -- > 010 8213 Id. of means of transport identification C an..9 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 8212 Id. of the means of transport C an..35 | ||
33 | -- > 050 8453 Nationality of means of transport, coded C an..3 | ||
34 | -- | ||
35 | -- Dependencies: 'simple1131', 'simple3055', 'simple8212', 'simple8213', 'simple8453'. | ||
36 | compositeC222 :: Parser Value | ||
37 | compositeC222 = | ||
38 | composite "C222" | ||
39 | [ "010" .@ optional simple8213 | ||
40 | , "020" .@ optional simple1131 | ||
41 | , "030" .@ optional simple3055 | ||
42 | , "040" .@ optional simple8212 | ||
43 | , "050" .@ optional simple8453 | ||
44 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C223.hs b/specification/src/Text/Edifact/D96A/Composites/C223.hs new file mode 100644 index 0000000..9f39949 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C223.hs | |||
@@ -0,0 +1,35 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C223 | ||
7 | ( -- * Definition | ||
8 | compositeC223 | ||
9 | -- * Dependencies | ||
10 | , simple6411 | ||
11 | , simple7106 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple6411, simple7106) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C223 DANGEROUS GOODS SHIPMENT FLASHPOINT | ||
22 | -- > | ||
23 | -- > Desc: Temperature at which a vapor according to ISO 1523/73 can | ||
24 | -- > be ignited. | ||
25 | -- > | ||
26 | -- > 010 7106 Shipment flashpoint C n3 | ||
27 | -- > 020 6411 Measure unit qualifier C an..3 | ||
28 | -- | ||
29 | -- Dependencies: 'simple6411', 'simple7106'. | ||
30 | compositeC223 :: Parser Value | ||
31 | compositeC223 = | ||
32 | composite "C223" | ||
33 | [ "010" .@ optional simple7106 | ||
34 | , "020" .@ optional simple6411 | ||
35 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C224.hs b/specification/src/Text/Edifact/D96A/Composites/C224.hs new file mode 100644 index 0000000..a352d7e --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C224.hs | |||
@@ -0,0 +1,42 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C224 | ||
7 | ( -- * Definition | ||
8 | compositeC224 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple8154 | ||
13 | , simple8155 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple8154, | ||
17 | simple8155) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C224 EQUIPMENT SIZE AND TYPE | ||
25 | -- > | ||
26 | -- > Desc: Code and/or name identifying size and type of equipment | ||
27 | -- > used in transport. Code preferred. | ||
28 | -- > | ||
29 | -- > 010 8155 Equipment size and type identification C an..10 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 8154 Equipment size and type C an..35 | ||
33 | -- | ||
34 | -- Dependencies: 'simple1131', 'simple3055', 'simple8154', 'simple8155'. | ||
35 | compositeC224 :: Parser Value | ||
36 | compositeC224 = | ||
37 | composite "C224" | ||
38 | [ "010" .@ optional simple8155 | ||
39 | , "020" .@ optional simple1131 | ||
40 | , "030" .@ optional simple3055 | ||
41 | , "040" .@ optional simple8154 | ||
42 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C228.hs b/specification/src/Text/Edifact/D96A/Composites/C228.hs new file mode 100644 index 0000000..a44ac07 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C228.hs | |||
@@ -0,0 +1,35 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C228 | ||
7 | ( -- * Definition | ||
8 | compositeC228 | ||
9 | -- * Dependencies | ||
10 | , simple8178 | ||
11 | , simple8179 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple8178, simple8179) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C228 TRANSPORT MEANS | ||
22 | -- > | ||
23 | -- > Desc: Code and/or name identifying the type of means of | ||
24 | -- > transport. | ||
25 | -- > | ||
26 | -- > 010 8179 Type of means of transport identification C an..8 | ||
27 | -- > 020 8178 Type of means of transport C an..17 | ||
28 | -- | ||
29 | -- Dependencies: 'simple8178', 'simple8179'. | ||
30 | compositeC228 :: Parser Value | ||
31 | compositeC228 = | ||
32 | composite "C228" | ||
33 | [ "010" .@ optional simple8179 | ||
34 | , "020" .@ optional simple8178 | ||
35 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C229.hs b/specification/src/Text/Edifact/D96A/Composites/C229.hs new file mode 100644 index 0000000..bb865d8 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C229.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C229 | ||
7 | ( -- * Definition | ||
8 | compositeC229 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple5237 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple5237) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C229 CHARGE CATEGORY | ||
23 | -- > | ||
24 | -- > Desc: Identification of a category or a zone of charges. | ||
25 | -- > | ||
26 | -- > 010 5237 Charge category, coded M an..3 | ||
27 | -- > 020 1131 Code list qualifier C an..3 | ||
28 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1131', 'simple3055', 'simple5237'. | ||
31 | compositeC229 :: Parser Value | ||
32 | compositeC229 = | ||
33 | composite "C229" | ||
34 | [ "010" .@ mandatory simple5237 | ||
35 | , "020" .@ optional simple1131 | ||
36 | , "030" .@ optional simple3055 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C231.hs b/specification/src/Text/Edifact/D96A/Composites/C231.hs new file mode 100644 index 0000000..707fb5e --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C231.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C231 | ||
7 | ( -- * Definition | ||
8 | compositeC231 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple4215 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple4215) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C231 METHOD OF PAYMENT | ||
23 | -- > | ||
24 | -- > Desc: Code identifying the method of payment. | ||
25 | -- > | ||
26 | -- > 010 4215 Transport charges method of payment, coded M an..3 | ||
27 | -- > 020 1131 Code list qualifier C an..3 | ||
28 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1131', 'simple3055', 'simple4215'. | ||
31 | compositeC231 :: Parser Value | ||
32 | compositeC231 = | ||
33 | composite "C231" | ||
34 | [ "010" .@ mandatory simple4215 | ||
35 | , "020" .@ optional simple1131 | ||
36 | , "030" .@ optional simple3055 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C232.hs b/specification/src/Text/Edifact/D96A/Composites/C232.hs new file mode 100644 index 0000000..d7d1b4b --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C232.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C232 | ||
7 | ( -- * Definition | ||
8 | compositeC232 | ||
9 | -- * Dependencies | ||
10 | , simple9353 | ||
11 | , simple9411 | ||
12 | , simple9415 | ||
13 | , simple9417 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple9353, simple9411, simple9415, | ||
17 | simple9417) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C232 GOVERNMENT ACTION | ||
25 | -- > | ||
26 | -- > Desc: Code indicating a type of government action. | ||
27 | -- > | ||
28 | -- > 010 9415 Government agency, coded C an..3 | ||
29 | -- > 020 9411 Government involvement, coded C an..3 | ||
30 | -- > 030 9417 Government action, coded C an..3 | ||
31 | -- > 040 9353 Government procedure, coded C an..3 | ||
32 | -- | ||
33 | -- Dependencies: 'simple9353', 'simple9411', 'simple9415', 'simple9417'. | ||
34 | compositeC232 :: Parser Value | ||
35 | compositeC232 = | ||
36 | composite "C232" | ||
37 | [ "010" .@ optional simple9415 | ||
38 | , "020" .@ optional simple9411 | ||
39 | , "030" .@ optional simple9417 | ||
40 | , "040" .@ optional simple9353 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C233.hs b/specification/src/Text/Edifact/D96A/Composites/C233.hs new file mode 100644 index 0000000..de37b8f --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C233.hs | |||
@@ -0,0 +1,44 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C233 | ||
7 | ( -- * Definition | ||
8 | compositeC233 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple7273 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple7273) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > | C233 SERVICE | ||
23 | -- > | ||
24 | -- > | Desc: To identify a service (which may constitute an additional | ||
25 | -- > component to a basic contract). | ||
26 | -- > | ||
27 | -- > 010 7273 Service requirement, coded M an..3 | ||
28 | -- > 020 1131 Code list qualifier C an..3 | ||
29 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
30 | -- > 040 7273 Service requirement, coded C an..3 | ||
31 | -- > 050 1131 Code list qualifier C an..3 | ||
32 | -- > 060 3055 Code list responsible agency, coded C an..3 | ||
33 | -- | ||
34 | -- Dependencies: 'simple1131', 'simple3055', 'simple7273'. | ||
35 | compositeC233 :: Parser Value | ||
36 | compositeC233 = | ||
37 | composite "C233" | ||
38 | [ "010" .@ mandatory simple7273 | ||
39 | , "020" .@ optional simple1131 | ||
40 | , "030" .@ optional simple3055 | ||
41 | , "040" .@ optional simple7273 | ||
42 | , "050" .@ optional simple1131 | ||
43 | , "060" .@ optional simple3055 | ||
44 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C234.hs b/specification/src/Text/Edifact/D96A/Composites/C234.hs new file mode 100644 index 0000000..38ef543 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C234.hs | |||
@@ -0,0 +1,35 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C234 | ||
7 | ( -- * Definition | ||
8 | compositeC234 | ||
9 | -- * Dependencies | ||
10 | , simple7088 | ||
11 | , simple7124 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple7088, simple7124) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C234 UNDG INFORMATION | ||
22 | -- > | ||
23 | -- > Desc: Information on United Nations Dangerous Goods | ||
24 | -- > classification. | ||
25 | -- > | ||
26 | -- > 010 7124 UNDG number C n4 | ||
27 | -- > 020 7088 Dangerous goods flashpoint C an..8 | ||
28 | -- | ||
29 | -- Dependencies: 'simple7088', 'simple7124'. | ||
30 | compositeC234 :: Parser Value | ||
31 | compositeC234 = | ||
32 | composite "C234" | ||
33 | [ "010" .@ optional simple7124 | ||
34 | , "020" .@ optional simple7088 | ||
35 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C235.hs b/specification/src/Text/Edifact/D96A/Composites/C235.hs new file mode 100644 index 0000000..966f312 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C235.hs | |||
@@ -0,0 +1,35 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C235 | ||
7 | ( -- * Definition | ||
8 | compositeC235 | ||
9 | -- * Dependencies | ||
10 | , simple8158 | ||
11 | , simple8186 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple8158, simple8186) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C235 HAZARD IDENTIFICATION | ||
22 | -- > | ||
23 | -- > Desc: Identification of the Orange placard required on the means | ||
24 | -- > of transport. | ||
25 | -- > | ||
26 | -- > 010 8158 Hazard identification number, upper part C an..4 | ||
27 | -- > 020 8186 Substance identification number, lower part C an4 | ||
28 | -- | ||
29 | -- Dependencies: 'simple8158', 'simple8186'. | ||
30 | compositeC235 :: Parser Value | ||
31 | compositeC235 = | ||
32 | composite "C235" | ||
33 | [ "010" .@ optional simple8158 | ||
34 | , "020" .@ optional simple8186 | ||
35 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C236.hs b/specification/src/Text/Edifact/D96A/Composites/C236.hs new file mode 100644 index 0000000..5e1455f --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C236.hs | |||
@@ -0,0 +1,36 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C236 | ||
7 | ( -- * Definition | ||
8 | compositeC236 | ||
9 | -- * Dependencies | ||
10 | , simple8246 | ||
11 | ) where | ||
12 | |||
13 | import Text.Edifact.D96A.Simples (simple8246) | ||
14 | |||
15 | import Text.Edifact.Parsing | ||
16 | import Text.Edifact.Types (Value) | ||
17 | |||
18 | -- | Derived from this specification: | ||
19 | -- | ||
20 | -- > C236 DANGEROUS GOODS LABEL | ||
21 | -- > | ||
22 | -- > Desc: Markings identifying the type of hazardous goods and | ||
23 | -- > similar information. | ||
24 | -- > | ||
25 | -- > 010 8246 Dangerous goods label marking C an..4 | ||
26 | -- > 020 8246 Dangerous goods label marking C an..4 | ||
27 | -- > 030 8246 Dangerous goods label marking C an..4 | ||
28 | -- | ||
29 | -- Dependencies: 'simple8246'. | ||
30 | compositeC236 :: Parser Value | ||
31 | compositeC236 = | ||
32 | composite "C236" | ||
33 | [ "010" .@ optional simple8246 | ||
34 | , "020" .@ optional simple8246 | ||
35 | , "030" .@ optional simple8246 | ||
36 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C237.hs b/specification/src/Text/Edifact/D96A/Composites/C237.hs new file mode 100644 index 0000000..d8136b6 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C237.hs | |||
@@ -0,0 +1,42 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C237 | ||
7 | ( -- * Definition | ||
8 | compositeC237 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple3207 | ||
13 | , simple8260 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple3207, | ||
17 | simple8260) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C237 EQUIPMENT IDENTIFICATION | ||
25 | -- > | ||
26 | -- > Desc: Marks (letters and/or numbers) identifying equipment used | ||
27 | -- > for transport such as a container. | ||
28 | -- > | ||
29 | -- > 010 8260 Equipment identification number C an..17 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 3207 Country, coded C an..3 | ||
33 | -- | ||
34 | -- Dependencies: 'simple1131', 'simple3055', 'simple3207', 'simple8260'. | ||
35 | compositeC237 :: Parser Value | ||
36 | compositeC237 = | ||
37 | composite "C237" | ||
38 | [ "010" .@ optional simple8260 | ||
39 | , "020" .@ optional simple1131 | ||
40 | , "030" .@ optional simple3055 | ||
41 | , "040" .@ optional simple3207 | ||
42 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C239.hs b/specification/src/Text/Edifact/D96A/Composites/C239.hs new file mode 100644 index 0000000..940362e --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C239.hs | |||
@@ -0,0 +1,35 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C239 | ||
7 | ( -- * Definition | ||
8 | compositeC239 | ||
9 | -- * Dependencies | ||
10 | , simple6246 | ||
11 | , simple6411 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple6246, simple6411) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C239 TEMPERATURE SETTING | ||
22 | -- > | ||
23 | -- > Desc: The temperature under which the goods are (to be) stored | ||
24 | -- > or shipped. | ||
25 | -- > | ||
26 | -- > 010 6246 Temperature setting C n3 | ||
27 | -- > 020 6411 Measure unit qualifier C an..3 | ||
28 | -- | ||
29 | -- Dependencies: 'simple6246', 'simple6411'. | ||
30 | compositeC239 :: Parser Value | ||
31 | compositeC239 = | ||
32 | composite "C239" | ||
33 | [ "010" .@ optional simple6246 | ||
34 | , "020" .@ optional simple6411 | ||
35 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C270.hs b/specification/src/Text/Edifact/D96A/Composites/C270.hs new file mode 100644 index 0000000..c6f0dd5 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C270.hs | |||
@@ -0,0 +1,38 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C270 | ||
7 | ( -- * Definition | ||
8 | compositeC270 | ||
9 | -- * Dependencies | ||
10 | , simple6066 | ||
11 | , simple6069 | ||
12 | , simple6411 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple6066, simple6069, simple6411) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C270 CONTROL | ||
23 | -- > | ||
24 | -- > Desc: Control total for checking integrity of a message or part | ||
25 | -- > of a message. | ||
26 | -- > | ||
27 | -- > 010 6069 Control qualifier M an..3 | ||
28 | -- > 020 6066 Control value M n..18 | ||
29 | -- > 030 6411 Measure unit qualifier C an..3 | ||
30 | -- | ||
31 | -- Dependencies: 'simple6066', 'simple6069', 'simple6411'. | ||
32 | compositeC270 :: Parser Value | ||
33 | compositeC270 = | ||
34 | composite "C270" | ||
35 | [ "010" .@ mandatory simple6069 | ||
36 | , "020" .@ mandatory simple6066 | ||
37 | , "030" .@ optional simple6411 | ||
38 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C273.hs b/specification/src/Text/Edifact/D96A/Composites/C273.hs new file mode 100644 index 0000000..a15df97 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C273.hs | |||
@@ -0,0 +1,46 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C273 | ||
7 | ( -- * Definition | ||
8 | compositeC273 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple3453 | ||
13 | , simple7008 | ||
14 | , simple7009 | ||
15 | ) where | ||
16 | |||
17 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple3453, | ||
18 | simple7008, simple7009) | ||
19 | |||
20 | import Text.Edifact.Parsing | ||
21 | import Text.Edifact.Types (Value) | ||
22 | |||
23 | -- | Derived from this specification: | ||
24 | -- | ||
25 | -- > *| C273 ITEM DESCRIPTION | ||
26 | -- > | ||
27 | -- > | Desc: Description of an item. | ||
28 | -- > | ||
29 | -- > 010 7009 Item description identification C an..17 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 7008 Item description C an..35 | ||
33 | -- > 050 7008 Item description C an..35 | ||
34 | -- > 060 + 3453 Language, coded C an..3 | ||
35 | -- | ||
36 | -- Dependencies: 'simple1131', 'simple3055', 'simple3453', 'simple7008', 'simple7009'. | ||
37 | compositeC273 :: Parser Value | ||
38 | compositeC273 = | ||
39 | composite "C273" | ||
40 | [ "010" .@ optional simple7009 | ||
41 | , "020" .@ optional simple1131 | ||
42 | , "030" .@ optional simple3055 | ||
43 | , "040" .@ optional simple7008 | ||
44 | , "050" .@ optional simple7008 | ||
45 | , "060" .@ optional simple3453 | ||
46 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C279.hs b/specification/src/Text/Edifact/D96A/Composites/C279.hs new file mode 100644 index 0000000..03ada5a --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C279.hs | |||
@@ -0,0 +1,34 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C279 | ||
7 | ( -- * Definition | ||
8 | compositeC279 | ||
9 | -- * Dependencies | ||
10 | , simple6063 | ||
11 | , simple6064 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple6063, simple6064) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C279 QUANTITY DIFFERENCE INFORMATION | ||
22 | -- > | ||
23 | -- > Desc: Information on quantity difference. | ||
24 | -- > | ||
25 | -- > 010 6064 Quantity difference M n..15 | ||
26 | -- > 020 6063 Quantity qualifier C an..3 | ||
27 | -- | ||
28 | -- Dependencies: 'simple6063', 'simple6064'. | ||
29 | compositeC279 :: Parser Value | ||
30 | compositeC279 = | ||
31 | composite "C279" | ||
32 | [ "010" .@ mandatory simple6064 | ||
33 | , "020" .@ optional simple6063 | ||
34 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C280.hs b/specification/src/Text/Edifact/D96A/Composites/C280.hs new file mode 100644 index 0000000..254ba92 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C280.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C280 | ||
7 | ( -- * Definition | ||
8 | compositeC280 | ||
9 | -- * Dependencies | ||
10 | , simple6152 | ||
11 | , simple6162 | ||
12 | , simple6411 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple6152, simple6162, simple6411) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C280 RANGE | ||
23 | -- > | ||
24 | -- > Desc: Range minimum and maximum limits. | ||
25 | -- > | ||
26 | -- > 010 6411 Measure unit qualifier M an..3 | ||
27 | -- > 020 6162 Range minimum C n..18 | ||
28 | -- > 030 6152 Range maximum C n..18 | ||
29 | -- | ||
30 | -- Dependencies: 'simple6152', 'simple6162', 'simple6411'. | ||
31 | compositeC280 :: Parser Value | ||
32 | compositeC280 = | ||
33 | composite "C280" | ||
34 | [ "010" .@ mandatory simple6411 | ||
35 | , "020" .@ optional simple6162 | ||
36 | , "030" .@ optional simple6152 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C401.hs b/specification/src/Text/Edifact/D96A/Composites/C401.hs new file mode 100644 index 0000000..3a07949 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C401.hs | |||
@@ -0,0 +1,38 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C401 | ||
7 | ( -- * Definition | ||
8 | compositeC401 | ||
9 | -- * Dependencies | ||
10 | , simple7130 | ||
11 | , simple8457 | ||
12 | , simple8459 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple7130, simple8457, simple8459) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C401 EXCESS TRANSPORTATION INFORMATION | ||
23 | -- > | ||
24 | -- > Desc: To provide details of reason for, and responsibility for, | ||
25 | -- > use of transportation other than normally utilized. | ||
26 | -- > | ||
27 | -- > 010 8457 Excess transportation reason, coded M an..3 | ||
28 | -- > 020 8459 Excess transportation responsibility, coded M an..3 | ||
29 | -- > 030 7130 Customer authorization number C an..17 | ||
30 | -- | ||
31 | -- Dependencies: 'simple7130', 'simple8457', 'simple8459'. | ||
32 | compositeC401 :: Parser Value | ||
33 | compositeC401 = | ||
34 | composite "C401" | ||
35 | [ "010" .@ mandatory simple8457 | ||
36 | , "020" .@ mandatory simple8459 | ||
37 | , "030" .@ optional simple7130 | ||
38 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C402.hs b/specification/src/Text/Edifact/D96A/Composites/C402.hs new file mode 100644 index 0000000..3c9e8e4 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C402.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C402 | ||
7 | ( -- * Definition | ||
8 | compositeC402 | ||
9 | -- * Dependencies | ||
10 | , simple7064 | ||
11 | , simple7077 | ||
12 | , simple7143 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple7064, simple7077, simple7143) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C402 PACKAGE TYPE IDENTIFICATION | ||
23 | -- > | ||
24 | -- > Desc: Identification of the form in which goods are described. | ||
25 | -- > | ||
26 | -- > 010 7077 Item description type, coded M an..3 | ||
27 | -- > 020 7064 Type of packages M an..35 | ||
28 | -- > 030 7143 Item number type, coded C an..3 | ||
29 | -- > 040 7064 Type of packages C an..35 | ||
30 | -- > 050 7143 Item number type, coded C an..3 | ||
31 | -- | ||
32 | -- Dependencies: 'simple7064', 'simple7077', 'simple7143'. | ||
33 | compositeC402 :: Parser Value | ||
34 | compositeC402 = | ||
35 | composite "C402" | ||
36 | [ "010" .@ mandatory simple7077 | ||
37 | , "020" .@ mandatory simple7064 | ||
38 | , "030" .@ optional simple7143 | ||
39 | , "040" .@ optional simple7064 | ||
40 | , "050" .@ optional simple7143 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C501.hs b/specification/src/Text/Edifact/D96A/Composites/C501.hs new file mode 100644 index 0000000..910660a --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C501.hs | |||
@@ -0,0 +1,44 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C501 | ||
7 | ( -- * Definition | ||
8 | compositeC501 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple5245 | ||
13 | , simple5249 | ||
14 | , simple5482 | ||
15 | ) where | ||
16 | |||
17 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple5245, | ||
18 | simple5249, simple5482) | ||
19 | |||
20 | import Text.Edifact.Parsing | ||
21 | import Text.Edifact.Types (Value) | ||
22 | |||
23 | -- | Derived from this specification: | ||
24 | -- | ||
25 | -- > C501 PERCENTAGE DETAILS | ||
26 | -- > | ||
27 | -- > Desc: Percentage relating to a specified basis. | ||
28 | -- > | ||
29 | -- > 010 5245 Percentage qualifier M an..3 | ||
30 | -- > 020 5482 Percentage C n..10 | ||
31 | -- > 030 5249 Percentage basis, coded C an..3 | ||
32 | -- > 040 1131 Code list qualifier C an..3 | ||
33 | -- > 050 3055 Code list responsible agency, coded C an..3 | ||
34 | -- | ||
35 | -- Dependencies: 'simple1131', 'simple3055', 'simple5245', 'simple5249', 'simple5482'. | ||
36 | compositeC501 :: Parser Value | ||
37 | compositeC501 = | ||
38 | composite "C501" | ||
39 | [ "010" .@ mandatory simple5245 | ||
40 | , "020" .@ optional simple5482 | ||
41 | , "030" .@ optional simple5249 | ||
42 | , "040" .@ optional simple1131 | ||
43 | , "050" .@ optional simple3055 | ||
44 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C502.hs b/specification/src/Text/Edifact/D96A/Composites/C502.hs new file mode 100644 index 0000000..6f33aef --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C502.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C502 | ||
7 | ( -- * Definition | ||
8 | compositeC502 | ||
9 | -- * Dependencies | ||
10 | , simple6154 | ||
11 | , simple6155 | ||
12 | , simple6313 | ||
13 | , simple6321 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple6154, simple6155, simple6313, | ||
17 | simple6321) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C502 MEASUREMENT DETAILS | ||
25 | -- > | ||
26 | -- > Desc: Identification of measurement type. | ||
27 | -- > | ||
28 | -- > 010 6313 Measurement dimension, coded C an..3 | ||
29 | -- > 020 6321 Measurement significance, coded C an..3 | ||
30 | -- > 030 6155 Measurement attribute, coded C an..3 | ||
31 | -- > 040 6154 Measurement attribute C an..70 | ||
32 | -- | ||
33 | -- Dependencies: 'simple6154', 'simple6155', 'simple6313', 'simple6321'. | ||
34 | compositeC502 :: Parser Value | ||
35 | compositeC502 = | ||
36 | composite "C502" | ||
37 | [ "010" .@ optional simple6313 | ||
38 | , "020" .@ optional simple6321 | ||
39 | , "030" .@ optional simple6155 | ||
40 | , "040" .@ optional simple6154 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C503.hs b/specification/src/Text/Edifact/D96A/Composites/C503.hs new file mode 100644 index 0000000..059b89b --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C503.hs | |||
@@ -0,0 +1,42 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C503 | ||
7 | ( -- * Definition | ||
8 | compositeC503 | ||
9 | -- * Dependencies | ||
10 | , simple1004 | ||
11 | , simple1366 | ||
12 | , simple1373 | ||
13 | , simple3453 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1004, simple1366, simple1373, | ||
17 | simple3453) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C503 DOCUMENT/MESSAGE DETAILS | ||
25 | -- > | ||
26 | -- > Desc: Identification of document/message by number, status, | ||
27 | -- > source and/or language. | ||
28 | -- > | ||
29 | -- > 010 1004 Document/message number C an..35 | ||
30 | -- > 020 1373 Document/message status, coded C an..3 | ||
31 | -- > 030 1366 Document/message source C an..35 | ||
32 | -- > 040 3453 Language, coded C an..3 | ||
33 | -- | ||
34 | -- Dependencies: 'simple1004', 'simple1366', 'simple1373', 'simple3453'. | ||
35 | compositeC503 :: Parser Value | ||
36 | compositeC503 = | ||
37 | composite "C503" | ||
38 | [ "010" .@ optional simple1004 | ||
39 | , "020" .@ optional simple1373 | ||
40 | , "030" .@ optional simple1366 | ||
41 | , "040" .@ optional simple3453 | ||
42 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C504.hs b/specification/src/Text/Edifact/D96A/Composites/C504.hs new file mode 100644 index 0000000..3567f4b --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C504.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C504 | ||
7 | ( -- * Definition | ||
8 | compositeC504 | ||
9 | -- * Dependencies | ||
10 | , simple6343 | ||
11 | , simple6345 | ||
12 | , simple6347 | ||
13 | , simple6348 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple6343, simple6345, simple6347, | ||
17 | simple6348) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C504 CURRENCY DETAILS | ||
25 | -- > | ||
26 | -- > Desc: The usage to which a currency relates. | ||
27 | -- > | ||
28 | -- > 010 6347 Currency details qualifier M an..3 | ||
29 | -- > 020 6345 Currency, coded C an..3 | ||
30 | -- > 030 6343 Currency qualifier C an..3 | ||
31 | -- > 040 6348 Currency rate base C n..4 | ||
32 | -- | ||
33 | -- Dependencies: 'simple6343', 'simple6345', 'simple6347', 'simple6348'. | ||
34 | compositeC504 :: Parser Value | ||
35 | compositeC504 = | ||
36 | composite "C504" | ||
37 | [ "010" .@ mandatory simple6347 | ||
38 | , "020" .@ optional simple6345 | ||
39 | , "030" .@ optional simple6343 | ||
40 | , "040" .@ optional simple6348 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C506.hs b/specification/src/Text/Edifact/D96A/Composites/C506.hs new file mode 100644 index 0000000..dc579e6 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C506.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C506 | ||
7 | ( -- * Definition | ||
8 | compositeC506 | ||
9 | -- * Dependencies | ||
10 | , simple1153 | ||
11 | , simple1154 | ||
12 | , simple1156 | ||
13 | , simple4000 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1153, simple1154, simple1156, | ||
17 | simple4000) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C506 REFERENCE | ||
25 | -- > | ||
26 | -- > Desc: Identification of a reference. | ||
27 | -- > | ||
28 | -- > 010 1153 Reference qualifier M an..3 | ||
29 | -- > 020 1154 Reference number C an..35 | ||
30 | -- > 030 1156 Line number C an..6 | ||
31 | -- > 040 4000 Reference version number C an..35 | ||
32 | -- | ||
33 | -- Dependencies: 'simple1153', 'simple1154', 'simple1156', 'simple4000'. | ||
34 | compositeC506 :: Parser Value | ||
35 | compositeC506 = | ||
36 | composite "C506" | ||
37 | [ "010" .@ mandatory simple1153 | ||
38 | , "020" .@ optional simple1154 | ||
39 | , "030" .@ optional simple1156 | ||
40 | , "040" .@ optional simple4000 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C507.hs b/specification/src/Text/Edifact/D96A/Composites/C507.hs new file mode 100644 index 0000000..3a59df0 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C507.hs | |||
@@ -0,0 +1,38 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C507 | ||
7 | ( -- * Definition | ||
8 | compositeC507 | ||
9 | -- * Dependencies | ||
10 | , simple2005 | ||
11 | , simple2379 | ||
12 | , simple2380 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple2005, simple2379, simple2380) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C507 DATE/TIME/PERIOD | ||
23 | -- > | ||
24 | -- > Desc: Date and/or time, or period relevant to the specified | ||
25 | -- > date/time/period type. | ||
26 | -- > | ||
27 | -- > 010 2005 Date/time/period qualifier M an..3 | ||
28 | -- > 020 2380 Date/time/period C an..35 | ||
29 | -- > 030 2379 Date/time/period format qualifier C an..3 | ||
30 | -- | ||
31 | -- Dependencies: 'simple2005', 'simple2379', 'simple2380'. | ||
32 | compositeC507 :: Parser Value | ||
33 | compositeC507 = | ||
34 | composite "C507" | ||
35 | [ "010" .@ mandatory simple2005 | ||
36 | , "020" .@ optional simple2380 | ||
37 | , "030" .@ optional simple2379 | ||
38 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C509.hs b/specification/src/Text/Edifact/D96A/Composites/C509.hs new file mode 100644 index 0000000..1903b5e --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C509.hs | |||
@@ -0,0 +1,47 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C509 | ||
7 | ( -- * Definition | ||
8 | compositeC509 | ||
9 | -- * Dependencies | ||
10 | , simple5118 | ||
11 | , simple5125 | ||
12 | , simple5284 | ||
13 | , simple5375 | ||
14 | , simple5387 | ||
15 | , simple6411 | ||
16 | ) where | ||
17 | |||
18 | import Text.Edifact.D96A.Simples (simple5118, simple5125, simple5284, | ||
19 | simple5375, simple5387, simple6411) | ||
20 | |||
21 | import Text.Edifact.Parsing | ||
22 | import Text.Edifact.Types (Value) | ||
23 | |||
24 | -- | Derived from this specification: | ||
25 | -- | ||
26 | -- > C509 PRICE INFORMATION | ||
27 | -- > | ||
28 | -- > Desc: Identification of price type, price and related details. | ||
29 | -- > | ||
30 | -- > 010 5125 Price qualifier M an..3 | ||
31 | -- > 020 5118 Price C n..15 | ||
32 | -- > 030 5375 Price type, coded C an..3 | ||
33 | -- > 040 5387 Price type qualifier C an..3 | ||
34 | -- > 050 5284 Unit price basis C n..9 | ||
35 | -- > 060 6411 Measure unit qualifier C an..3 | ||
36 | -- | ||
37 | -- Dependencies: 'simple5118', 'simple5125', 'simple5284', 'simple5375', 'simple5387', 'simple6411'. | ||
38 | compositeC509 :: Parser Value | ||
39 | compositeC509 = | ||
40 | composite "C509" | ||
41 | [ "010" .@ mandatory simple5125 | ||
42 | , "020" .@ optional simple5118 | ||
43 | , "030" .@ optional simple5375 | ||
44 | , "040" .@ optional simple5387 | ||
45 | , "050" .@ optional simple5284 | ||
46 | , "060" .@ optional simple6411 | ||
47 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C516.hs b/specification/src/Text/Edifact/D96A/Composites/C516.hs new file mode 100644 index 0000000..d850263 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C516.hs | |||
@@ -0,0 +1,45 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C516 | ||
7 | ( -- * Definition | ||
8 | compositeC516 | ||
9 | -- * Dependencies | ||
10 | , simple4405 | ||
11 | , simple5004 | ||
12 | , simple5025 | ||
13 | , simple6343 | ||
14 | , simple6345 | ||
15 | ) where | ||
16 | |||
17 | import Text.Edifact.D96A.Simples (simple4405, simple5004, simple5025, | ||
18 | simple6343, simple6345) | ||
19 | |||
20 | import Text.Edifact.Parsing | ||
21 | import Text.Edifact.Types (Value) | ||
22 | |||
23 | -- | Derived from this specification: | ||
24 | -- | ||
25 | -- > C516 MONETARY AMOUNT | ||
26 | -- > | ||
27 | -- > Desc: Amount of goods or services stated as a monetary amount in | ||
28 | -- > a specified currency. | ||
29 | -- > | ||
30 | -- > 010 5025 Monetary amount type qualifier M an..3 | ||
31 | -- > 020 5004 Monetary amount C n..18 | ||
32 | -- > 030 6345 Currency, coded C an..3 | ||
33 | -- > 040 6343 Currency qualifier C an..3 | ||
34 | -- > 050 4405 Status, coded C an..3 | ||
35 | -- | ||
36 | -- Dependencies: 'simple4405', 'simple5004', 'simple5025', 'simple6343', 'simple6345'. | ||
37 | compositeC516 :: Parser Value | ||
38 | compositeC516 = | ||
39 | composite "C516" | ||
40 | [ "010" .@ mandatory simple5025 | ||
41 | , "020" .@ optional simple5004 | ||
42 | , "030" .@ optional simple6345 | ||
43 | , "040" .@ optional simple6343 | ||
44 | , "050" .@ optional simple4405 | ||
45 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C517.hs b/specification/src/Text/Edifact/D96A/Composites/C517.hs new file mode 100644 index 0000000..a108195 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C517.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C517 | ||
7 | ( -- * Definition | ||
8 | compositeC517 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple3224 | ||
13 | , simple3225 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple3224, | ||
17 | simple3225) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C517 LOCATION IDENTIFICATION | ||
25 | -- > | ||
26 | -- > Desc: Identification of a location by code or name. | ||
27 | -- > | ||
28 | -- > 010 3225 Place/location identification C an..25 | ||
29 | -- > 020 1131 Code list qualifier C an..3 | ||
30 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
31 | -- > 040 3224 Place/location C an..70 | ||
32 | -- | ||
33 | -- Dependencies: 'simple1131', 'simple3055', 'simple3224', 'simple3225'. | ||
34 | compositeC517 :: Parser Value | ||
35 | compositeC517 = | ||
36 | composite "C517" | ||
37 | [ "010" .@ optional simple3225 | ||
38 | , "020" .@ optional simple1131 | ||
39 | , "030" .@ optional simple3055 | ||
40 | , "040" .@ optional simple3224 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C519.hs b/specification/src/Text/Edifact/D96A/Composites/C519.hs new file mode 100644 index 0000000..3cf59e6 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C519.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C519 | ||
7 | ( -- * Definition | ||
8 | compositeC519 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple3222 | ||
13 | , simple3223 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple3222, | ||
17 | simple3223) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C519 RELATED LOCATION ONE IDENTIFICATION | ||
25 | -- > | ||
26 | -- > Desc: Identification the first related location by code or name. | ||
27 | -- > | ||
28 | -- > 010 3223 Related place/location one identification C an..25 | ||
29 | -- > 020 1131 Code list qualifier C an..3 | ||
30 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
31 | -- > 040 3222 Related place/location one C an..70 | ||
32 | -- | ||
33 | -- Dependencies: 'simple1131', 'simple3055', 'simple3222', 'simple3223'. | ||
34 | compositeC519 :: Parser Value | ||
35 | compositeC519 = | ||
36 | composite "C519" | ||
37 | [ "010" .@ optional simple3223 | ||
38 | , "020" .@ optional simple1131 | ||
39 | , "030" .@ optional simple3055 | ||
40 | , "040" .@ optional simple3222 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C522.hs b/specification/src/Text/Edifact/D96A/Composites/C522.hs new file mode 100644 index 0000000..43af74f --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C522.hs | |||
@@ -0,0 +1,44 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C522 | ||
7 | ( -- * Definition | ||
8 | compositeC522 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple4400 | ||
13 | , simple4401 | ||
14 | , simple4403 | ||
15 | ) where | ||
16 | |||
17 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple4400, | ||
18 | simple4401, simple4403) | ||
19 | |||
20 | import Text.Edifact.Parsing | ||
21 | import Text.Edifact.Types (Value) | ||
22 | |||
23 | -- | Derived from this specification: | ||
24 | -- | ||
25 | -- > C522 INSTRUCTION | ||
26 | -- > | ||
27 | -- > Desc: To specify an instruction. | ||
28 | -- > | ||
29 | -- > 010 4403 Instruction qualifier M an..3 | ||
30 | -- > 020 4401 Instruction, coded C an..3 | ||
31 | -- > 030 1131 Code list qualifier C an..3 | ||
32 | -- > 040 3055 Code list responsible agency, coded C an..3 | ||
33 | -- > 050 4400 Instruction C an..35 | ||
34 | -- | ||
35 | -- Dependencies: 'simple1131', 'simple3055', 'simple4400', 'simple4401', 'simple4403'. | ||
36 | compositeC522 :: Parser Value | ||
37 | compositeC522 = | ||
38 | composite "C522" | ||
39 | [ "010" .@ mandatory simple4403 | ||
40 | , "020" .@ optional simple4401 | ||
41 | , "030" .@ optional simple1131 | ||
42 | , "040" .@ optional simple3055 | ||
43 | , "050" .@ optional simple4400 | ||
44 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C523.hs b/specification/src/Text/Edifact/D96A/Composites/C523.hs new file mode 100644 index 0000000..f45b6a3 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C523.hs | |||
@@ -0,0 +1,34 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C523 | ||
7 | ( -- * Definition | ||
8 | compositeC523 | ||
9 | -- * Dependencies | ||
10 | , simple6350 | ||
11 | , simple6353 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple6350, simple6353) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C523 NUMBER OF UNIT DETAILS | ||
22 | -- > | ||
23 | -- > Desc: Identification of number of units and its purpose. | ||
24 | -- > | ||
25 | -- > 010 6350 Number of units C n..15 | ||
26 | -- > 020 6353 Number of units qualifier C an..3 | ||
27 | -- | ||
28 | -- Dependencies: 'simple6350', 'simple6353'. | ||
29 | compositeC523 :: Parser Value | ||
30 | compositeC523 = | ||
31 | composite "C523" | ||
32 | [ "010" .@ optional simple6350 | ||
33 | , "020" .@ optional simple6353 | ||
34 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C524.hs b/specification/src/Text/Edifact/D96A/Composites/C524.hs new file mode 100644 index 0000000..f3a0239 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C524.hs | |||
@@ -0,0 +1,42 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C524 | ||
7 | ( -- * Definition | ||
8 | compositeC524 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple4078 | ||
13 | , simple4079 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple4078, | ||
17 | simple4079) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C524 HANDLING INSTRUCTIONS | ||
25 | -- > | ||
26 | -- > Desc: Instruction for the handling of goods, products or | ||
27 | -- > articles in shipment, storage etc. | ||
28 | -- > | ||
29 | -- > 010 4079 Handling instructions, coded C an..3 | ||
30 | -- > 020 1131 Code list qualifier C an..3 | ||
31 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
32 | -- > 040 4078 Handling instructions C an..70 | ||
33 | -- | ||
34 | -- Dependencies: 'simple1131', 'simple3055', 'simple4078', 'simple4079'. | ||
35 | compositeC524 :: Parser Value | ||
36 | compositeC524 = | ||
37 | composite "C524" | ||
38 | [ "010" .@ optional simple4079 | ||
39 | , "020" .@ optional simple1131 | ||
40 | , "030" .@ optional simple3055 | ||
41 | , "040" .@ optional simple4078 | ||
42 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C528.hs b/specification/src/Text/Edifact/D96A/Composites/C528.hs new file mode 100644 index 0000000..e675186 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C528.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C528 | ||
7 | ( -- * Definition | ||
8 | compositeC528 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple7357 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple7357) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C528 COMMODITY/RATE DETAIL | ||
23 | -- > | ||
24 | -- > Desc: Identification of commodity/rates. | ||
25 | -- > | ||
26 | -- > 010 7357 Commodity/rate identification C an..18 | ||
27 | -- > 020 1131 Code list qualifier C an..3 | ||
28 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1131', 'simple3055', 'simple7357'. | ||
31 | compositeC528 :: Parser Value | ||
32 | compositeC528 = | ||
33 | composite "C528" | ||
34 | [ "010" .@ optional simple7357 | ||
35 | , "020" .@ optional simple1131 | ||
36 | , "030" .@ optional simple3055 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C531.hs b/specification/src/Text/Edifact/D96A/Composites/C531.hs new file mode 100644 index 0000000..735787d --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C531.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C531 | ||
7 | ( -- * Definition | ||
8 | compositeC531 | ||
9 | -- * Dependencies | ||
10 | , simple7073 | ||
11 | , simple7075 | ||
12 | , simple7233 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple7073, simple7075, simple7233) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C531 PACKAGING DETAILS | ||
23 | -- > | ||
24 | -- > Desc: Packaging level and details, terms and conditions. | ||
25 | -- > | ||
26 | -- > 010 7075 Packaging level, coded C an..3 | ||
27 | -- > 020 7233 Packaging related information, coded C an..3 | ||
28 | -- > 030 7073 Packaging terms and conditions, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple7073', 'simple7075', 'simple7233'. | ||
31 | compositeC531 :: Parser Value | ||
32 | compositeC531 = | ||
33 | composite "C531" | ||
34 | [ "010" .@ optional simple7075 | ||
35 | , "020" .@ optional simple7233 | ||
36 | , "030" .@ optional simple7073 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C532.hs b/specification/src/Text/Edifact/D96A/Composites/C532.hs new file mode 100644 index 0000000..79ef7e2 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C532.hs | |||
@@ -0,0 +1,36 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C532 | ||
7 | ( -- * Definition | ||
8 | compositeC532 | ||
9 | -- * Dependencies | ||
10 | , simple8393 | ||
11 | , simple8395 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple8393, simple8395) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C532 RETURNABLE PACKAGE DETAILS | ||
22 | -- > | ||
23 | -- > Desc: Indication of responsibility for payment and load contents | ||
24 | -- > of returnable packages. | ||
25 | -- > | ||
26 | -- > 010 8395 Returnable package freight payment C an..3 | ||
27 | -- > responsibility, coded | ||
28 | -- > 020 8393 Returnable package load contents, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple8393', 'simple8395'. | ||
31 | compositeC532 :: Parser Value | ||
32 | compositeC532 = | ||
33 | composite "C532" | ||
34 | [ "010" .@ optional simple8395 | ||
35 | , "020" .@ optional simple8393 | ||
36 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C536.hs b/specification/src/Text/Edifact/D96A/Composites/C536.hs new file mode 100644 index 0000000..bd1e75c --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C536.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C536 | ||
7 | ( -- * Definition | ||
8 | compositeC536 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple4065 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple4065) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C536 CONTRACT AND CARRIAGE CONDITION | ||
23 | -- > | ||
24 | -- > Desc: To identify a contract and carriage condition. | ||
25 | -- > | ||
26 | -- > 010 4065 Contract and carriage condition, coded M an..3 | ||
27 | -- > 020 1131 Code list qualifier C an..3 | ||
28 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1131', 'simple3055', 'simple4065'. | ||
31 | compositeC536 :: Parser Value | ||
32 | compositeC536 = | ||
33 | composite "C536" | ||
34 | [ "010" .@ mandatory simple4065 | ||
35 | , "020" .@ optional simple1131 | ||
36 | , "030" .@ optional simple3055 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C537.hs b/specification/src/Text/Edifact/D96A/Composites/C537.hs new file mode 100644 index 0000000..a3f56a3 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C537.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C537 | ||
7 | ( -- * Definition | ||
8 | compositeC537 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple4219 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple4219) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C537 TRANSPORT PRIORITY | ||
23 | -- > | ||
24 | -- > Desc: To indicate the priority of requested transport service. | ||
25 | -- > | ||
26 | -- > 010 4219 Transport priority, coded M an..3 | ||
27 | -- > 020 1131 Code list qualifier C an..3 | ||
28 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1131', 'simple3055', 'simple4219'. | ||
31 | compositeC537 :: Parser Value | ||
32 | compositeC537 = | ||
33 | composite "C537" | ||
34 | [ "010" .@ mandatory simple4219 | ||
35 | , "020" .@ optional simple1131 | ||
36 | , "030" .@ optional simple3055 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C553.hs b/specification/src/Text/Edifact/D96A/Composites/C553.hs new file mode 100644 index 0000000..091f5e1 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C553.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C553 | ||
7 | ( -- * Definition | ||
8 | compositeC553 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple3232 | ||
13 | , simple3233 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple3232, | ||
17 | simple3233) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C553 RELATED LOCATION TWO IDENTIFICATION | ||
25 | -- > | ||
26 | -- > Desc: Identification of second related location by code or name. | ||
27 | -- > | ||
28 | -- > 010 3233 Related place/location two identification C an..25 | ||
29 | -- > 020 1131 Code list qualifier C an..3 | ||
30 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
31 | -- > 040 3232 Related place/location two C an..70 | ||
32 | -- | ||
33 | -- Dependencies: 'simple1131', 'simple3055', 'simple3232', 'simple3233'. | ||
34 | compositeC553 :: Parser Value | ||
35 | compositeC553 = | ||
36 | composite "C553" | ||
37 | [ "010" .@ optional simple3233 | ||
38 | , "020" .@ optional simple1131 | ||
39 | , "030" .@ optional simple3055 | ||
40 | , "040" .@ optional simple3232 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C554.hs b/specification/src/Text/Edifact/D96A/Composites/C554.hs new file mode 100644 index 0000000..f6b0c6d --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C554.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C554 | ||
7 | ( -- * Definition | ||
8 | compositeC554 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple5243 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple5243) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C554 RATE/TARIFF CLASS DETAIL | ||
23 | -- > | ||
24 | -- > Desc: Identification of the applicable rate/tariff class. | ||
25 | -- > | ||
26 | -- > 010 5243 Rate/tariff class identification C an..9 | ||
27 | -- > 020 1131 Code list qualifier C an..3 | ||
28 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1131', 'simple3055', 'simple5243'. | ||
31 | compositeC554 :: Parser Value | ||
32 | compositeC554 = | ||
33 | composite "C554" | ||
34 | [ "010" .@ optional simple5243 | ||
35 | , "020" .@ optional simple1131 | ||
36 | , "030" .@ optional simple3055 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C555.hs b/specification/src/Text/Edifact/D96A/Composites/C555.hs new file mode 100644 index 0000000..313cd6f --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C555.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C555 | ||
7 | ( -- * Definition | ||
8 | compositeC555 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple9010 | ||
13 | , simple9011 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple9010, | ||
17 | simple9011) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C555 STATUS EVENT | ||
25 | -- > | ||
26 | -- > Desc: To specify a status event. | ||
27 | -- > | ||
28 | -- > 010 9011 Status event, coded M an..3 | ||
29 | -- > 020 1131 Code list qualifier C an..3 | ||
30 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
31 | -- > 040 9010 Status event C an..35 | ||
32 | -- | ||
33 | -- Dependencies: 'simple1131', 'simple3055', 'simple9010', 'simple9011'. | ||
34 | compositeC555 :: Parser Value | ||
35 | compositeC555 = | ||
36 | composite "C555" | ||
37 | [ "010" .@ mandatory simple9011 | ||
38 | , "020" .@ optional simple1131 | ||
39 | , "030" .@ optional simple3055 | ||
40 | , "040" .@ optional simple9010 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C556.hs b/specification/src/Text/Edifact/D96A/Composites/C556.hs new file mode 100644 index 0000000..be62b60 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C556.hs | |||
@@ -0,0 +1,41 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C556 | ||
7 | ( -- * Definition | ||
8 | compositeC556 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple9012 | ||
13 | , simple9013 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple9012, | ||
17 | simple9013) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C556 STATUS REASON | ||
25 | -- > | ||
26 | -- > Desc: To specify the reason behind a status event. | ||
27 | -- > | ||
28 | -- > 010 9013 Status reason, coded M an..3 | ||
29 | -- > 020 1131 Code list qualifier C an..3 | ||
30 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
31 | -- > 040 9012 Status reason C an..35 | ||
32 | -- | ||
33 | -- Dependencies: 'simple1131', 'simple3055', 'simple9012', 'simple9013'. | ||
34 | compositeC556 :: Parser Value | ||
35 | compositeC556 = | ||
36 | composite "C556" | ||
37 | [ "010" .@ mandatory simple9013 | ||
38 | , "020" .@ optional simple1131 | ||
39 | , "030" .@ optional simple3055 | ||
40 | , "040" .@ optional simple9012 | ||
41 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C601.hs b/specification/src/Text/Edifact/D96A/Composites/C601.hs new file mode 100644 index 0000000..dc9dcf2 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C601.hs | |||
@@ -0,0 +1,38 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C601 | ||
7 | ( -- * Definition | ||
8 | compositeC601 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple9015 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple9015) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C601 STATUS TYPE | ||
23 | -- > | ||
24 | -- > Desc: To specify the type of status in relation to an industry | ||
25 | -- > sector or business function. | ||
26 | -- > | ||
27 | -- > 010 9015 Status type, coded M an..3 | ||
28 | -- > 020 1131 Code list qualifier C an..3 | ||
29 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
30 | -- | ||
31 | -- Dependencies: 'simple1131', 'simple3055', 'simple9015'. | ||
32 | compositeC601 :: Parser Value | ||
33 | compositeC601 = | ||
34 | composite "C601" | ||
35 | [ "010" .@ mandatory simple9015 | ||
36 | , "020" .@ optional simple1131 | ||
37 | , "030" .@ optional simple3055 | ||
38 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C703.hs b/specification/src/Text/Edifact/D96A/Composites/C703.hs new file mode 100644 index 0000000..10948c9 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C703.hs | |||
@@ -0,0 +1,37 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C703 | ||
7 | ( -- * Definition | ||
8 | compositeC703 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple7085 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple7085) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C703 NATURE OF CARGO | ||
23 | -- > | ||
24 | -- > Desc: Rough classification of a type of cargo. | ||
25 | -- > | ||
26 | -- > 010 7085 Nature of cargo, coded M an..3 | ||
27 | -- > 020 1131 Code list qualifier C an..3 | ||
28 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1131', 'simple3055', 'simple7085'. | ||
31 | compositeC703 :: Parser Value | ||
32 | compositeC703 = | ||
33 | composite "C703" | ||
34 | [ "010" .@ mandatory simple7085 | ||
35 | , "020" .@ optional simple1131 | ||
36 | , "030" .@ optional simple3055 | ||
37 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C827.hs b/specification/src/Text/Edifact/D96A/Composites/C827.hs new file mode 100644 index 0000000..87739c9 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C827.hs | |||
@@ -0,0 +1,39 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C827 | ||
7 | ( -- * Definition | ||
8 | compositeC827 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple7511 | ||
13 | ) where | ||
14 | |||
15 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple7511) | ||
16 | |||
17 | import Text.Edifact.Parsing | ||
18 | import Text.Edifact.Types (Value) | ||
19 | |||
20 | -- | Derived from this specification: | ||
21 | -- | ||
22 | -- > C827 TYPE OF MARKING | ||
23 | -- > | ||
24 | -- > Desc: Specification of the type of marking that reflects the | ||
25 | -- > method that was used and the conventions adhered to for | ||
26 | -- > marking (e.g. of packages). | ||
27 | -- > | ||
28 | -- > 010 7511 Type of marking, coded M an..3 | ||
29 | -- > 020 1131 Code list qualifier C an..3 | ||
30 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
31 | -- | ||
32 | -- Dependencies: 'simple1131', 'simple3055', 'simple7511'. | ||
33 | compositeC827 :: Parser Value | ||
34 | compositeC827 = | ||
35 | composite "C827" | ||
36 | [ "010" .@ mandatory simple7511 | ||
37 | , "020" .@ optional simple1131 | ||
38 | , "030" .@ optional simple3055 | ||
39 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C829.hs b/specification/src/Text/Edifact/D96A/Composites/C829.hs new file mode 100644 index 0000000..70a3b05 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C829.hs | |||
@@ -0,0 +1,36 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C829 | ||
7 | ( -- * Definition | ||
8 | compositeC829 | ||
9 | -- * Dependencies | ||
10 | , simple1082 | ||
11 | , simple5495 | ||
12 | ) where | ||
13 | |||
14 | import Text.Edifact.D96A.Simples (simple1082, simple5495) | ||
15 | |||
16 | import Text.Edifact.Parsing | ||
17 | import Text.Edifact.Types (Value) | ||
18 | |||
19 | -- | Derived from this specification: | ||
20 | -- | ||
21 | -- > C829 SUB-LINE INFORMATION | ||
22 | -- > | ||
23 | -- > Desc: To provide an indication that a segment or segment group | ||
24 | -- > is used to contain sub-line or sub-line item information | ||
25 | -- > and to optionally enable the sub-line to be identified. | ||
26 | -- > | ||
27 | -- > 010 5495 Sub-line indicator, coded C an..3 | ||
28 | -- > 020 1082 Line item number C n..6 | ||
29 | -- | ||
30 | -- Dependencies: 'simple1082', 'simple5495'. | ||
31 | compositeC829 :: Parser Value | ||
32 | compositeC829 = | ||
33 | composite "C829" | ||
34 | [ "010" .@ optional simple5495 | ||
35 | , "020" .@ optional simple1082 | ||
36 | ] | ||
diff --git a/specification/src/Text/Edifact/D96A/Composites/C960.hs b/specification/src/Text/Edifact/D96A/Composites/C960.hs new file mode 100644 index 0000000..f399f9e --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Composites/C960.hs | |||
@@ -0,0 +1,44 @@ | |||
1 | {-# LANGUAGE OverloadedStrings #-} | ||
2 | |||
3 | ---- Machine generated code. | ||
4 | ---- Output of edi-parser-scaffolder | ||
5 | |||
6 | module Text.Edifact.D96A.Composites.C960 | ||
7 | ( -- * Definition | ||
8 | compositeC960 | ||
9 | -- * Dependencies | ||
10 | , simple1131 | ||
11 | , simple3055 | ||
12 | , simple4294 | ||
13 | , simple4295 | ||
14 | ) where | ||
15 | |||
16 | import Text.Edifact.D96A.Simples (simple1131, simple3055, simple4294, | ||
17 | simple4295) | ||
18 | |||
19 | import Text.Edifact.Parsing | ||
20 | import Text.Edifact.Types (Value) | ||
21 | |||
22 | -- | Derived from this specification: | ||
23 | -- | ||
24 | -- > C960 REASON FOR CHANGE | ||
25 | -- > | ||
26 | -- > Desc: Code and/or description of the reason for a change. | ||
27 | -- > | ||
28 | -- > Note: This composite data element replaces composite C262 (which | ||
29 | -- > has been deleted in this directory). | ||
30 | -- > | ||
31 | -- > 010 4295 Change reason, coded C an..3 | ||
32 | -- > 020 1131 Code list qualifier C an..3 | ||
33 | -- > 030 3055 Code list responsible agency, coded C an..3 | ||
34 | -- > 040 4294 Change reason C an..35 | ||
35 | -- | ||
36 | -- Dependencies: 'simple1131', 'simple3055', 'simple4294', 'simple4295'. | ||
37 | compositeC960 :: Parser Value | ||
38 | compositeC960 = | ||
39 | composite "C960" | ||
40 | [ "010" .@ optional simple4295 | ||
41 | , "020" .@ optional simple1131 | ||
42 | , "030" .@ optional simple3055 | ||
43 | , "040" .@ optional simple4294 | ||
44 | ] | ||