From a9d77a20008efe82862cc1adbfa7a6d4f09f8ff7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Menou?= Date: Thu, 8 Dec 2016 10:19:15 +0200 Subject: Release code as open source --- .../src/Text/Edifact/D01B/Simples/S1496.hs | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 specification/src/Text/Edifact/D01B/Simples/S1496.hs (limited to 'specification/src/Text/Edifact/D01B/Simples/S1496.hs') diff --git a/specification/src/Text/Edifact/D01B/Simples/S1496.hs b/specification/src/Text/Edifact/D01B/Simples/S1496.hs new file mode 100644 index 0000000..02da337 --- /dev/null +++ b/specification/src/Text/Edifact/D01B/Simples/S1496.hs @@ -0,0 +1,21 @@ +{-# LANGUAGE OverloadedStrings #-} + +---- Machine generated code. +---- Output of edi-parser-scaffolder + +module Text.Edifact.D01B.Simples.S1496 + ( simple1496 + ) where + +import Text.Edifact.Parsing +import Text.Edifact.Types (Value) + +-- | Derived from this specification: +-- +-- > 1496 Goods item number [B] +-- > +-- > Desc: To specify a goods item within a consignment. +-- > +-- > Repr: n..5 +simple1496 :: Parser Value +simple1496 = simple "1496" (numeric `upTo` 5) -- cgit v1.2.3