Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Update the trailer count in a VB File

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
krishna226

New User


Joined: 29 Jan 2014
Posts: 2
Location: India

PostPosted: Wed Apr 09, 2014 7:03 pm    Post subject: Update the trailer count in a VB File
Reply with quote

krishna226, you are supposed to ask a question.
Back to top
View user's profile Send private message

krishna226

New User


Joined: 29 Jan 2014
Posts: 2
Location: India

PostPosted: Wed Apr 09, 2014 7:17 pm    Post subject: Reply to: Update the trailer count in a VB File
Reply with quote

Hi All,

I have requirement to update the trailer count in a VB file using syncsort of length 3000.

In the file there are different record types as '080', '030', '910', '999' starting from 42nd position in the file. '999' is the trailer record. I need to count the records based on record type and need to update the counts in the trailer record.

The '080' record count shoul be updated in the trailer record from 68th postion having 8 bytes which is a PD format.

For '030' count shoul be updated from 76 position having 8 bytes.

Input File:
Code:
----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
***************************** Top of Data ******************************
03007468      1A 7171091020999     àÍ<030  ð   1403130M0000002000000
03007468      1A 7171091020999     àÍ<910  ð    ­0000000   BOC     
03007468      1A 7171091020999     àÍ<080  ð    Þ13000011      010 
03007468      1A 7171091020999     àÍ<080  ð    Þ13000012      16* 
03007468      1A 7171091020999     àÍ<080  ð    Þ14000021      010 
03007468      1A 7171091021999     àÍ*030  ð   1403130M0000002000000
03007468      1A 7171091021999     àÍ*910  ð    ­0000000   BOC     
03007468      1A 7171091021999     àÍ*080  ð    509000891BOCH     
03007468      1A 7171091021999     àÍ*080  ð    509000892BOCF     
03007468      1A 9999999999999999  á @999  ð     
Code'd, Please use Code tags while posting code/data

can someone help me in getting this requirement to be done
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am
No new posts Update table without cursor Ron Klop DB2 3 Wed Oct 11, 2017 1:06 pm
No new posts Execute JCL step based on the content... sprikitik JCL & VSAM 2 Tue Oct 03, 2017 10:03 am
This topic is locked: you cannot edit posts or make replies. PS file data should be passed as symb... d_sarlie JCL & VSAM 15 Tue Oct 03, 2017 5:18 am
No new posts Garbage on output file Hervey Martinez SYNCSORT 4 Wed Sep 27, 2017 12:50 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us