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
-~----------~----~----~----~------~----~------~--~---
