SASUnit Examples  Version 1.5.0
_render_asserttableexistsact.sas
Go to the documentation of this file.
1 
22 %macro _render_assertTableExistsAct (i_sourceColumn=
23  ,o_html=0
24  ,o_targetColumn=
25  );
26 
27  hlp2 = scan(&i_sourceColumn., 1, "#");
28  select (hlp2);
29  when (-2) hlp = "&g_nls_reportTableExist_009.";
30  when (-1) hlp = "&g_nls_reportTableExist_001.";
31  when ( 0) hlp = "&g_nls_reportTableExist_002.";
32  when ( 1) hlp = "&g_nls_reportTableExist_003.";
33  otherwise;
34  end;
35 
36  hlp2 = scan(&i_sourceColumn., 2, "#");
37  if (length(trim(hlp2)) > 10) then do;
38  hlp2 = put(input(compress(put(hlp2,32.)),32.),&g_nls_reportDetail_050.);
39  hlp = catx(" ", hlp,"^n","&g_nls_reportTableExist_010." ,hlp2);
40  hlp2 = scan(&i_sourceColumn., 3, "#");
41  hlp2 = put(input(compress(put(hlp2,32.)),32.),&g_nls_reportDetail_050.);
42  hlp = catx(" ", hlp,"^n","&g_nls_reportTableExist_011." ,hlp2);
43  end;
44 
45  %_render_dataColumn (i_sourceColumn=hlp
46  ,o_targetColumn=&o_targetColumn.
47  );
48 
49 %mend _render_assertTableExistsAct;