MACRO BLK CATV: Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
K |
K |
||
| (4 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt) | |||
| Zeile 8: | Zeile 8: | ||
|übersicht=User Modules (from Phase-III Macro System) | |übersicht=User Modules (from Phase-III Macro System) | ||
}} | }} | ||
| − | |||
| − | |||
== Type == | == Type == | ||
| Zeile 15: | Zeile 13: | ||
'''User module''' from [[Phase-III Macro System]] based on '''''[[Fraktal SAS Programming|Fractal System Architecture]]'''''. | '''User module''' from [[Phase-III Macro System]] based on '''''[[Fraktal SAS Programming|Fractal System Architecture]]'''''. | ||
| − | == Workflow | + | == Workflow / Source == |
| − | |||
| − | |||
| − | |||
| − | |||
| − | %MACRO BLK_CATV(dsn=,row=,rev=N,col=,total=T,head=Y,indent=,num=,stat=Y,space=2,struct=,condense=,missline=) / store | + | {| class="wikitable" |
| + | |- | ||
| + | | style="width:35%;"|[[Datei:MACRO_BLK_CATV.png|thumb|center|Workflow]] | ||
| + | | | ||
| + | %MACRO BLK_CATV(dsn=,row=,rev=N,col=,total=T,head=Y,indent=,num=,stat=Y,space=2,struct=,condense=,missline=) / store; | ||
%LOCAL name; | %LOCAL name; | ||
| Zeile 41: | Zeile 39: | ||
%MEND BLK_CATV; | %MEND BLK_CATV; | ||
| + | |} | ||
Aktuelle Version vom 6. März 2014, 12:34 Uhr
|
|
|
|
Type
User module from Phase-III Macro System based on Fractal System Architecture.
Workflow / Source
%MACRO BLK_CATV(dsn=,row=,rev=N,col=,total=T,head=Y,indent=,num=,stat=Y,space=2,struct=,condense=,missline=) / store; %LOCAL name;
%LET name=BLK_CATV;
%IF &STRUCT eq %THEN %LET struct=&DSN; ;
%IF &NUM gt 1 and %UPCASE(&TOTAL) eq T %THEN %LET total=n; ;
%TOP_FILT(dsn=&DSN,grp=&ROW,by=&COL,grplvl=&NUM,var=,condense=&CONDENSE);
%TOP_FREQ(dsn=top_filt,struct=&STRUCT,grp=&ROW,by=&COL);
%TOP_OUTC(dsn=top_freq,head=&HEAD,total=&TOTAL,stat=&STAT,indent=&INDENT,grp=&ROW,rev=&REV,use=,by=&COL,missline=&MISSLINE);
%IF &TAB_NAME ne %THEN %DO;
data %SUBSTR(&TAB_NAME,1,3)&NUM%SUBSTR(&TAB_NAME,5,4) ;
set
%IF &SPACE eq 1 %THEN dummy;
&SYSLAST
%IF &SPACE eq 2 %THEN dummy;
;
%END;
%GEN_MAIL(name=&NAME);
%MEND BLK_CATV; |
