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

Use of flat files IMS DB/DC environment


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
MNALAMOLU

New User


Joined: 22 Feb 2007
Posts: 2
Location: USA

PostPosted: Fri Feb 23, 2007 11:28 pm
Reply with quote

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.
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Sat Feb 24, 2007 11:36 am
Reply with quote

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.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Mon Feb 26, 2007 3:10 pm
Reply with quote

In addition to what Devzee wrote: GSAM might be an option. Follow the first link in my signature and search for GSAM.
Back to top
View user's profile Send private message
devidas-patil

New User


Joined: 08 Jan 2007
Posts: 54
Location: pune

PostPosted: Mon Feb 26, 2007 5:34 pm
Reply with quote

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.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Mon Feb 26, 2007 5:53 pm
Reply with quote

Quote:
but if i want to access the record only sequentially then we can use the flat file.


And who told you that icon_question.gif icon_question.gif icon_question.gif And do you believe this guy icon_question.gif And did you verify with the documentation icon_question.gif
Back to top
View user's profile Send private message
MNALAMOLU

New User


Joined: 22 Feb 2007
Posts: 2
Location: USA

PostPosted: Mon Feb 26, 2007 8:55 pm
Reply with quote

Thanks all for the info. icon_biggrin.gif
Back to top
View user's profile Send private message
devidas-patil

New User


Joined: 08 Jan 2007
Posts: 54
Location: pune

PostPosted: Fri Mar 02, 2007 2:33 pm
Reply with quote

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
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Fri Mar 02, 2007 9:14 pm
Reply with quote

In IMS DC online program you cannot access FLAT Files.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Mon Mar 05, 2007 12:20 am
Reply with quote

devidas-patil wrote:
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


Just like Devzee (and myself sometimes more before) said: NO in IMS DC (MPP region) NO flatfiles exept for GSAM (which actually is a sequential database to be processed with DL/I-calls).
Back to top
View user's profile Send private message
devidas-patil

New User


Joined: 08 Jan 2007
Posts: 54
Location: pune

PostPosted: Wed Mar 07, 2007 10:02 am
Reply with quote

thanks
bitneuker
Back to top
View user's profile Send private message
gautam79

New User


Joined: 30 Aug 2006
Posts: 11
Location: India

PostPosted: Fri Mar 09, 2007 4:52 pm
Reply with quote

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
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Fri Mar 09, 2007 8:51 pm
Reply with quote

Hi Gautam,

Just like every database via PSB/PCB. Follow the first link in my signature and search for GSAM. Enjoy exploring icon_wink.gif
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 -> IMS DB/DC

 


Similar Topics
Topic Forum Replies
No new posts Merge files with a key and insert a b... DFSORT/ICETOOL 6
No new posts COBOL program logic for comparisipn o... COBOL Programming 2
No new posts Sort with JOINKEYS using two VB files DFSORT/ICETOOL 1
This topic is locked: you cannot edit posts or make replies. Compare files with duplicates in one ... DFSORT/ICETOOL 11
No new posts Join files where value in one is betw... DFSORT/ICETOOL 6
Search our Forums:

Back to Top