1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Simples.S5495
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > 5495 Sub-line indicator, coded
17 -- > Desc: Indication that the segment and/or segment group is used for
18 -- > sub-line item information.
22 -- > 1 Sub-line information
23 -- > Self explanatory.
24 simple5495 :: Parser Value
25 simple5495 = simple "5495" (alphaNumeric `upTo` 3)