| View previous topic :: View next topic |
| Author |
Message |
Cogito-Ergo-Sum Advanced
Joined: 15 Dec 2002 Posts: 637 Topics: 43 Location: Bengaluru, INDIA
|
Posted: Fri Oct 21, 2005 7:28 am Post subject: |
|
|
LKED.OBJ should point to the PDS having the object code for the assembler code.
Do you work solo or what ? _________________ ALL opinions are welcome.
Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes. |
|
| Back to top |
|
 |
jinesh18 Beginner
Joined: 21 Oct 2005 Posts: 13 Topics: 1
|
Posted: Fri Oct 21, 2005 7:34 am Post subject: |
|
|
| Code: |
000038 //LKED EXEC PGM=HEWLH096,REGION=0M,
000039 // PARM=('LIST',
000040 // 'RMODE=ANY,AMODE=31',
000041 // '&LNKOPT'),
000042 // COND=(4,LT,COB)
000043 //SYSLIB DD DSN=CEE.SCEELKED,DISP=SHR
000044 //SYSUT1 DD DSN=&SYSUT1,UNIT=TEMPDA,SPACE=(6000,(190,76))
000045 //SYSPRINT DD SYSOUT=&CLASS
000046 //OBJ DD DSN=AVI1T.DMTD.LOAD.CNTL,DISP=SHR
000047 //SYSLMOD DD DSN=&LOADLIB(&MEM),DISP=SHR
000048 //LOADIFC DD DSN=AVI1T.DMTD.LOAD.CNTL,DISP=SHR
000049 //SYSLIN DD DSN=&&LOADSET,DISP=(OLD,PASS)
000050 // DD DDNAME=LKEDIT
000051 //*SYSIN DD DSN=AVI1T.DMTD.SINC,DISP=SHR
000052 //*SYSABEND DD SYSOUT=&CLASS
000053 //DEL1 EXEC PGM=IEFBR14,COND=EVEN
000054 //DD1 DD DSN=&&LOADSET,DISP=(OLD,DELETE)
000055 // PEND
000056 //STEP02 EXEC COBCL2,MEM=AIRMG
000057 //LKED.LKEDIT DD DSN=AVI1T.AIRMG.SINC,DISP=SHR
000058 //LKED.OBJ DD DSN=AVI1T.DMTD.LOAD.CNTL,DISP=SHR |
ok SO NOW LKED.OBJ POINTS TO THE PDS HAVING THE OBJ CODE FOR THE ASSEMBLER CODE... BUT STILL I GET AN ERROR SAYING
**
IEF212I AVIABHCM LKED STEP02 SYSLIN +001 - DATA SET NOT FOUND
IEF272I AVIABHCM LKED STEP02 - STEP WAS NOT EXECUTED.
**
anY IDEA WAT THIS STANDS FOR.
AVI1T.AIRMG.SINC HAS THE FOLLOWING LINES
| Code: | 000100 INCLUDE OBJ(IFCONV)
000200 NAME AIRMG(R) |
iS SOMETHING WRONG WITH THIS - I AM REALLY SORRY TO TAKE UP SO MUCH TIME OF YOURS AND THANKS FOR BEING SO PATIENT. pLEASE GUIDE ME THROUGH THIS , I THINK ITS VERY CLOSE TO BEING THE CORRECT jcl !! |
|
| Back to top |
|
 |
Cogito-Ergo-Sum Advanced
Joined: 15 Dec 2002 Posts: 637 Topics: 43 Location: Bengaluru, INDIA
|
Posted: Fri Oct 21, 2005 7:41 am Post subject: |
|
|
It means, AVI1T.AIRMG.SINC does not exist. _________________ ALL opinions are welcome.
Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes. |
|
| Back to top |
|
 |
jinesh18 Beginner
Joined: 21 Oct 2005 Posts: 13 Topics: 1
|
Posted: Fri Oct 21, 2005 7:50 am Post subject: |
|
|
oOPS...I CORRECTED THE PDS NAME.... NOW I GET A maxcc=8 ..THE ERROR LOG READS LIKE THIS :
| Quote: | IEW2322I 1220 1 INCLUDE OBJ(IFCONV)
IEW2326E 1221 THE FOLLOWING INVALID RECORD HAS BEEN SEEN:
INCLUDE OBJ(IFCONV)
IEW2322I 1220 2 NAME AIRMG(R)
IEW2326E 1221 THE FOLLOWING INVALID RECORD HAS BEEN SEEN:
NAME AIRMG(R) |
SHOULD THE CARD FILE[PS] THAT I HAVE MADE HAVE SOME SPECIFIC LENGTH OR SHLD I START FROM A PARTICULAR COLUMN ?? |
|
| Back to top |
|
 |
jinesh18 Beginner
Joined: 21 Oct 2005 Posts: 13 Topics: 1
|
Posted: Fri Oct 21, 2005 7:59 am Post subject: |
|
|
oK FINE...I STARTED WRINTING FROM THE 2ND COLUMN IN THE CARD FILE (PS ) AND NOW THE ERROR IS DAMN WIERD :
| Code: |
IEW2322I 1220 1 INCLUDE OBJ(IFCONV)
IEW2515W 4731 DIRECTORY ENTRY FOR MEMBER IFCONV IDENTIFIED BY DDNAME OBJ IS NOT
IEW2526E 4703 RECORD IMAGE D8009526 IN MEMBER IFCONV IDENTIFIED BY DDNAME OBJ D
IEW2307E 1032 CURRENT INPUT MODULE NOT INCLUDED BECAUSE OF INVALID DATA.
IEW2322I 1220 2 NAME AIRMG(R)
|
nOW WAT IS THAT SUPP TO MEAN?? |
|
| Back to top |
|
 |
Cogito-Ergo-Sum Advanced
Joined: 15 Dec 2002 Posts: 637 Topics: 43 Location: Bengaluru, INDIA
|
Posted: Fri Oct 21, 2005 8:00 am Post subject: |
|
|
It should begin from column 2, atleast. Showed you that clearly in my second post. _________________ ALL opinions are welcome.
Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes. |
|
| Back to top |
|
 |
jinesh18 Beginner
Joined: 21 Oct 2005 Posts: 13 Topics: 1
|
Posted: Fri Oct 21, 2005 8:02 am Post subject: |
|
|
| soRRY ABT THAT...NOW IT STARTS FROM THE SECOND COLUMN...PLZ READ MY LAST POST - IITS SHOWS A DAMN FRUSTRATING ERROR! |
|
| Back to top |
|
 |
Cogito-Ergo-Sum Advanced
Joined: 15 Dec 2002 Posts: 637 Topics: 43 Location: Bengaluru, INDIA
|
Posted: Fri Oct 21, 2005 8:03 am Post subject: |
|
|
What is the DCB for AVI1T.DMTD.LOAD.CNTL ? _________________ ALL opinions are welcome.
Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes. |
|
| Back to top |
|
 |
jinesh18 Beginner
Joined: 21 Oct 2005 Posts: 13 Topics: 1
|
Posted: Fri Oct 21, 2005 8:27 am Post subject: |
|
|
| Quote: | Record format . . . : U Used extents . . . : 2
Record length . . . : 80
Block size . . . . : 27920
1st extent cylinders: 1
Secondary cylinders : 5
Data set name type : PDS |
THIS IS THE INFORMATION I COULD FIND ABT AVI1T.DMTD.LOAD.CNTL' PDS
CAN U TELL ME HOW TO FIND THE dcb |
|
| Back to top |
|
 |
Cogito-Ergo-Sum Advanced
Joined: 15 Dec 2002 Posts: 637 Topics: 43 Location: Bengaluru, INDIA
|
Posted: Fri Oct 21, 2005 8:48 am Post subject: |
|
|
Why is it record format U ???
I did guess (looking at the error messages from link step) that you are passing a load module PDS instead of the Object code PDS. An Object code PDS would be having RECFM=FB.
Now, I will guess that, the compile step for Assembler program creates object code in a temporary dataset. In which case, you do not have a means of passing the object code of Assembler to the link step in COBCL2. _________________ ALL opinions are welcome.
Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes. |
|
| Back to top |
|
 |
jinesh18 Beginner
Joined: 21 Oct 2005 Posts: 13 Topics: 1
|
Posted: Fri Oct 21, 2005 9:50 am Post subject: |
|
|
U r rite...Thanks a lot for all the help...can i get back to u on monday? meanwhile i will try and figure out a workaround to this problem..
Thanks once again for all the help !
8) 8) |
|
| Back to top |
|
 |
Cogito-Ergo-Sum Advanced
Joined: 15 Dec 2002 Posts: 637 Topics: 43 Location: Bengaluru, INDIA
|
Posted: Fri Oct 21, 2005 10:59 am Post subject: |
|
|
| Quote: | | can i get back to u on monday? |
Why??
I have already explained what needs to be done. You should be able to build on this yourself.
You have not tried anything on your own. You used 'PLZ REPLY THIS IS VERY URGENT FOR ME.' Then, you kept posting with uppercase text.
You have violated most of the forum rules. You asked questions that could have been answered by any of your colleagues; levae alone a search. What makes you think you should get back to me? _________________ ALL opinions are welcome.
Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes. |
|
| Back to top |
|
 |
|
|
|