stupidedi 1.2.2 → 1.2.5

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 9ff1d8f6beea22666b9a2951803ffa317f1e4751
-  data.tar.gz: 93a7f43ad7423f24bb1ea303b332adab7137d24b
+  metadata.gz: 2093ddba04d861a92064a74df14c6c950f29b54d
+  data.tar.gz: d94a09d05a3d2f5c21cec4309e4cb3f72124ad6d
 SHA512:
-  metadata.gz: 4154b4e91f33438c147ee2be6c1839a783b16d34e123a8e8e04bee574908f2646ce459afad0a23c4630213a43c329a8c24e05a5fab1a801094485c3749a2915b
-  data.tar.gz: ce31dfd096d0b953289c0b56fa0ea08f158e1d143a219a9366ee34075ac856e3fb8020bfd793f7b9bebd1f48476ae3420bef328e178dc5d60b2141568d8164c3
+  metadata.gz: e9ed1ef8bc67776276b6ce099d7e721ed9eb61d0e75e6a265ef58dc291e131172b5129ffe2715d5d2dd7a58034a920e8172da523be8da0e42042e2fec4d1ce01
+  data.tar.gz: 36ab7df0ead50f68f75b063ad41566013e3cc6cc3b23ca533a951c1b86f35358732b76e36a84d09d6a791e6707a443ed2521985d102e95e261165fe6cbda5cdf

data/README.md

@@ -1,5 +1,5 @@
 # Stupidedi
-[![Build Status](https://secure.travis-ci.org/kputnam/stupidedi.png?branch=master)](http://travis-ci.org/kputnam/stupidedi) [![Dependency Status](https://gemnasium.com/irobayna/stupidedi.svg)](https://gemnasium.com/irobayna/stupidedi) [![GitHub version](https://badge.fury.io/gh/kputnam%2Fstupidedi.svg)](http://badge.fury.io/gh/kputnam%2Fstupidedi) [![Code Climate](https://codeclimate.com/github/kputnam/stupidedi.png)](https://codeclimate.com/github/kputnam/stupidedi)
+[![Build Status](https://secure.travis-ci.org/kputnam/stupidedi.png?branch=master)](http://travis-ci.org/kputnam/stupidedi) [![Dependency Status](https://gemnasium.com/irobayna/stupidedi.svg)](https://gemnasium.com/irobayna/stupidedi) [![GitHub version](https://badge.fury.io/gh/kputnam%2Fstupidedi.svg)](http://badge.fury.io/gh/kputnam%2Fstupidedi) [![Code Climate](https://codeclimate.com/github/kputnam/stupidedi.png)](https://codeclimate.com/github/kputnam/stupidedi) [![Inline docs](http://inch-ci.org/github/kputnam/stupidedi.png?branch=master)](http://inch-ci.org/github/kputnam/stupidedi) 
 
 ![Screenshot](https://raw.github.com/kputnam/stupidedi/master/doc/images/edi-pp.png)
 
@@ -18,6 +18,18 @@ notices, and health care claims. It is similar to XML in some ways,
 but precedes it by about 15 years; so if you think XML sucks, you
 will love to hate EDI.
 
+### Beware / Help Wanted
+
+Stupidedi monkey patches some classes in the Ruby standard library. These
+are listed in `lib/ruby`. Rails users and other ActiveSupport users have
+reported problems caused by these patches, since they are unintentionally
+incompatible.
+
+There is a pull request ([72](https://github.com/kputnam/stupidedi/pull/72))
+which should solve these. Please test the `refinements` branch and provide
+feedback -- it imposes a requirement of Ruby 2.1+, but should otherwise be
+a seemless change.
+
 ## What problem does it solve?
 
 Transaction set specifications can be enormous, boring, and vague.
@@ -232,7 +244,7 @@ Perform validation on a file
 require "stupidedi"
 
 # You can customize this to delegate to your own grammar definitions, if needed.
-config = Stupidedi::Config.default
+config = Stupidedi::Config.hipaa
 
 b = Stupidedi::Builder::BuilderDsl.build(config)
 
@@ -301,7 +313,7 @@ end
 ```ruby
 require "stupidedi"
 
-config = Stupidedi::Config.default
+config = Stupidedi::Config.hipaa
 parser = Stupidedi::Builder::StateMachine.build(config)
 
 input  = if RUBY_VERSION > "1.8"

data/bin/edi-pp

@@ -8,10 +8,7 @@ GC.disable
 # This will be auto-enabled when $stdout.tty?, but -C forces color output
 require "term/ansicolor" if ARGV.delete("-C")
 
-# config = Stupidedi::Config.default
-# config = Stupidedi::Config.contrib
-config = Stupidedi::Config.hipaa
-
+config = Stupidedi::Config.contrib(Stupidedi::Config.hipaa(Stupidedi::Config.default))
 parser = Stupidedi::Builder::StateMachine.build(config)
 start  = Time.now
 nondet = ARGV.delete('-N')
@@ -31,7 +28,7 @@ stop = Time.now
 
 parser.zipper.map{|z| pp z.root.node }.explain do
   # Multiple parse trees (non-deterministic state)
-  unless nondet 
+  unless nondet
     puts "Non-deterministic state"
   else
     puts "Non-deterministic states (#{parser.active.length}):"
@@ -49,7 +46,7 @@ begin
   a = parser.first
   b = parser.last
 
-  a.flatmap{|a| b.flatmap{|b| a.distance(b) }}.
+  a.flatmap{|a1| b.flatmap{|b1| a1.distance(b1) }}.
     tap{|d| puts "#{d + 1} segments" }
 end
 

data/lib/stupidedi/builder/builder_dsl.rb

@@ -24,6 +24,10 @@ module Stupidedi
                                  Reader::SegmentDict.empty)
       end
 
+      def respond_to_missing?(name, include_private = false)
+        SEGMENT_ID =~ name.to_s || super
+      end
+
       def strict?
         @strict
       end

data/lib/stupidedi/builder/generation.rb

@@ -9,9 +9,9 @@ module Stupidedi
         reader  = reader.read_segment
 
         while reader.defined?
-          reader = reader.flatmap do |segment_tok, reader|
+          reader = reader.flatmap do |segment_tok, reader1|
             machine, reader =
-              machine.insert(segment_tok, reader)
+              machine.insert(segment_tok, reader1)
 
             reader.read_segment
           end

data/lib/stupidedi/builder/states/abstract_state.rb

@@ -86,8 +86,8 @@ module Stupidedi
         if element_use.simple?
           if element_use.repeatable?
             element_toks = element_tok.element_toks
-            element_vals = element_toks.map do |element_tok|
-              mksimple(designator, element_use, element_tok)
+            element_vals = element_toks.map do |element_tok1|
+              mksimple(designator, element_use, element_tok1)
             end
 
             mkrepeated(designator, element_use, element_vals)
@@ -97,8 +97,8 @@ module Stupidedi
         else
           if element_use.repeatable?
             element_toks = element_tok.element_toks
-            element_vals = element_toks.map do |element_tok|
-              mkcomposite(designator, element_use, element_tok)
+            element_vals = element_toks.map do |element_tok1|
+              mkcomposite(designator, element_use, element_tok1)
             end
 
             mkrepeated(designator, element_use, element_vals)

data/lib/stupidedi/config.rb

@@ -126,6 +126,7 @@ module Stupidedi
           x.register("004010", "SH", "856") { Stupidedi::Contrib::FortyTen::TransactionSetDefs::SH856 }
           x.register("004010", "SQ", "866") { Stupidedi::Contrib::FortyTen::TransactionSetDefs::SQ866 }
           x.register("004010", "FA", "997") { Stupidedi::Contrib::FortyTen::TransactionSetDefs::FA997 }
+          x.register("004010", "SC", "832") { Stupidedi::Contrib::FortyTen::TransactionSetDefs::SC832 }
 
           x.register("002001", "SH", "856") { Stupidedi::Contrib::TwoThousandOne::TransactionSetDefs::SH856 }
           x.register("002001", "PO", "830") { Stupidedi::Contrib::TwoThousandOne::TransactionSetDefs::PO830 }
@@ -134,6 +135,7 @@ module Stupidedi
           x.register("003010", "RA", "820") { Stupidedi::Contrib::ThirtyTen::TransactionSetDefs::RA820 }
           x.register("003010", "PO", "850") { Stupidedi::Contrib::ThirtyTen::TransactionSetDefs::PO850 }
           x.register("003010", "PC", "860") { Stupidedi::Contrib::ThirtyTen::TransactionSetDefs::PC860 }
+          x.register("003010", "PS", "830") { Stupidedi::Contrib::ThirtyTen::TransactionSetDefs::PS830 }
 
           x.register("003040", "WA", "142") { Stupidedi::Contrib::ThirtyForty::TransactionSetDefs::WA142 }
 

data/lib/stupidedi/contrib/003010/guides.rb

@@ -14,7 +14,7 @@ module Stupidedi
         autoload :RA820, "stupidedi/contrib/003010/guides/RA820"
         autoload :PO850, "stupidedi/contrib/003010/guides/PO850"
         autoload :PC860, "stupidedi/contrib/003010/guides/PC860"
-
+        autoload :PS830, "stupidedi/contrib/003010/guides/PS830"
       end
     end
   end

data/lib/stupidedi/contrib/003010/guides/PC860.rb

@@ -40,6 +40,8 @@ module Stupidedi
               b::Element(e::Required,    "Shipment Method of Payment", b::Values("DE")),
               b::Element(e::Situational, "Location Qualifier", b::Values("AC")),
               b::Element(e::Situational, "Description"),
+              b::Element(e::NotUsed,     "Unknown"),
+              b::Element(e::NotUsed,     "Unknown"),
               b::Element(e::Situational, "Location Qualifier"),
               b::Element(e::Situational, "Description - Postal Code")),
 
@@ -66,6 +68,9 @@ module Stupidedi
 
             b::Segment(240, s::TD5, "Carrier Details (Routing Sequence/Transit Time)",
               r::Situational, d::RepeatCount.bounded(2),
+              b::Element(e::NotUsed,     "Unknown"),
+              b::Element(e::NotUsed,     "Unknown"),
+              b::Element(e::NotUsed,     "Unknown"),
               b::Element(e::Required,    "Transportation Method/Type Code", b::Values("A","AE","M","PG","R","RR","SE","SS")),
               b::Element(e::Required,    "Routing - Carrier's Name")),
 
@@ -98,9 +103,9 @@ module Stupidedi
                 r::Situational, d::RepeatCount.bounded(1000),
                 b::Element(e::Required,    "Free-Form Message Text"))),
 
-            d::LoopDef.build("N1", d::RepeatCount.bounded(200),
+            d::LoopDef.build("N1", d::RepeatCount.bounded(1),
               b::Segment(300, s::N1, "Name",
-                r::Situational, d::RepeatCount.bounded(1),
+                r::Situational, d::RepeatCount.bounded(2),
                 b::Element(e::Required,    "Entity Identifier Code", b::Values("BT","MP")),
                 b::Element(e::Situational, "Name")),
 

data/lib/stupidedi/contrib/003010/guides/PS830.rb

@@ -0,0 +1,198 @@
+module Stupidedi
+  module Contrib
+    module ThirtyTen
+      module Guides
+
+        b = GuideBuilder
+        d = Schema
+        r = SegmentReqs
+        e = ElementReqs
+        s = Versions::FunctionalGroups::ThirtyTen::SegmentDefs
+        # s = Versions::FunctionalGroups::FortyTen::SegmentDefs
+        t = Contrib::ThirtyTen::TransactionSetDefs
+        #t = Contrib::FortyTen::TransactionSetDefs
+        #
+        # 830 Planning Schedule with Release Capability
+        #
+        PS830 = b.build(t::PS830,
+          d::TableDef.header("Header",
+            b::Segment(10, s:: ST, "Transaction Set Header",
+              r::Required, d::RepeatCount.bounded(1),
+              b::Element(e::Required,    "Transaction Set Identifier Code", b::Values("830")),
+              b::Element(e::Required,    "Transaction Set Control Number")),
+            b::Segment(20, s::BFR, "Beginning Segment for Planning Schedule",
+              r::Required, d::RepeatCount.bounded(1),
+              b::Element(e::Required,    "Transaction Set Purpose Code", b::Values("00")),
+              b::Element(e::Situational,  "Reference Number NNA Release Period"),
+              b::Element(e::Situational,    "Release Number"),
+              b::Element(e::Required,    "Schedule Type Qualifier", b::Values("DL")),
+              b::Element(e::Required,    "Schedule Quantity Qualifier", b::Values("A")),
+              b::Element(e::Required,    "Date - Beginning Date"),
+              b::Element(e::Required,    "Date - Ending Date"),
+              b::Element(e::Required,    "Date - Release Create Date"))),
+
+          d::TableDef.header("Detail",
+            d::LoopDef.build("N1 - LOOP1", d::RepeatCount.bounded(200),
+              b::Segment(90, s:: N1, "Name - Nissan Analyst",
+                r::Situational, d::RepeatCount.bounded(1),
+                b::Element(e::Required,    "Entity Identifier Code", b::Values("MI")),
+                b::Element(e::Situational, "Identification Code Qualifier", b::Values("Nissan")),
+                b::Element(e::Situational, "Identification Code Qualifier"),
+                b::Element(e::Situational,  "Identification Code - Supplier Code")),
+              b::Segment( 140, s::PER, "Administrative Communications Contact - Nissan Release Sr Analyst",
+                r::Situational, d::RepeatCount.bounded(3),
+                b::Element(e::Required,    "Contact Function Code", b::Values("OD")),
+                b::Element(e::Situational, "Name - PER02"),
+                b::Element(e::Situational, "Communication Number Qualifier", b::Values("TE")),
+                b::Element(e::Situational, "Communication Number"),
+                b::Element(e::NotUsed,     "PER05"),
+                b::Element(e::NotUsed,     "PER06"),
+                b::Element(e::NotUsed,     "PER07"),
+                b::Element(e::NotUsed,     "PER08"),
+                b::Element(e::NotUsed,     "PER09"))),
+
+            d::LoopDef.build("LIN", d::RepeatCount.bounded(10000),
+              b::Segment( 010, s::LIN, "Item Identification",
+                r::Required, d::RepeatCount.bounded(1),
+                b::Element(e::NotUsed,     "LIN01"),
+                b::Element(e::Required,    "Product/Service ID Qualifier - LIN02", b::Values("VP")),
+                b::Element(e::Required,    "Product/Service ID - NNA Part Number"),
+                b::Element(e::Situational, "Product/Service ID Qualifier - LIN04", b::Values("PO")),
+                b::Element(e::Situational, "Product/Service ID - NNA PO Number"),
+                b::Element(e::NotUsed,     "LIN06"),
+                b::Element(e::NotUsed,     "LIN07"),
+                b::Element(e::NotUsed,     "LIN08"),
+                b::Element(e::NotUsed,     "LIN09"),
+                b::Element(e::NotUsed,     "LIN10"),
+                b::Element(e::NotUsed,     "LIN11"),
+                b::Element(e::NotUsed,     "LIN12"),
+                b::Element(e::NotUsed,     "LIN13"),
+                b::Element(e::NotUsed,     "LIN14"),
+                b::Element(e::NotUsed,     "LIN15"),
+                b::Element(e::NotUsed,     "LIN16"),
+                b::Element(e::NotUsed,     "LIN17"),
+                b::Element(e::NotUsed,     "LIN18"),
+                b::Element(e::NotUsed,     "LIN19"),
+                b::Element(e::NotUsed,     "LIN20"),
+                b::Element(e::NotUsed,     "LIN21"),
+                b::Element(e::NotUsed,     "LIN22"),
+                b::Element(e::NotUsed,     "LIN23"),
+                b::Element(e::NotUsed,     "LIN24"),
+                b::Element(e::NotUsed,     "LIN25"),
+                b::Element(e::NotUsed,     "LIN26"),
+                b::Element(e::NotUsed,     "LIN27"),
+                b::Element(e::NotUsed,     "LIN28"),
+                b::Element(e::NotUsed,     "LIN29"),
+                b::Element(e::NotUsed,     "LIN30"),
+                b::Element(e::NotUsed,     "LIN31")),
+              b::Segment( 020, s::UIT, "Unit of Measure",
+                r::Required, d::RepeatCount.bounded(1),
+                b::Element(e::Required,    "Unit or Basis for Measurement Code", b::Values("LB"))),
+              b::Segment( 80, s::PID, "Product/Item Description",
+                r::Situational, d::RepeatCount.bounded(1000),
+                b::Element(e::Required,     "Item Description Type",  b::Values("F")),
+                b::Element(e::Situational, "Product/Process Characteristic Code", b::Values("9B")),
+                b::Element(e::NotUsed,     "PID03"),
+                b::Element(e::NotUsed,     "PID04"),
+                b::Element(e::Situational, "Description - Part Description")),
+              b::Segment(90, s:: N1, "Name - Nissan Analyst",
+                r::Situational, d::RepeatCount.bounded(1),
+                b::Element(e::Required,    "Entity Identifier Code", b::Values("MI")),
+                b::Element(e::Situational, "Identification Code Qualifier", b::Values("Nissan")),
+                b::Element(e::Situational, "Identification Code Qualifier"),
+                b::Element(e::Situational,  "Identification Code - Supplier Code")),
+              b::Segment( 290, s::SDP, "Ship/Delivery Pattern",
+                r::Required, d::RepeatCount.bounded(1),
+                b::Element(e::Required,    "Ship/Delivery or Calendar Pattern Code", b::Values("Y")),
+                b::Element(e::Required,    "Ship/Delivery Pattern Time Code", b::Values("Y"))),
+
+              # d::LoopDef.build("NTE", d::RepeatCount.bounded(260),
+              #   b::Segment(400, s::NTE, "Note/Special Instruction",
+              #     r::Situational, d::RepeatCount.bounded(1),
+              #     b::Element(e::Situational, "Note Reference Code", b::Values("GEN", "LIN")),
+              #     b::Element(e::Situational, "Free Form Text"))),
+              b::Segment( 300, s::FST, "Forecast Schedule",
+                r::Situational, d::RepeatCount.bounded(1),
+                b::Element(e::Required,    "Quantity"),
+                b::Element(e::Required,    "Forecast Qualifier", b::Values("C","D")),
+                b::Element(e::Required,    "Forecast Timing Qualifier", b::Values("D")),
+                b::Element(e::Required,    "Date - Scheduled Usage Date"),
+                b::Element(e::NotUsed,  "FST05"),
+                b::Element(e::Situational, "Date/Time Qualifier", b::Values("002")),
+                b::Element(e::Situational, "Time - Delivery Requested Time"),
+                b::Element(e::Situational, "Reference Number Qualifier", b::Values("DO")),
+                b::Element(e::Situational, "Reference Number - Customer Assigned Order Number")),
+
+              # d::LoopDef.build("SHP", d::RepeatCount.bounded(1),
+              #   b::Segment( 301, s::FST, "Forecast Schedule - LAST",
+              #     r::Situational, d::RepeatCount.bounded(1),
+              #     b::Element(e::Required,    "Quantity"),
+              #     b::Element(e::Required,    "Forecast Qualifier", b::Values("C","D")),
+              #     b::Element(e::Required,    "Forecast Timing Qualifier", b::Values("D")),
+              #     b::Element(e::Required,    "Date - Scheduled Usage Date"),
+              #     b::Element(e::NotUsed,  "FST05"),
+              #     b::Element(e::Situational, "Date/Time Qualifier", b::Values("002")),
+              #     b::Element(e::Situational, "Time - Delivery Requested Time"),
+              #     b::Element(e::Situational, "Reference Number Qualifier", b::Values("DO")),
+              #     b::Element(e::Situational, "Reference Number - Customer Assigned Order Number")),
+              #   b::Segment(470, s::SHP, "Shipped/Received Information",
+              #     r::Situational, d::RepeatCount.bounded(1),
+              #     b::Element(e::Situational, "Quantity Qualifier", b::Values("02")),
+              #     b::Element(e::Situational, "Quantity"),
+              #     b::Element(e::Situational, "Date/Time Qualifier", b::Values("011")),
+              #     b::Element(e::Situational, "Date"))),
+
+              b::Segment(390, s::MAN, "Marks and Numbers",
+                r::Situational, d::RepeatCount.bounded(10),
+                b::Element(e::Required, "Marks and Numbers Qualifier", b::Values("PB")),
+                b::Element(e::Required, "Marks and Numbers")))),
+
+            # d::LoopDef.build("FST", d::RepeatCount.bounded(1),
+              # b::Segment( 301, s::FST, "Forecast Schedule - LAST",
+              #   r::Situational, d::RepeatCount.bounded(1),
+              #   b::Element(e::Required,    "Quantity"),
+              #   b::Element(e::Required,    "Forecast Qualifier", b::Values("C","D")),
+              #   b::Element(e::Required,    "Forecast Timing Qualifier", b::Values("D")),
+              #   b::Element(e::Required,    "Date - Scheduled Usage Date"),
+              #   b::Element(e::NotUsed,  "FST05"),
+              #   b::Element(e::Situational, "Date/Time Qualifier", b::Values("002")),
+              #   b::Element(e::Situational, "Time - Delivery Requested Time"),
+              #   b::Element(e::Situational, "Reference Number Qualifier", b::Values("DO")),
+              #   b::Element(e::Situational, "Reference Number - Customer Assigned Order Number")),
+              # b::Segment(470, s::SHP, "Shipped/Received Information",
+              #   r::Situational, d::RepeatCount.bounded(1),
+              #   b::Element(e::Situational, "Quantity Qualifier", b::Values("02")),
+              #   b::Element(e::Situational, "Quantity"),
+              #   b::Element(e::Situational, "Date/Time Qualifier", b::Values("011")),
+              #   b::Element(e::Situational, "Date")))),
+
+          d::TableDef.header("Summary",
+            # b::Segment( 301, s::FST, "Forecast Schedule - LAST",
+            #   r::Required, d::RepeatCount.bounded(1),
+            #   b::Element(e::Required,    "Quantity"),
+            #   b::Element(e::Required,    "Forecast Qualifier", b::Values("C","D")),
+            #   b::Element(e::Required,    "Forecast Timing Qualifier", b::Values("D")),
+            #   b::Element(e::Required,    "Date - Scheduled Usage Date"),
+            #   b::Element(e::NotUsed,  "FST05"),
+            #   b::Element(e::Situational, "Date/Time Qualifier", b::Values("002")),
+            #   b::Element(e::Situational, "Time - Delivery Requested Time"),
+            #   b::Element(e::Situational, "Reference Number Qualifier", b::Values("DO")),
+            #   b::Element(e::Situational, "Reference Number - Customer Assigned Order Number")),
+            b::Segment(010, s::CTT, "Transaction Totals",
+              r::Required, d::RepeatCount.bounded(1),
+              b::Element(e::Required, "Number of Line Items"),
+              b::Element(e::Situational,  "Hash Total"),
+              b::Element(e::NotUsed,  "CTT03"),
+              b::Element(e::NotUsed,  "CTT04"),
+              b::Element(e::NotUsed,  "CTT05"),
+              b::Element(e::NotUsed,  "CTT06"),
+              b::Element(e::NotUsed,  "CTT07")),
+            b::Segment(020, s:: SE, "Transaction Set Trailer",
+              r::Required, d::RepeatCount.bounded(1),
+              b::Element(e::Required, "Number of Included Segments"),
+              b::Element(e::Required, "Transaction Set Control Number"))))
+
+      end
+    end
+  end
+end

data/lib/stupidedi/contrib/003010/guides/RA820.rb

@@ -24,6 +24,13 @@ module Stupidedi
               b::Element(e::Required,    "Payment Method Code", b::Values("PBC")),
               b::Element(e::Required,    "Monetary Amount"),
               b::Element(e::Required,    "Transaction Handling Code", b::Values("I")),
+              b::Element(e::NotUsed,     "Unknown")),
+              b::Element(e::NotUsed,     "Unknown")),
+              b::Element(e::NotUsed,     "Unknown")),
+              b::Element(e::NotUsed,     "Unknown")),
+              b::Element(e::NotUsed,     "Unknown")),
+              b::Element(e::NotUsed,     "Unknown")),
+              b::Element(e::NotUsed,     "Unknown")),
               b::Element(e::Situational, "Account Number - Supplier Number"),
               b::Element(e::Situational, "Effective Entry Date - Issue Date")),
             b::Segment(50, s::REF, "Reference Numbers",

data/lib/stupidedi/contrib/003010/transaction_set_defs.rb

@@ -15,6 +15,9 @@ module Stupidedi
         autoload :PC860, # Purchase Order Change
           "stupidedi/contrib/003010/transaction_set_defs/PC860"
 
+        autoload :PS830, # Planning Schedule with Release Capability
+          "stupidedi/contrib/003010/transaction_set_defs/PS830"
+
       end
     end
   end

data/lib/stupidedi/contrib/003010/transaction_set_defs/PC860.rb

@@ -21,7 +21,7 @@ module Stupidedi
               s::MSG.use( 290, r::Optional,  d::RepeatCount.bounded(1000))),
 
             d::LoopDef.build("N1", d::RepeatCount.bounded(1),
-              s:: N1.use( 300, r::Optional,  d::RepeatCount.bounded(1)),
+              s:: N1.use( 300, r::Optional,  d::RepeatCount.bounded(2)),
               s:: N2.use( 310, r::Optional,  d::RepeatCount.bounded(1)),
               s:: N3.use( 320, r::Optional,  d::RepeatCount.bounded(1)),
               s:: N4.use( 330, r::Optional,  d::RepeatCount.bounded(1)))),

data/lib/stupidedi/contrib/003010/transaction_set_defs/PS830.rb

@@ -0,0 +1,56 @@
+module Stupidedi
+  module Contrib
+    module ThirtyTen
+      module TransactionSetDefs
+        d = Schema
+        r = SegmentReqs
+        s = SegmentDefs
+
+        PS830 = d::TransactionSetDef.build("PS", "830", "Planning Schedule with Release Capability",
+
+          d::TableDef.header("Table 1 - Header",
+            s:: ST.use( 10, r::Mandatory, d::RepeatCount.bounded(1)),
+            s::BFR.use( 20, r::Mandatory, d::RepeatCount.bounded(1)),
+
+            d::LoopDef.build("N1", d::RepeatCount.bounded(200),
+              s:: N1.use(  90, r::Optional, d::RepeatCount.bounded(1)),
+              s::PER.use( 140, r::Optional, d::RepeatCount.bounded(3)))),
+
+          d::TableDef.detail("Table 2 - Detail",
+            d::LoopDef.build("LIN", d::RepeatCount.bounded(10000),
+              s::LIN.use( 010, r::Mandatory, d::RepeatCount.bounded(1)),
+              s::UIT.use( 020, r::Mandatory, d::RepeatCount.bounded(1)),
+              s::PID.use(  80, r::Optional, d::RepeatCount.bounded(1)),
+              s:: N1.use(  90, r::Optional, d::RepeatCount.bounded(1)),
+              s::MAN.use( 280, r::Optional, d::RepeatCount.bounded(10)),
+
+              # d::LoopDef.build("FST", d::RepeatCount.bounded(10000),
+              #   s::FST.use( 410, r::Optional, d::RepeatCount.bounded(1)),
+              #   s::NTE.use( 400, r::Optional, d::RepeatCount.bounded(100))),
+
+              d::LoopDef.build("SDP", d::RepeatCount.bounded(260),
+                s::SDP.use( 290, r::Optional, d::RepeatCount.bounded(1)),
+                # d::LoopDef.build("NTE", d::RepeatCount.unbounded,
+                #   s::NTE.use( 400, r::Optional, d::RepeatCount.unbounded)),
+                s::FST.use( 410, r::Optional, d::RepeatCount.unbounded)),
+
+              d::LoopDef.build("SHP", d::RepeatCount.bounded(25),
+                s::SHP.use( 480, r::Optional, d::RepeatCount.bounded(1)),
+                s::REF.use( 460, r::Optional, d::RepeatCount.bounded(5))))),
+
+              # s::MAN.use( 390, r::Optional, d::RepeatCount.bounded(10)))),
+
+            # d::LoopDef.build("FST", d::RepeatCount.bounded(1),
+            #   # s::FST.use( 301, r::Optional, d::RepeatCount.bounded(1)),
+            #   s::SHP.use( 470, r::Optional, d::RepeatCount.bounded(1)))),
+
+          d::TableDef.summary("Table 3 - Summary",
+            # s::FST.use(301, r::Mandatory, d::RepeatCount.bounded(1)),
+            s::CTT.use(010, r::Mandatory, d::RepeatCount.bounded(1)),
+            s:: SE.use(020, r::Mandatory, d::RepeatCount.bounded(1))))
+
+
+      end
+    end
+  end
+end