View previous topic :: View next topic
|
Author |
Message |
RAJA-RAJA
New User
Joined: 11 Sep 2009 Posts: 10 Location: chennai
|
|
|
|
Iam getting file status - 35 on opening the PS file in input mode. The DD name in the JCL is also correct. Please advice on what may be the cause.
Thanks.
JCL : (1 record is present in input file)
//DD010 DD DSN=Hxxx.B.GExxx.INPUT.NEW.B,
// DISP=SHR
pgm:
SELECT DEFA-IN ASSIGN TO UT-S-DD010
FILE STATUS IS WS-DEFA-IN-STATUS.
::
FD DEFA-IN
RECORDING F
LABEL RECORD STANDARD
RECORDING MODE F.
BLOCK 0.
01 GEDKDEFA-REC.
05 DEFA-NR-DOSS-077DOSS PIC X(20).
05 DEFA-NR-SDOS-077SDOS PIC X(20).
05 DEFA-CO-CLASS-077SDOS PIC X(02).
05 DEFA-NR-DEBIT-ACCOUNT PIC X(14).
05 FILLER PIC X(24). |
|
Back to top |
|
|
Pravesh
New User
Joined: 30 Jul 2009 Posts: 32 Location: Gurgaon
|
|
|
|
how come DD name more then 8 bytes UT-S-DD010 . It can be max of 8 in length(in JCL and pgm).
Thanks,
Pravesh |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Pravesh wrote: |
how come DD name more then 8 bytes UT-S-DD010 . It can be max of 8 in length(in JCL and pgm). |
OK, so I haven't played COBOL for over 30 years, but doesn't the JCL DD name to be allocated start after UT-S-, so is restricted to 8 bytes from that point onward. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Expat is corect - UT-S -> is "an old way of coding in cobol", wehre in you tell the system what kind of device the program is going to deal with. So yes, as far as, DD-name in COBOL progrm is concerned - that's correct.
I just hope the file exist - status-code 35 asks for this. Also, your choice of DD-name is not that user-friendly -- are you sure, you've not used alphabet-O instead of number-0 in DD statement or vice-versa? |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
you receive a 35 on open when- you coded your program and jcl accurately and the physical file does not exist
- you have not coded your program and jcl accurately and the file exists
dd name is not same in jcl and pgm
dsn is inaccurate
file does not exist |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Remove the FILE STATUS and note which error/abend happens. . . |
|
Back to top |
|
|
icemanroh
New User
Joined: 23 Aug 2008 Posts: 25 Location: Mumbai
|
|
|
|
Code: |
FD DEFA-IN
RECORDING F
LABEL RECORD STANDARD
RECORDING MODE F. |
Why have u declared Recording mode twice? |
|
Back to top |
|
|
|