Interested to Buy Any Domain ? << Click Here >> for more details...
is it possible to pass an SQL query inside a jcl which is
inside a cobol program?
- 5 Answers
- 14141 Views
- CTS, I also Faced
- E-Mail Answers
Answer Posted / sowjanya
take one file in cobol and write jcl code in it.
let say file1 is the file using in cobol program
working storage section.
01 ws-rec.
05 ws-jobcard pic x(80) value '//jobname job etc'
05 ws-joblib pic x(80) value '//step1 etc'
05 ws-step pic x(80) value'//ddname dd dsn=inpfile1 etc'
05 ws-step pic x(80) value '//ddname1 dd dsn=outfile1
etc'
_
file section.
select file1 assign to intr1.
fd file1.
01 file-rec pic x(200).
procedure division.
open output file1.
write file-rec from ws-rec.
and submit this program by using ddcard -
//intr1 dd SYSPRINT=(*,INTRDR) in jcl.
and write SQl code in inpfile1 file,query result will be
displayed in oufile1.
| Is This Answer Correct ? | 3 Yes | 1 No |
Post New Answer View All Answers
What is rmode(any) ?
What are the different data types in cobol?
IF I mention stop run in CICS what happens?
I have File 1 occurs 5 times with Employee-ID,Employee-Name,Employee-Dept (EEE and MECH). I have File 2 occurs 10 times with Employee-ID,Employee-Name,Employee-Dept (EEE,CIVIL,CHEMICAL and MECH). In FIle 1 and FIle 2 , for matching Employee-DEPT (Only MECH) , we need to move entire records from file1 to file 2. We should not use 2D array. Your help is needed here.
HOw can I get the negative sign while deduct high value from low value
input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?
how we sort two input files based on a common column and giving one o/p file please send me the coding logic?
In which area will you utilize 88 level items in cobol?
Define cobol?
How you can read the file from bottom?
A table has two indexes defined. Which one will be used by the SEARCH?
How do define dynamic array in cobol. how do you define single dimensional array and multidimensional array in your cobol?
What are the rules of the move verb?
How to remove 2 duplicate records and copy only one using job control language?
Explain about different table spaces.
