|
I have to agree with Ron. Our code is also plain vanilla JBA and is replica of Ron's, testing for 90 being ON. We are still at 3.5.1. Rgds Rick "Barbieri, Ron" <Rbarbie@pts-tools.com>@midrange.com on 28/08/2001 02:21:16 Please respond to jbausers-l@midrange.com Sent by: jbausers-l-admin@midrange.com Please respond to jbausers-l@midrange.com To: "'jbausers-l@midrange.com'" <jbausers-l@midrange.com> cc: Subject: RE: JBA ML - DRP question Gary, You have me wondering what version of DRP you have because here's our unchanged version of that section of source code: C****************************************************** 890823 C* WRITE RECORD FOR EACH STOCK ROOM BALANCE 890823 C****************************************************** 890823 C S0BALN BEGSR 890823 C* 920921 C*********************ADD SPHY60 TOTONH **DRV20011 920921 C*********************SUB SFRZ60 TOTONH **DRV20011 920921 C* 890823 C* Write Physical Stock available at individual Stkrooms. 890823 C* 890823 C KEY77 CHAINDR77ISTK 90 890823 C 90 DO 890823 C MOVE L#CONO CONO77 890823 C MOVE MODNDS MODN77 890823 C MOVE ITEM04 ITEM77 890823 C MOVE STRC60 ISTR77 890823 C END 890823 C* 890823 As you can see, ours already tests *IN90 for the value of *ON..... Ron Barbieri Production Tool Supply -----Original Message----- From: Gary.Brown@appliedchemicals.com [mailto:Gary.Brown@appliedchemicals.com] Sent: Monday, August 27, 2001 5:42 AM To: JBAUSERS-L@midrange.com Subject: JBA ML - DRP question For those of us lucky enough to still have source code :-) Looking at program DR005, subroutine S0BALN The CHAIN on DR77ISTK and the subsequent test of *IN90 I think the test of *IN90 should be for the value of *ON (which would mean the CHAIN has failed) and so the fields would then be populated. The result of the way it is written at the moment (testing for OFF) is that we have lots of records with blanks for CONO/MODN/ITEM in file DRP77 Does anyone else agree that the test should be for *ON Not sure yet of what impact this error has on the down stream calculations. _______________________________________________ This is the GEAC/JBA System 21 Users (JBAUSERS-L) mailing list To post a message email: JBAUSERS-L@midrange.com To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/cgi-bin/listinfo/jbausers-l or email: JBAUSERS-L-request@midrange.com _______________________________________________ This is the GEAC/JBA System 21 Users (JBAUSERS-L) mailing list To post a message email: JBAUSERS-L@midrange.com To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/cgi-bin/listinfo/jbausers-l or email: JBAUSERS-L-request@midrange.com
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.