SAS Support Communities

Found this.... Now my code is working   Usage Note 23134: Macro variables created with a CALL SYMPUT or SYMPUTX statement or an INTO clause do not resolve when invoked by the CALL EXECUTE routine     If a CALL EXECUTE routine argument is invoked via a macro invocation or resolves to one, the macro code executes immediately. However, any SAS® statements (such as CALL SYMPUTX and INTO) that are produced by a CALL EXECUTE routine do not execute until after a step boundary has been passed. Because of this, the %NRSTR function has to be used in the CALL EXECUTE syntax. This enables you to reference the variables created by CALL SYMPUTX or INTO in the code generated by CALL EXECUTE. This workaround delays execution of the macro within the DATA step that contains the CALL EXECUTE. The use of %NRSTR in the following example masks the call to the %TEST macro when the argument to the CALL EXECUTE routine is evaluated. This causes the %TEST macro invocation to be pushed onto the input stack. Prior to using %NRSTR, all the non-macro statements generated were pushed to the input stack. %NRSTR delays the execution of the %TEST macro until after the RUN statement for the DATA step containing the CALL EXECUTE statement. Here is an example:   /*sample data set*/ data a; value='Hello'; run; /*sample macro*/ %macro test(val); data _null_; call symput('num',200); run; %if &num eq 200 %then %do; proc print data=&val; run; %end; %mend; /*this will fail*/ data _null_; temp='a'; call execute('%test('||temp||')'); run; /*work-around*/ data _null_; temp='a'; call execute('%nrstr(%test('||temp||'))'); run;   Starting with SAS® 9.3 M2, the new DOSUBL function can be used instead of CALL EXECUTE. Here is an example: ... View more

Got it working! Had to switch from "CATX" to "CATS" to solve the quote issue. Also, the DOLLAR10. was not displaying the whole figure due to extra spaces generated from the "VVALUEX" function.....so I had to add a "COMPRESS". Below is the working code. Thank you @Tom @ballardw @Astounding for your input and help, a total team effort!     DATA _NULL_; /* DLR HIS */ FILE DLRHIS DELIMITER = ','; SET DHISF; C = ','; IF _N_ = 1 THEN PUT "&DHISNAMES"; /*COLUMN HEADER */ LENGTH RECD $3000.; DO i = 1 TO COUNTW("&DHISV"); VRBL = SCAN("&DHISV", i); IF INDEX(VNAMEX(VRBL), 'PAY') > 0 THEN DO; RECD = CATS(RECD,QUOTE(PUT( INPUT(COMPRESS(VVALUEX(VRBL)),DOLLAR10.),DOLLAR10.))||C); END; IF INDEX(VNAMEX(VRBL), 'PAY') = 0 THEN DO; RECD = CATS(RECD, COMPRESS(VVALUEX(VRBL))||C); END; END; PUT RECD;   ... View more