specification/src/Text/Edifact/D96A/Simples/S3045.hs

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D96A.Simples.S3045
   7   ( simple3045
   8   ) where
   9
  10 import           Text.Edifact.Parsing
  11 import           Text.Edifact.Types   (Value)
  12
  13 -- | Derived from this specification:
  14 --
  15 -- >   3045  Party name format, coded
  16 -- >
  17 -- >   Desc: Specification of the representation of a party name.
  18 -- >
  19 -- >   Repr: an..3
  20 -- >
  21 -- >         1 Name components in sequence as defined in description below
  22 -- >              Name component 1: Family name Name component 2: Given
  23 -- >              name or initials Name component 3: Given name or initials
  24 -- >              Name component 4: Maiden name Name component 5: Title
  25 -- >              Group of name components transmitted in sequence with
  26 -- >              name component 1 transmitted first. The maiden name is
  27 -- >              the family name given at birth of a female. Other names
  28 -- >              are self-explanatory.
  29 simple3045 :: Parser Value
  30 simple3045 = simple "3045" (alphaNumeric `upTo` 3)