|
|
| Author |
Message |
batusai
New User
Joined: 21 Aug 2008
Posts: 14
Location: lima peru
|
|
|
|
| Code: |
000001 //LKED EXEC PGM=IEWL,PARM='LIST,XREF,LET,MAP'
000002 // COND=(5,LT,COBOL),REGION=512K
000003 //SYSLIN DD DSNAME=USERID.CLASS.OBJ,DISP=(OLD,DELETE)
000004 // DD DDNAME=SYSIN
000005 //SYSLMOD DD DSNAME=USERID.CLASS.LOAD(TAND3997),DISP=(,PASS),
000006 // UNIT=SYSDA,SPACE=(CYL,(1,1,1))
000007 //SYSUDUMP DD SYSOUT=*
000008 //SYSPRINT DD SYSOUT=*
000009 //SYSIN DD DUMMY
000010 /*
|
| Code: |
IEFC605I UNIDENTIFIED OPERATION FIELD |
|
|
| Back to top |
|
 |
References
|
|
 |
batusai
New User
Joined: 21 Aug 2008
Posts: 14
Location: lima peru
|
|
|
|
thanks all four your help
I excecute
| Code: |
000001 //LKED EXEC PGM=IEWL,PARM='LIST,XREF,LET,MAP',
000002 // REGION=512K
000003 //SYSLIN DD DSNAME=USERID.CLASS.OBJ,DISP=(OLD,DELETE)
000004 // DD DDNAME=SYSIN
000005 //SYSLMOD DD DSNAME=USERID.CLASS.LOAD(TAND3997),DISP=(,PASS),
000006 // UNIT=SYSDA,SPACE=(CYL,(1,1,1))
000007 //SYSUDUMP DD SYSOUT=*
000008 //SYSPRINT DD SYSOUT=*
000009 //SYSIN DD DUMMY
000010 /* |
and yes,, correct , not me reponse error the sintaxis
but zos response me
| Code: |
11.05.36 JOB00057 ---- FRIDAY, 22 AUG 2008 ----
11.05.36 JOB00057 IRR010I USERID IBMUSER IS ASSIGNED TO THIS JOB.
11.05.36 JOB00057 ICH70001I IBMUSER LAST ACCESS AT 11:04:52 ON FRIDAY, AUGUST
11.05.36 JOB00057 $HASP373 IBMUSERL STARTED - INIT 1 - CLASS A - SYS SYS1
11.05.36 JOB00057 IEF403I IBMUSERL - STARTED - TIME=11.05.36
11.05.37 JOB00057 IEF404I IBMUSERL - ENDED - TIME=11.05.37
11.05.37 JOB00057 $HASP395 IBMUSERL ENDED
------ JES2 JOB STATISTICS ------
22 AUG 2008 JOB EXECUTION DATE
14 CARDS READ
86 SYSOUT PRINT RECORDS
0 SYSOUT PUNCH RECORDS
4 SYSOUT SPOOL KBYTES
0.01 MINUTES EXECUTION TIME
******************************** BOTTOM OF DATA ********************************
z/OS V1 R6 BINDER 11:05:36 FRIDAY AUGUST 22, 2008
BATCH EMULATOR JOB(IBMUSERL) STEP(LKED ) PGM= IEWL
IEW2278I B352 INVOCATION PARAMETERS - LIST,XREF,LET,MAP
IEW2724S D909 SYNCHRONOUS I/O ERROR OCCURRED FOR DDNAME SYSLIN AND DATA SET NAME
FOLLOW.
IEW2718S D90A IBMUSERL,LKED ,0A82,D,SYSLIN ,GET ,WRNG.LEN.RECORD,000005140
IEW2230S 0414 MODULE HAS NO TEXT.
IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED.
IEW2008I 0F03 PROCESSING COMPLETED. RETURN CODE = 12.
----------------------
MESSAGE SUMMARY REPORT
----------------------
TERMINAL MESSAGES (SEVERITY = 16)
NONE
SEVERE MESSAGES (SEVERITY = 12)
2230 2677 2718 2724
ERROR MESSAGES (SEVERITY = 08)
NONE
WARNING MESSAGES (SEVERITY = 04)
NONE
INFORMATIONAL MESSAGES (SEVERITY = 00)
2008 2278
**** END OF MESSAGE SUMMARY REPORT ****
|
|
|
| Back to top |
|
|
Robert Sample
Senior Member
Joined: 06 Jun 2008
Posts: 963
Location: Atlanta, GA
|
|
|
|
| The wrong length record probably means you defined the OBJ wrong -- set it to RECFM=FB,LRECL=80. The module has no text means the binder couldn't find the object deck -- probably why the first problem occurred, too. Redefine the OBJ file and rerun the compile AND the binder steps together to get the load module. No valid entry point could be found because there was no object deck. |
|
| Back to top |
|
|
dick scherrer
Global Moderator
Joined: 23 Nov 2006
Posts: 8771
Location: 221 B Baker St
|
|
|
|
Hello batusai,
Are there other programmers who work with cobol on the same computer you are using?
If so, there should be standard compile&link jcl on the system and i would recommend (strongly) that you use the system standard compile jcl rather than some custom jcl.
If not, i'd suggest you talk with your system programmers to make sure that what you set up is proper for the system you are using. |
|
| Back to top |
|
|
batusai
New User
Joined: 21 Aug 2008
Posts: 14
Location: lima peru
|
|
|
|
you're right,
this zoxs 1.6 installed on my personal computer, I want to learn cobol and JCL,
I just want to make a hello world, using cobol batch + JCL
that's all
thanks for your help
to all |
|
| Back to top |
|
|
dick scherrer
Global Moderator
Joined: 23 Nov 2006
Posts: 8771
Location: 221 B Baker St
|
|
| Back to top |
|
|
batusai
New User
Joined: 21 Aug 2008
Posts: 14
Location: lima peru
|
|
|
|
Hi
yes I configured zos 1.6 , on my personal computer
but I not how link-edit or bind the coboll program and call with jcl
 |
|
| Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007
Posts: 1199
Location: At my desk
|
|
|
|
| batusai wrote: |
yes I configured zos 1.6 , on my personal computer
|
That sounds (slightly) illegal to me???? |
|
| Back to top |
|
|
batusai
New User
Joined: 21 Aug 2008
Posts: 14
Location: lima peru
|
|
|
|
sorry, the client is instaled on my pc,
I do not read well, the question
| Quote: |
Well, that surely makes a difference
Are you running Hercules on your pc?
You might find something useful here: |
|
|
| Back to top |
|
|
dick scherrer
Global Moderator
Joined: 23 Nov 2006
Posts: 8771
Location: 221 B Baker St
|
|
|
|
Hello,
You need to allocate a "permanent" load library to store the executable created by the "bind" (USERID.CLASS.LOAD).
Find another load library on your system and "clone" it so it will have the proper attributes for a loadlib. |
|
| Back to top |
|
|
batusai
New User
Joined: 21 Aug 2008
Posts: 14
Location: lima peru
|
|
|
|
Hi Robert Sample
| Quote: |
et it to RECFM=FB,LRECL=80.
|
I write this
| Code: |
//LKED EXEC PGM=IEWL,PARM='LIST,XREF,LET,MAP'
// COND=(5,LT,COBOL),REGION=512K
//SYSLIN DD DSNAME=USERID.CLASS.OBJ,DISP=(OLD,DELETE)
// DD DDNAME=SYSIN
//SYSLMOD DD DSNAME=USERID.CLASS.LOAD(TAND3997),DISP=(,PASS),
// UNIT=SYSDA,SPACE=(CYL,(1,1,1)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
//SYSUDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
/* |
|
|
| Back to top |
|
|
batusai
New User
Joined: 21 Aug 2008
Posts: 14
Location: lima peru
|
|
|
|
| Code: |
| IEFC605I UNIDENTIFIED OPERATION FIELD |
|
|
| Back to top |
|
|
enrico-sorichetti
Global Moderator
Joined: 14 Mar 2007
Posts: 3183
Location: italy
|
|
|
|
| Quote: |
| this zoxs 1.6 installed on my personal computer, I want to learn cobol and JCL, |
good to hear that You have a license to run zOs on Your pc...
just curious how did You get it |
|
| Back to top |
|
|
arcvns
Senior Member
Joined: 17 Oct 2006
Posts: 806
Location: Chennai, India
|
|
|
|
batusai,
Put a continuation comma after the first line like this.
| Code: |
| //LKED EXEC PGM=IEWL,PARM='LIST,XREF,LET,MAP', |
Thanks,
Arun |
|
| Back to top |
|
|
dick scherrer
Global Moderator
Joined: 23 Nov 2006
Posts: 8771
Location: 221 B Baker St
|
|
|
|
Hello,
I believe you may also have problems with the way your USERID.CLASS.LOAD is defined. Suggest you allocate a permanent dataset with these attributes:
| Code: |
Organization . . . : PO
Record format . . . : U
Record length . . . : 0
Block size . . . . : 32760
|
|
|
| Back to top |
|
|
|
|
|
