On Sat, 4 Aug 2012 13:53:45 GMT "[email protected]" <[email protected]> wrote:
:>I was looking for an easy way to test a Marci Variable on the Prototype Statement. The Symbolic Variable coud be Numeric or Alphbetic. :>Heres a quick macro I put together to expalin this: :> MACRO :> ACLEAR &L=256,&A=VSAMWORK,&I=00 :> LA R15,&L Number of Bytes to clera :> LA R14,&A Target Address to clear :> LR R0,R14 Sourece Address to clear :> LA R1,X'&I' INITIALIZATION CHARACTER :> MVCL R14,R0 Initialize Work Area :>* :> MEXIT :> MEND :>I would Like to Use ne Symbolic &L and be able to test It for a Nemeric :>of Alpha value :>If It Numeric I could generate :> LA R15,&L :>If its Alphabetic I could generate :> LA R15,L'WORKREC :>Obviously I could have defined two Symbolis one for Numeric and One for Alpha. Looking at the TYPE Attributes for Macros I dont see A convient wayof achieveing this. Maybe I dont understand all the Type Attributes. :>Does any one have any suggestions as to use One Symbolic Parameter in a Macro Prototype Statement and be able to generate a different Instruction depending if the Value is Numeric Or Not. Ignoring the fact that all your MVCL will do is set CC=3 and that you do not understand how to set R1 .... Just treat the length as numeric, as equates (which are alpha) may be used. For extra credit, use the length of the field if L= is not specified. -- Binyamin Dissen <[email protected]> http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies.
