MAINFRAME - TIP OF THE DAY :
When you specified V for RECFM parameter, LRECL value is largest record in the file plus 4 bytes. These four bytes contain the actual length of each variable length record in the file
Programmers Voted for below topics. Please Vote for good Posts.
Thank You! for your feedback. Connecting to the server. Please Wait...
Posted: Thu Aug 04, 2016 12:23 am Post subject: Syncsort - scanning a record for a string of 16 digits
First time posting. I have searched and searched and cannot figure out a way to scan a record for a string of 16 numerics that may be found at any position in the record. I need to mask the numbers with X's. Can you assist?
Hi - I thought I'd posted a reply to this but I guess I didn't. Sorry for the late follow-up.... The other issue that I didn't explain is that I won't ever know what the string of 16-digits will be. I might know the first 1 or 2 digits, but for the most part, I'm searching for a string of Any set of 16-digits. I couldn't find any masking or wildcard options.
Hi & thanks. I realize an image would probably explain this better but let me try again.
Input file Record 1 has AAA1212121212121212BBB in position 46 and I want to change the 16 digit number that starts in position 49 to be 9898989898989898 so the output record will have AAA9898989898989898BBB starting in position 46.
The problem is, this string of numbers could be Any number and it could begin in any position: 49, 1, 82, 745, or anywhere in the record.
1) How do I find an 16-digit number that is 'somewhere' in the record
2) How do I then change that number to be any other value (that remains 16 in length).
PS the new number (98..98 in this case) can be hard-coded, or it can be a string of X's or anything like that. The "TO" number is not my concern. [/url][/list][/list][/code]
FINDREP is a new option that allows you to do various types of find and replace
operations on your records. FINDREP makes it easy to replace character or
hexadecimal input constants anywhere in your records with character, hexadecimal
or null output constants. For input and output constants of different lengths, bytes
after the replaced constants will be shifted left or right, as appropriate. For
fixed-length records, blanks will be filled in on the right as needed. For
variable-length records, the record length will be changed as needed.
FINDREP can be used in an INREC, OUTREC or OUTFIL statement, or in an
IFTHEN clause, in the same way BUILD and OVERLAY can be used.
But yours is syncsort, you may need to refer your manual for syntax and detail
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
Cobol Tutorial This cobol tutorial covers most of the important topics like STRING, UNSTRING, COMP, COMP-3.....
DB2 Tutorial DB2 Tutorial focuses on DB2 COBOL Programming. Explains in simple language. Some Chapters are locked, Forum members have free access to these chapters
CICS Tutorial This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming...
JCL Tutorial This is most popular JCL tutorial from mainframegurukul. It does contain important jcl ....
SORT Tutorial This Tutorial covers all important aspects of DFSORT. Has more SORT examples