MACRO TAB CONV: Unterschied zwischen den Versionen

Aktuelle Version vom 28. Oktober 2014, 14:30 Uhr

Workflow Graph	Module Type
	User module from Phase-III Macro System based on Fractal System Architecture.

Source

Start Definition with Parameters and Defaults

%MACRO TAB_CONV(dsn=,row=,col=,stats=,num=,stat=Y,pvalue=,nulltxt=N) / store des="Create Table from N continuous SuperRows" ;

Declares and other Preparations

%LOCAL n_lst v_lst n row_n name;
%LET name=TAB_CONV;
  proc datasets nolist lib=work; delete %SUBSTR(&TAB_NAME,1,3)&NUM%SUBSTR(&TAB_NAME,5,4); run; quit;
%CHK_LIST(list=&ROW);

Loop for List Processing

%DO n=1 %TO &N_LST;
  %LET row_n=%SCAN(&ROW,&N);
  %IF &TAB_NAME eq %THEN %DO;
    %BLK_CONV(dsn=&DSN,row=&ROW_N,col=&COL,stats=&STATS,num=%EVAL(&NUM+&N-1),stat=&STAT,nulltxt=&NULLTXT);
  %END;
  %IF &TAB_NAME ne %THEN %DO;
    %BLK_CONV(dsn=&DSN,row=&ROW_N,col=&COL,stats=&STATS,num=0,stat=&STAT,pvalue=&PVALUE,nulltxt=&NULLTXT);
    proc append base=%SUBSTR(&TAB_NAME,1,3)&NUM%SUBSTR(&TAB_NAME,5,4) data=%SUBSTR(&TAB_NAME,1,3)0%SUBSTR(&TAB_NAME,5,4); run;
    proc datasets nolist lib=work; delete %SUBSTR(&TAB_NAME,1,3)0%SUBSTR(&TAB_NAME,5,4); run; quit;
  %END;
%END;
%GEN_MAIL(name=&NAME);

Close Definition

%MEND TAB_CONV;

@@ Zeile 1: / Zeile 1: @@
 [[Kategorie:zazy]]
+{{SeitenNavigation1
+|links=xx_left.png
+|rechts=xx_right.png
+|hoch=FRAKTAL_MACRO_ARCHITECTURE.png
+|zurück=MACRO BLK CONV
+|vorwärts=MACRO TWO CATV
+|übersicht=User Modules (from Phase-III Macro System)
+}}
-[[Datei:FRAKTAL_MACRO_ARCHITECTURE.png|200px|thumb]]
+{| class="wikitable"
+! Workflow Graph
+! Module Type
+|-
+| [[Datei:MACRO_TAB_CONV.png|thumb|100px]]
+| '''User module''' from [[Phase-III Macro System]] based on '''''[[Fraktal SAS Programming|Fractal System Architecture]]'''''.
+|}
-== Type ==
+== Source ==
-'''User module''' from [[Phase-III Macro System]] based on '''''[[Fraktal SAS Programming|Fractal System Architecture]]'''''.
+;Start Definition with Parameters and Defaults
-== Workflow ==
+ %MACRO TAB_CONV(dsn=,row=,col=,stats=,num=,stat=Y,pvalue=,nulltxt=N) / store des="Create Table from N continuous SuperRows" ;
-[[Datei:MACRO_TAB_CONV.png]]
+;Declares and other Preparations
+ %LOCAL n_lst v_lst n row_n name;
+ %LET name=TAB_CONV;
+   proc datasets nolist lib=work; delete %SUBSTR(&TAB_NAME,1,3)&NUM%SUBSTR(&TAB_NAME,5,4); run; quit;
+ %CHK_LIST(list=&ROW);
+;Loop for List Processing
+ %DO n=1 %TO &N_LST;
+   %LET row_n=%SCAN(&ROW,&N);
+   %IF &TAB_NAME eq %THEN %DO;
+     %BLK_CONV(dsn=&DSN,row=&ROW_N,col=&COL,stats=&STATS,num=%EVAL(&NUM+&N-1),stat=&STAT,nulltxt=&NULLTXT);
+   %END;
+   %IF &TAB_NAME ne %THEN %DO;
+     %BLK_CONV(dsn=&DSN,row=&ROW_N,col=&COL,stats=&STATS,num=0,stat=&STAT,pvalue=&PVALUE,nulltxt=&NULLTXT);
+     proc append base=%SUBSTR(&TAB_NAME,1,3)&NUM%SUBSTR(&TAB_NAME,5,4) data=%SUBSTR(&TAB_NAME,1,3)0%SUBSTR(&TAB_NAME,5,4); run;
+     proc datasets nolist lib=work; delete %SUBSTR(&TAB_NAME,1,3)0%SUBSTR(&TAB_NAME,5,4); run; quit;
+   %END;
+ %END;
+ %GEN_MAIL(name=&NAME);
+;Close Definition
+ %MEND TAB_CONV;

MACRO TAB CONV: Unterschied zwischen den Versionen

Aktuelle Version vom 28. Oktober 2014, 14:30 Uhr

Source

Navigationsmenü

Suche