Check if a field is empty.

machswap · New User Joined: 19 Apr 2005 Posts: 14

I have a requirement where a file is of lrecl = 1500,
i have to check if a partucular field is empty and if it's empty I have to populate that field by some default value else I have to leave as it is

eg:
fld1 field2 ...........
suppose field2 is empty I have to populate it with some default value, else
if it has some value, leave as it is.

mainframesguru · New User Joined: 24 Jun 2005 Posts: 36 Location: Hyderabad

Hi

This is possible using SORT with INREC.
Please refer following piece of code:

machswap · New User Joined: 19 Apr 2005 Posts: 14

Hi VAmshi,

Thanks a lot for ur help
onoe doubt
Posted: Wed Aug 17, 2005 12:21 pm Post subject:

--------------------------------------------------------------------------------

Hi

INREC FIELDS=(1,9,10,1,
CHANGE=(1,C' ',C'U'),NOMATCH=(10,1),
11,69)
----------------------------------------------------------------

here what is the limit po length of the field that is going to be replaced
eg. u r replacing by 'u' which is of length 1, can the length of the field, be 100. I think the limit is only 64.

In my cazse:
my field that is to be replaced is of length 100 chars.
so,
INREC FIELDS=(1,9,10,1,
CHANGE=(100,C' ',C'default value'),NOMATCH=(10,100),
11,69)

Please let me know ur suggestion and comments
----------------------------------------------------------------

mainframesguru · New User Joined: 24 Jun 2005 Posts: 36 Location: Hyderabad

Hi,

Sorry, I dont have answer for your question,about replacing by 100
characters.

Can you please let me know, how you are going to give 100 characters
default value in 80 Record-Length JCL.

Thanks And Regards
Vamshi
ICC-ISH
Chennai