Cobol - Partitioned Dataset

Author

Partitioned Dataset

sameer

2004-08-16, 3:55 am

Hi,

Can you tell me whether we can access PDS member in Cobol program.
If we can, what should be DD statement in JCL & File definition in
Cobol program.

Thanks
Sameer.

james8049

2004-08-17, 8:58 am

Easy the JCL statement should look like this:--
//YOURDD DD DISP=SHR,DSN=HLQ.LIB.LOAD(MEMBER)

And your FD should look like this:-
File-Control.
Select YOURFD Assign To YOURDD.

Data Division.
File Section.
FD YOURFD
Recording Mode Is F
Block Contains 0 Records
Record Contains 80 characters.
01 P-line Pic X(80).

Or:-
FD YOURFD
Recording Mode Is V
Block Contains 0 Records
Record Contains 255 characters.
01 P-line Pic X(255).

Depending on the record length defined and whether or not it is fixed or variable blocks. (Hint ISPF option 3.2)

Arnold Trembley

2004-08-18, 3:55 pm

sameer wrote:
> Hi,
>
> Can you tell me whether we can access PDS member in Cobol program.
> If we can, what should be DD statement in JCL & File definition in
> Cobol program.
>
> Thanks
> Sameer.

//SYS001 DD DSN=SOME.PDS.NAME(MEMBER),DISP=SHR

SELECT SYS001-INPUT-FILE ASSIGN TO SYS001.

FD SYS001-INPUT-FILE
BLOCK CONTAINS 0 RECORDS.

01 SYS001-INPUT-RECORD PIC X(80).

What are you really trying to do? The example above will work, but
doesn't cover all the possible cases.

--
http://arnold.trembley.home.att.net/

docdwarf@panix.com

2004-08-19, 3:55 am

In article <bf573a0d.0408130927.32ec065c@posting.google.com>,
sameer <sameer_bon@rediffmail.com> wrote:
>Hi,
>
> Can you tell me whether we can access PDS member in Cobol program.
>If we can, what should be DD statement in JCL & File definition in
>Cobol program.

Please do your own homework.

DD

Sponsored Links