rc = get_current_line()
if pos(',&',line) <> 0 then
do
/* Found what is probably a parm for the checkpoint ID.
Remove it */
parse var line first_part ',&' ckptid ',' last_part
old_str = ',&'ckptid; new_str = ','
"change '"old_str"'" "'"new_str"' .zcsr .zcsr"
end
"find '"bmp_string"' next"
Or as you figured you can use Picture string to do the change. _________________ Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
Joined: 26 Nov 2002 Posts: 12358 Topics: 75 Location: San Jose
Posted: Tue Sep 12, 2017 10:56 am Post subject:
misi01,
Please DO NOT ever link that moron's site. You are free to search for answers where ever you like but never link that site again. Failing to comply would result in deleting your id
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