Use of flat files IMS DB/DC environment

MNALAMOLU · New User Joined: 22 Feb 2007 Posts: 2 Location: USA

Can we use flat files in a cobol program running in IMS DC environment? In CICS environment, we register the physical datasets in File Control table if we use flat files in the program that contains CICS macros. Is there anything similar to be done in IMS DC too, if the flat files are to be used by the program?

Please look at the following lines and try to help me.

We have written a subroutine which will be invoked from an option on a MFS screen and the subroutine involves a IMS DB call as well. In this prgram, in the Input-Output section, the two flat files are defined as follows:

INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT RJCT-OUT ASSIGN TO 'PEMS1.EMXJW.EMS1MX0D.DIV8REJT'.
SELECT ACPT-OUT ASSIGN TO 'PEMS1.EMXJW.EMS1MX0D.DIV8PPST'.

However, this appears to be invalid. When we compile the code, we get the following error message:

39 IGYGR1235-E The external name field of the assignment-name "PEMS1.EMXJW.EMS1MX0D.DIV8REJT" was invalid. It was processed
as "PEMS10EM".

40 IGYGR1235-E The external name field of the assignment-name "PEMS1.EMXJW.EMS1MX0D.DIV8PPST" was invalid. It was processed
as "PEMS10EM".
-Messages Total Informational Warning Error Severe Terminating
0Printed: 2 2

We have tried adjusting the SELECT statement to put the file name in double quotes, single quotes (no difference) and without quotes (only recognizes the first node of the file PEMS1, stops at the first ?.?, then treats the rest of the file name as error).

We need to know the correct syntax for this assign statement.

Please help.

Devzee · Posted: Sat Feb 24, 2007 11:36 am

In IMS DC online program you cannot access FLAT Files.

Moreover in Mainframe COBOL program you cannot use the physical dataset name in the COBOL SELECT FILE CLAUSE.

Bitneuker · Posted: Mon Feb 26, 2007 3:10 pm

In addition to what Devzee wrote: GSAM might be an option. Follow the first link in my signature and search for GSAM.

devidas-patil · New User Joined: 08 Jan 2007 Posts: 54 Location: pune

Hi
but i heard that we cant use the flat file in online region like cics and the mfs rgion flat file because we cannnot access the flat file randomnly and
dynamically.
but if i want to access the record only sequentially then we can use the flat file.

Bitneuker · Posted: Mon Feb 26, 2007 5:53 pm

MNALAMOLU · New User Joined: 22 Feb 2007 Posts: 2 Location: USA

Thanks all for the info.

devidas-patil · New User Joined: 08 Jan 2007 Posts: 54 Location: pune

Hi Bitneuker,

ijust see the first line of this post.
he wrote
Can we use flat files in a cobol program running in IMS DC environment..

please let me know your input

Devzee · Posted: Fri Mar 02, 2007 9:14 pm

In IMS DC online program you cannot access FLAT Files.

Bitneuker · Posted: Mon Mar 05, 2007 12:20 am

devidas-patil · New User Joined: 08 Jan 2007 Posts: 54 Location: pune

thanks
bitneuker

gautam79 · New User Joined: 30 Aug 2006 Posts: 11 Location: India

Hi Bitneukar,

Can you tell me how does IMS know which physical dataset to use when you are trying to use a GSAM file in IMS DC program?

Thanks

Bitneuker · Posted: Fri Mar 09, 2007 8:51 pm

Hi Gautam,

Just like every database via PSB/PCB. Follow the first link in my signature and search for GSAM. Enjoy exploring