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

Garbage on output file
IBM Mainframe Forums -> SYNCSORT
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
Hervey Martinez

New User


Joined: 12 Jul 2016
Posts: 6
Location: United States
PostPosted: Wed Sep 27, 2017 12:50 am
 Reply with quote
I'm processing the hsm miglog dataset and trying to put something together to process records with errors.

I am looking at the ARC0734I records that have "RC= 20, REASON= 98" and the file in error is in the subsequent record.

I'm merging both of these records into an output file for subsequent processing and getting garbage on the output and have looked at all the parms and not sure how to correct the error;

Input file:

first record:
Code:
ARC0734I ACTION=MIGRATE FRVOL=HSMVOL TOVOL=...... TRACKS=         1 RC=  20, REASON=  98, AGE=  54

second record:

Code:
 DSN=ABC.EXN.ZZ69310.JM69353.RFPQERR.G0575V00


On the output file, I get:

Code:
ABC.EXN.ZZ69310.JM69353.RFPQERR.G0575V00    RC=  20, REASON=  98, AGE=2 54


The "2" on the age should be a blank.

My sort parms:

Code:
SORT FIELDS=COPY
INREC IFTHEN=(WHEN=GROUP,
BEGIN=(2,23,CH,EQ,C'ARC0734I ATCION=MIGRATE',
             AND,70,7,CH,EQ,C'RC=  20'),
             RECORDS=2,PUSH=(52:70,31,79:SEQ=1))
OUTFILE INCLUDE=(79,1,ZD,EQ,2),
             BUILD=(2:7,44,
                        47:52,31)


code' d
Back to top
View user's profile Send private message
RahulG31

Active User


Joined: 20 Dec 2014
Posts: 446
Location: USA
PostPosted: Wed Sep 27, 2017 1:16 am
 Reply with quote
Your problem may be this as you are overwriting position 79 with SEQ
Code:
PUSH=(52:70,31,79:SEQ=1))
Back to top
View user's profile Send private message
magesh23586

Active User


Joined: 06 Jul 2009
Posts: 213
Location: Chennai
PostPosted: Wed Sep 27, 2017 8:17 pm
 Reply with quote
Try below code

Code:

SORT FIELDS=COPY
INREC IFTHEN=(WHEN=GROUP,
BEGIN=(2,23,CH,EQ,C'ARC0734I ATCION=MIGRATE',
             AND,70,7,CH,EQ,C'RC=  20'),
             RECORDS=2,PUSH=(52:70,31,83:SEQ=1))
OUTFILE INCLUDE=(83,1,ZD,EQ,2),
             BUILD=(2:7,44,
                        47:52,31)
Back to top
View user's profile Send private message
Rohit Umarjikar

Global Moderator


Joined: 21 Sep 2010
Posts: 3051
Location: NYC,USA
PostPosted: Wed Sep 27, 2017 9:07 pm
 Reply with quote
magesh23586, Isn't it same as RahulG31?
Back to top
View user's profile Send private message
magesh23586

Active User


Joined: 06 Jul 2009
Posts: 213
Location: Chennai
PostPosted: Wed Sep 27, 2017 9:21 pm
 Reply with quote
Rohit Umarjikar wrote:
magesh23586, Isn't it same as RahulG31?


Yes Rohit,

RahulG31 provided the root cause.

I gave the resolution.
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 -> SYNCSORT

 

Similar Topics
Topic Forum Replies
No new posts FTP VB File from Mainframe retaining ... JCL & VSAM 1
No new posts Extract the file name from another fi... DFSORT/ICETOOL 6
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts SFTP Issue - destination file record ... All Other Mainframe Topics 2
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us