Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Retreiving every 5000 records a message shuld be displayed

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
khamarutheen

Active Member


Joined: 23 Aug 2005
Posts: 680
Location: NJ

PostPosted: Thu Dec 01, 2005 12:46 pm    Post subject: Sequential file
Reply with quote

hi frnd,
plz have a check point in every 5000 or at any point and display the message is one way. else using the app program itself u can count the records in a seperate variable and once it reaches 5000 record then display the message. Hope understood. let me know if any.
Back to top
View user's profile Send private message

guptae

Moderator


Joined: 14 Oct 2005
Posts: 1187
Location: Bangalore,India

PostPosted: Thu Dec 01, 2005 1:01 pm    Post subject:
Reply with quote

Hi,

I believe putting checkpoint after 5000 record will be best option & put a display command .Because by it u are commiting till that time..& if some abend occour it will resatrt ur job from the recent checkpoint .So in other words it makes ur code more efficient
Back to top
View user's profile Send private message
suganthyprabha

New User


Joined: 28 Jul 2005
Posts: 58

PostPosted: Thu Dec 01, 2005 2:53 pm    Post subject: Re: sequential file
Reply with quote

Hi Friends,

Can u please tell me How to put that CHECK POINT?

Thanks and Regards,
Suganthy.
Back to top
View user's profile Send private message
radhakrishnan82

Active User


Joined: 31 Mar 2005
Posts: 436
Location: chennai, India

PostPosted: Sat Dec 03, 2005 1:08 pm    Post subject:
Reply with quote

jaganath,
Pls dont post the same query repeatedly.

http://ibmmainframes.com/viewtopic.php?t=7096&highlight=message+displayed
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Sun Dec 04, 2005 3:07 am    Post subject:
Reply with quote

My ques is: displayed where?

If SYSOUT you can try this - just add 1 to cntr and t-cntr after every read of your I/P file then code an IF stmt:
Code:

IF CNTR = 5000
   DISPLAY t-cntr ' RECS READ'
   MOVE ZEROS TO CNTR
END-IF


Chkpt sounds like overkill to me.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Check if any Detail records and extra... V S Amarendra Reddy SYNCSORT 19 Mon May 08, 2017 8:54 pm
No new posts Join giving more records than expected Danielle.Filteau SYNCSORT 2 Thu Mar 09, 2017 3:28 am
No new posts TSO or command line utility to genera... kishpra JCL & VSAM 3 Thu Mar 09, 2017 1:11 am
No new posts Extract set of records matching on ac... bhaskar_kanteti DFSORT/ICETOOL 3 Mon Mar 06, 2017 7:19 am
No new posts Inserting records based on conditions vickey_dw DFSORT/ICETOOL 9 Wed Feb 22, 2017 1:33 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us