1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Simples.S3155
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > 3155 Communication address code qualifier [B]
17 -- > Desc: Code qualifying the communication address.
21 -- > AA Circuit switching
22 -- > A process that, on demand, connects two or more data
23 -- > terminal equipments and permits the exclusive use of a
24 -- > data circuit between them until the connection is
28 -- > Communications number assigned by Societe Internationale
29 -- > de Telecommunications Aeronautiques (SITA).
32 -- > Communications number assigned by Aeronautical Radio
36 -- > AT&T mailbox identifier.
38 -- > AE Peripheral device
39 -- > Peripheral device identification.
41 -- > AF U.S. Defense Switched Network
42 -- > The switched telecommunications network of the United
43 -- > States Department of Defense.
45 -- > AG U.S. federal telecommunications system
46 -- > The switched telecommunications network of the United
47 -- > States government.
49 -- > AH World Wide Web
50 -- > Data exchange via the World Wide Web.
52 -- > AI International calling country code
53 -- > Identifies that portion of an international telephone
54 -- > number representing the country code to be used when
55 -- > calling internationally.
57 -- > AJ Alternate telephone
58 -- > Identifies the alternate telephone number.
60 -- > AK Videotex number
61 -- > Code that identifies the communications number for the
62 -- > online videotex service.
64 -- > AL Cellular phone
65 -- > Identifies the cellular phone number.
67 -- > AM International telephone direct line
68 -- > The international telephone direct line number.
70 -- > AN O.F.T.P. (ODETTE File Transfer Protocol)
71 -- > ODETTE File Transfer Protocol.
74 -- > The communication number identifies a cable address.
76 -- > EI EDI transmission
77 -- > Number identifying the service and service user.
79 -- > EM Electronic mail
80 -- > Exchange of mail by electronic means.
83 -- > Telephone extension.
85 -- > FT File transfer access method
86 -- > According to ISO.
89 -- > Device used for transmitting and reproducing fixed
90 -- > graphic material (as printing) by means of signals over
91 -- > telephone lines or other electronic transmission media.
93 -- > GM GEIS (General Electric Information Service) mailbox
94 -- > The communication number identifies a GEIS mailbox.
96 -- > IE IBM information exchange
97 -- > The communication number identifies an IBM IE mailbox.
100 -- > Internal mail address/number.
103 -- > Postal service document delivery.
105 -- > PB Postbox number
106 -- > The communication number identifies a postbox.
108 -- > PS Packet switching
109 -- > The process of routing and transferring data by means of
110 -- > addressed packets so that a channel is occupied only
111 -- > during the transmission; upon completion of the
112 -- > transmission the channel is made available for the
113 -- > transfer of other packets (ISO).
116 -- > Communications address assigned by Society for Worldwide
117 -- > Interbank Financial Telecommunications s.c.
120 -- > Voice/data transmission by telephone.
123 -- > Text transmission via telegraph.
126 -- > Transmission of text/data via telex.
129 -- > Transmission of text/data via telemail.
132 -- > Transmission of text/data via teletext.
135 -- > Communication service involving Teletypewriter machines
136 -- > connected by wire or electronic transmission media.
137 -- > Teletypewriter machines are the devices used to send and
138 -- > receive signals and produce hardcopy from them.
140 -- > XF X.400 address
141 -- > The X.400 address.
144 -- > Identifies that the communication number is for a pager.
146 -- > XH International telephone switchboard
147 -- > The international telephone switchboard number.
149 -- > XI National telephone direct line
150 -- > The national telephone direct line number.
152 -- > XJ National telephone switchboard
153 -- > The national telephone switchboard number.
154 simple3155 :: Parser Value
155 simple3155 = simple "3155" (alphaNumeric `upTo` 3)