]> git.immae.eu Git - github/fretlink/edi-parser.git/blob - specification/src/Text/Edifact/D96A/Segments/NAD.hs
Release code as open source
[github/fretlink/edi-parser.git] / specification / src / Text / Edifact / D96A / Segments / NAD.hs
1 {-# LANGUAGE OverloadedStrings #-}
2
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
5
6 module Text.Edifact.D96A.Segments.NAD
7 ( -- * Definition
8 segmentNAD
9 -- * Dependencies
10 , compositeC058
11 , compositeC059
12 , compositeC080
13 , compositeC082
14 , simple3035
15 , simple3164
16 , simple3207
17 , simple3229
18 , simple3251
19 ) where
20
21 import Text.Edifact.D96A.Composites (compositeC058, compositeC059,
22 compositeC080, compositeC082)
23 import Text.Edifact.D96A.Simples (simple3035, simple3164,
24 simple3207, simple3229,
25 simple3251)
26
27 import Text.Edifact.Parsing
28 import Text.Edifact.Types (Value)
29
30 -- | Derived from this specification:
31 --
32 -- > NAD NAME AND ADDRESS
33 -- >
34 -- > Function: To specify the name/address and their related
35 -- > function, either by CO82 only and/or unstructured by
36 -- > CO58 or structured by CO80 thru 3207.
37 -- >
38 -- > 010 3035 PARTY QUALIFIER M an..3
39 -- >
40 -- > 020 C082 PARTY IDENTIFICATION DETAILS C
41 -- > 3039 Party id. identification M an..35
42 -- > 1131 Code list qualifier C an..3
43 -- > 3055 Code list responsible agency, coded C an..3
44 -- >
45 -- > 030 C058 NAME AND ADDRESS C
46 -- > 3124 Name and address line M an..35
47 -- > 3124 Name and address line C an..35
48 -- > 3124 Name and address line C an..35
49 -- > 3124 Name and address line C an..35
50 -- > 3124 Name and address line C an..35
51 -- >
52 -- > 040 C080 PARTY NAME C
53 -- > 3036 Party name M an..35
54 -- > 3036 Party name C an..35
55 -- > 3036 Party name C an..35
56 -- > 3036 Party name C an..35
57 -- > 3036 Party name C an..35
58 -- > 3045 Party name format, coded C an..3
59 -- >
60 -- > 050 C059 STREET C
61 -- > 3042 Street and number/p.o. box M an..35
62 -- > 3042 Street and number/p.o. box C an..35
63 -- > 3042 Street and number/p.o. box C an..35
64 -- > 3042 Street and number/p.o. box C an..35
65 -- >
66 -- > 060 3164 CITY NAME C an..35
67 -- >
68 -- > 070 3229 COUNTRY SUB-ENTITY IDENTIFICATION C an..9
69 -- >
70 -- > 080 3251 POSTCODE IDENTIFICATION C an..9
71 -- >
72 -- > 090 3207 COUNTRY, CODED C an..3
73 --
74 -- Dependencies: 'compositeC058', 'compositeC059', 'compositeC080', 'compositeC082', 'simple3035', 'simple3164', 'simple3207', 'simple3229', 'simple3251'.
75 segmentNAD :: Parser Value
76 segmentNAD =
77 segment "NAD"
78 [ "010" .@ mandatory simple3035
79 , "020" .@ optional compositeC082
80 , "030" .@ optional compositeC058
81 , "040" .@ optional compositeC080
82 , "050" .@ optional compositeC059
83 , "060" .@ optional simple3164
84 , "070" .@ optional simple3229
85 , "080" .@ optional simple3251
86 , "090" .@ optional simple3207
87 ]