aboutsummaryrefslogtreecommitdiffhomepage
path: root/specification/src/Text/Edifact/D01B/Simples/S3153.hs
blob: 9aaa96d9ae8f1f645a8f0f7dc45a0b60b5a03e04 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
{-# LANGUAGE OverloadedStrings #-}

---- Machine generated code.
---- Output of edi-parser-scaffolder

module Text.Edifact.D01B.Simples.S3153
  ( simple3153
  ) where

import           Text.Edifact.Parsing
import           Text.Edifact.Types   (Value)

-- | Derived from this specification:
--
-- >      3153  Communication medium type code                          [C]
-- >
-- >      Desc: Code specifying the type of communication medium.
-- >
-- >      Repr: an..3
-- >
-- >      AA    Circuit switching
-- >               A process that, on demand, connects two or more data
-- >               terminal equipments and permits the exclusive use of a
-- >               data circuit between them until the connection is
-- >               released (ISO).
-- >
-- >      AB    SITA
-- >               Communications number assigned by Societe Internationale
-- >               de Telecommunications Aeronautiques (SITA).
-- >
-- >      AC    ARINC
-- >               Communications number assigned by Aeronautical Radio
-- >               Inc.
-- >
-- >      AD    Courier
-- >               A communication channel identifying a courier.
-- >
-- >      CA    Cable address
-- >               The cable is used as communication medium.
-- >
-- >      EI    EDI transmission
-- >               Number identifying the service and service user.
-- >
-- >      EM    Electronic mail
-- >               Exchange of mail by electronic means.
-- >
-- >      EX    Extension
-- >               Telephone extension.
-- >
-- >      FT    File transfer access method
-- >               According to ISO.
-- >
-- >      FX    Telefax
-- >               Device used for transmitting and reproducing fixed
-- >               graphic material (as printing) by means of signals over
-- >               telephone lines or other electronic transmission media.
-- >
-- >      GM    GEIS (General Electric Information Service) mailbox
-- >               GEIS mailbox system is used as communication medium.
-- >
-- >      IE    IBM information exchange
-- >               IBM IE is used as communication medium.
-- >
-- >      IM    Internal mail
-- >               Internal mail address/number.
-- >
-- >      MA    Mail
-- >               Postal service document delivery.
-- >
-- >      PB    Postbox no.
-- >               Postbox system is used as communication medium.
-- >
-- >      PS    Packet switching
-- >               The process of routing and transferring data by means of
-- >               addressed packets so that a channel is occupied only
-- >               during the transmission; upon completion of the
-- >               transmission the channel is made available for the
-- >               transfer of other packets (ISO).
-- >
-- >      SW    S.W.I.F.T.
-- >               Communications address assigned by Society for Worldwide
-- >               Interbank Financial Telecommunications s.c.
-- >
-- >      TE    Telephone
-- >               Voice/data transmission by telephone.
-- >
-- >      TG    Telegraph
-- >               Text transmission via telegraph.
-- >
-- >      TL    Telex
-- >               Transmission of text/data via telex.
-- >
-- >      TM    Telemail
-- >               Transmission of text/data via telemail.
-- >
-- >      TT    Teletext
-- >               Transmission of text/data via teletext.
-- >
-- >      TX    TWX
-- >               Communication service involving Teletypewriter machines
-- >               connected by wire or electronic transmission media.
-- >               Teletypewriter machines are the devices used to send and
-- >               receive signals and produce hardcopy from them.
-- >
-- >      XF    X.400
-- >               CCITT Message handling system.
simple3153 :: Parser Value
simple3153 = simple "3153" (alphaNumeric `upTo` 3)