> If you could post your current code, that could be helpful.

Here is a snipped that might help to illustrate what I need:

         J     WTX&K&SYSNDX.A
WTX&K&SYSNDX WTO '&IDB&WTOTEXT(&K)',
               ROUTCDE=&ROUTCDE,DESC=&DESC,MF=L
WTX&K&SYSNDX.L EQU *-WTX&K&SYSNDX
WTX&K&SYSNDX.A  DS 0H
         MVC   &WTOP.(WTX&K&SYSNDX.L),WTX&K&SYSNDX


My macro generates code to move the varying length code generated by the WTO. 
The symbol generated by WTX&K&SYSNDX.L represents this value. I'd need this 
value for the macro code to substract it from the lenght value indicated by a 
macro invocation parm (WORKL= in my orignal post) and check it does notbecome 
negative.



--Peter Hunkeler

Reply via email to