Try a technique like that illustrated in this example:

        Macro ,              Defined in the source program
&L      READ   &A,&B,&C
READ_XX OpSyn  READ          Save Wrapper's definition as READ_XX
READ    OpSyn  ,             Nullify this macro's definition
        - - -                ...perform 'front-end' processing
&L      READ   &A1,&B1,&C1   Call system version of READ
        - - -                ...perform 'back-end' processing
READ    OpSyn  READ_XX       Re-establish Wrapper's definition
        MEnd

Reply via email to