BillyBoyo wrote:deen67, are you processing a file of what was DFHCOMMAREA or are you doing it in CICS?
yes, got the file from DFHCOMMAREA. at the moment i'm using enrico's method. it's works. managed to split the var part but still try to figure out how to use unstring verb. thanks for those who helped me.
just a question for unstring syntax, want to know is't valid or not in cobol. let's say the string contains like this
STRING1 = "CMNOW_REF_NO=1820101010101~CMNOW_CATEGORY=1~CMNOW_NEW_ID=820101010101~CMNOW_OLD_ID=A181814~CMNOW_POLICE_ID=X"
05 Temp-col-val occurs pic x(100) occurs 10 times
perform varying ctr1 until < length of STRING1
add 1 to ctr1
unstring string1 delimited by '~'
will my output like this
temp-col-val(1) = CMNOW_REF_NO=1820101010101
temp=col-val(2) = CMNOW_CATEGORY=1
temp-col-val(3) = CMNOW_NEW_ID=820101010101
and bla bla bla
is there any possible to use 1 unstring command to get output like this from STRING1