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.
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 access data in control blocks such as jobname?
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.
What are various loop types supported by rexx?
Enlist the features of rexx as a programming language.
have you already used rexx - even for limited purposes? Do you need to maintain a high level of productivity during your transition to unix?
how to pass parms to ispf edit macro?
How to find or access the current level of a gdg?
What does the sample library of uni-rexx consist of?
What are the functions available in rexx?
how to access data held on the jes spool?
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?
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.)