Jags,
For debugging ACS code it is always helpful to add WRITE statements to your
DO LOOPS.
So
when (&dsn eq &oedsn)
do
set &dataclas eq 'omvs'
exit
end
Becomes
when (&dsn eq &oedsn)
do
write 'The dsn is &DSN and the class is &dataclas'
set &dataclas eq 'omvs'
write 'The dsn is &DSN and the class is &dataclas after set'
exit
end
Do this for each WHEN DO END process and it will hopefully provide the
answers.
Always use WRITE statements a lot when working with ACS Code. Once it
works, you may wish to leave in a few but not all.
Lizette
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html