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 |
I want to remove a duplicates form a given input field using rexx program. please Any one help me out to solve this ... Thanks in Advance.
can oorexx run ibm object rexx programs?
How to code the db2 queries using rexx, and also plz send some link and examples using db2 queries?
for which platforms is uni-rexx available?
is there an aix version of oorexx?
Can anyone provide me the source code for LOC(lines of code) counter written in REXX language which can run on IBM mainframe z/OS V1R4. The LOC counter should be able to count the comments,lines of code,blank lines in a COBOL program and JCL's
what if I need to have the same application running on multiple platforms, such as unix and the mainframe? Does that mean I have to maintain two separate sources?
How to run my rexx exec?
How do I find or access the current level of a GDG?
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
how to pass parms to ispf edit macro?
What are various loop types supported by rexx?