[sqr-users] re-post still need help with #return_status

["the dragon" <ceprn@hotmail.com>]

Hey guys,

I am reposting this because I haven't gotten any replies yet.  Is there some 
disconnect between the #return_status being passed out of the sqr and the 
return code being evaluated by the JCL?  How do I get the JCL to evaluate 
the correct variable if this is the case?

repost below:
I am executing the program on my PC with odbc (without problems, of  
course), and on the mainframe with JCL.  I am returning a status of 8 under 
certain conditions (see code and log file below), which tells the JCL to  
delete the output.  The JCL is thinking the sqr is returning a code of 0  
(everything OK).  Can anyone explain this behaviour, or point me in the  
right direction?


--> code

if $wipe_it_all = 'Y'
  let #return_status = 8           <------------ look here
else
  let #return_status = 0
end-if

--> log file (from mainframe execution)

Exiting  CLOSING PROCESS
start return     = |7.000000|
closing wipe it  = |Y|
return status   = |8.000000|     <-------------- look here too
Exiting  BEGIN PROGRAM
Entering HEADING                         :  proc  c
Exiting  HEADING
Exiting  HEADING
SQR FOR PEOPLESOFT: END OF RUN.
------$$$NEXT$$$ SPFSOUTS REPORT SEPARATOR-- DD: SYSTSPRT

thank you for your assistance in advance

clark 'the dragon' willis


PSA: Salary <> Slavery.  If you earn a salary, your employer is renting your 
services for 40 hours a week, not purchasing your soul.  Your time is the 
only real finite asset that you have, and once used it can never be 
recovered, so don't waste it by giving it away.

"Time is the coin of your life. It is the only coin you have, and only you 
can determine how it will be spent.  Be careful lest you let other people 
spend it for you."

Carl Sandburg
(1878 - 1967)

_________________________________________________________________
MSN 8: Get 6 months for $9.95/month. http://join.msn.com/?page=dept/dialup

_______________________________________________
sqr-users mailing list
sqr-users@sqrug.org
http://www.sqrug.org/mailman/listinfo/sqr-users