Interested to Buy Any Domain ? << Click Here >> for more details...
I am new to rexx db2 ,can anyone help me by expalinin how
to code the db2 queries using rexx,and also plz send some
link and examples using db2 queries.
- 3 Answers
- 11860 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / marlo
I've done this before and here's part of my code!!! You do
the research!!!
ADDRESS TSO "SUBCOM DSNREXX"
IF RC <> 0 THEN
DO
X_RC = RXSUBCOM('ADD','DSNREXX','DSNREXX')
IF X_RC <> 0 THEN
DO
SAY 'PROBLEM LOADING '||SUBSYS' ENVIRONMENT'
EXIT 0
END
END
ADDRESS DSNREXX "CONNECT" SUBSYS
...
...
ADDRESS DSNREXX "EXECSQL DECLARE C1 CURSOR FOR S1"
ADDRESS DSNREXX "EXECSQL PREPARE S1 FROM :SQLSTMT"
ADDRESS DSNREXX "EXECSQL OPEN C1"
ADDRESS DSNREXX "EXECSQL FETCH C1 INTO :COUNT "
ADDRESS DSNREXX "EXECSQL CLOSE C1"
-marloL.
| Is This Answer Correct ? | 7 Yes | 0 No |
Answer / martin
sometimes it is wise to start with an options, like:
ADDRESS AS400REXX 'EXECSQL SET OPTION COMMIT = *NONE'
don't know the db2 syntax, though
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / guest
REXX doesn't have support to DB2. But still you can access
it thru some TSO CPs. One of the commercial CP is
REXXTOOLS/MVS. If your shop has that s/w installed you
could able to access DB2.
| Is This Answer Correct ? | 0 Yes | 12 No |
How do I Run My Rexx Exec.?
does uni-rexx give me any capabilities designed specifically for the unix environment?
I want to set position for a particular text in a certain position in several of my cics maps.Please provide me with a solution. Ex: If "F1-Help" has to be set to pos(4,27) always in all the maps within a PDS.
how to pass parms to ispf edit macro?
How to run my rexx exec?
Can I cleanly uninstall oorexx?
why is there no os/2 (ecs) port of oorexx?
What are various loop types supported by rexx?
Suppose if there are a set of statements and each has a word “value” in it, if I want to display all these statements so that the word “value” is aligned, then how do I code this in rexx?
can oorexx run ibm object rexx programs?
is there an aix version of oorexx?
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
COBOL 
