IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

In which program the FILE CONTROL will be defined


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Poha Eater

New User


Joined: 31 Aug 2016
Posts: 74
Location: India

PostPosted: Thu Jun 28, 2018 9:02 pm
Reply with quote

Hi All,

I wanted your inputs for a certain situation. There is a program 'PGMA' which can either call 'PGM1' or 'PGM2' based on certain condition.

There is a PS file, FILE1, which is being written when it is going in PGM1 or PGM2 and the records will keep appending until the termination of the program. So in which program i need to define the FILE CONTROL for the file definition of FILE1 when the program is being compiled using DYNAM option.

1. In PGMA only ?
2. In PGM1 and PGM2 ?
3. In PGMA, PGM1 and PGM2 ?

In case of NODYNAM compiler option i think we need to define the FILE CONTROL only in PGMA in above scenario. Please correct me if i am mistaken.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8569
Location: Dubuque, Iowa, USA

PostPosted: Thu Jun 28, 2018 9:59 pm
Reply with quote

Have you looked at the EXTERNAL file example starting on page 518 of the Enterprise COBOL V6R2 Programming Guide manual? If not, you should look at it. The FILE-CONTROL, FILE SECTION, and WORKING-STORAGE file status variable are repeated in every program referencing the file via use of a copy book to standardize their access.
Quote:
In case of NODYNAM compiler option i think we need to define the FILE CONTROL only in PGMA in above scenario. Please correct me if i am mistaken.
So according to the manual, you are mistaken -- FILE-CONTROL must be present in PGMA, PGM1, PGM2 (along with the FILE SECTION and the WORKING-STORAGE file status variable). Note that none of the manuals discuss EXTERNAL in reference to the NODYNAM compile option, so it would appear there is no relationship between NODYNAM and EXTERNAL files.
Back to top
View user's profile Send private message
Poha Eater

New User


Joined: 31 Aug 2016
Posts: 74
Location: India

PostPosted: Fri Jun 29, 2018 2:20 pm
Reply with quote

Hi Robert,

Thanks for pointing out the exact topic in the Manual and sharing the answer. Really thanks for the guidance. It provides the required information.


Thanks Rohit for your reply.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Converting a file from PD to display ... SYNCSORT 4
No new posts Record count of RECFM=U tape file DFSORT/ICETOOL 17
This topic is locked: you cannot edit posts or make replies. Write Character to Hexadecimal file w... COBOL Programming 8
No new posts Checking the total counts inside a re... JCL & VSAM 5
No new posts File-aid batch how to repeat a line... Compuware & Other Tools 2
Search our Forums:

Back to Top