I am tryin to select one records(SQL) using Rexx.Here is
the code
ADDRESS DSNREXX "EXECSQL FETCH C1 USING
DESCRIPTOR :TBSQLDA"
IF SQLCODE = 0 THEN
DO
LINE
= ''
DO I = 1 TO
TBSQLDA.SQLD
LINE = LINE
TBSQLDA.I.SQLDATA
END
I
SAY
LINE
END
ADDRESS DSNREXX "EXECSQL CLOSE
C1"
ADDRESS
DSNREXX 'DISCONNECT'
i am getting the following errors and also i dont know wr
to see the ouput.Can anyone please hlep me in solving this?
28 +++ ADDRESS
DSNREXX 'DISCONNECT'
Error running DB2REXX, line 28: Incomplete
DO/SELECT/IF
Answers were Sorted based on User's Feedback
Answer / jagdish
DSNREXX 'DISCONNECT'
insist of this wirte
ADDRESS DSNREXX 'DISCONNECT'
AND CHECK IT OUT
| Is This Answer Correct ? | 2 Yes | 1 No |
Answer / jyotiprakash8
can any one send me website on which i can get REXX Book
with some Programing Example...
Thanks in advance
Jyoti Prakash
| Is This Answer Correct ? | 0 Yes | 1 No |
When will a port of ooRexx to "XYZ" be available?
what is uni-rexx?
How do I access data held on the JES spool?
What are the functions available in rexx?
Is it possible to port existing applications from the mainframe or os/2? Are there major changes required to do this?
What does the sample library of uni-rexx consist of?
I have one input file and some 40 tables, I want to read input file and compare the input file value with the table value if it is present then we have to update with new value, this should be repeated for all 40 tables and we are reading only one input file, for this is there any REXX program or job or routine to accomplish above requirement. components of the requirements; 1. One input file 2. 40 DB2 tables 3. we have to read from the input file and compare with table value, if present then update with new value (this should be recurssive for all 40 tables for every record of input file). 4. quick help is appreciated.
can I redistribute oorexx freely with commercial software?
is oorexx compatible with rexx?
can oorexx run ibm object rexx programs?
I want to open particular list of members inside pds.Let me know whether below code will work.if not tell me how it works INPUT='DDM.DATASET(AAA*)' X = OUTTRAP(MEMS.)
Can I cleanly uninstall oorexx?