1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Simples.S1159
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > 1159 Sequence identifier source code [B]
17 -- > Desc: Code specifying the source of a sequence identifier.
22 -- > Report from workstation 1.
25 -- > Report from workstation 2.
27 -- > 3 Manufacturer sequence number
28 -- > The manufacturer's plant requesting the delivery of the
29 -- > item has allocated the sequence number.
31 -- > 4 Manufacturer production sequence number
32 -- > The plant requesting the delivery of an item assigns a
33 -- > number indicating the sequence of the finished article.
35 -- > 5 Transmission sequence
36 -- > The positional sequence when transmitted.
38 -- > 6 Structure sequence
39 -- > The positional sequence in a message structure as
40 -- > published in a particular UN directory.
41 simple1159 :: Parser Value
42 simple1159 = simple "1159" (alphaNumeric `upTo` 3)