xx = ITM<1>etc... Dan
On Tue, Jun 2, 2009 at 2:45 PM, ww <[email protected]> wrote: > > The following code always prints items down the screen as shown toward > the end of this post. How do I capture each ITM value to a variable so > I can use them in a calculation later? > > Thanks in advance, > > INCLUDE BP INIT.COMMON > OPEN 'RM' TO RM ELSE CRT 'CANNOT OPEN RM FILE';STOP > > STMNT = 'SELECT RM WITH S/N = "STOCK" AND WITH FLAG NE "OUCH" AND WITH > NO.CHANGE = "" FLAG S/N MINQOH MAXQOH REOQOH QOH QIH QOO' > > EXECUTE STMNT CAPTURING JUNK RTNLIST THELIST > LOOP > READNEXT ITM FROM THELIST ELSE EXIT > PRINT ITM<1>:" ":ITM<2>:" ":ITM<3> > REPEAT > STOP > > STOCK > 0 > 3 > 1 > 9 > > 8 > > STOCK > 0 > 3 > 1 > 14 > > 0 > > STOCK > 0 > 2 > 1 > 22 > > 0 > > > > > > --~--~---------~--~----~------------~-------~--~----~ Please read the posting guidelines at: http://groups.google.com/group/jBASE/web/Posting%20Guidelines IMPORTANT: Type T24: at the start of the subject line for questions specific to Globus/T24 To post, send email to [email protected] To unsubscribe, send email to [email protected] For more options, visit this group at http://groups.google.com/group/jBASE?hl=en -~----------~----~----~----~------~----~------~--~---
