SASUnit Examples  Version 1.5.0
_render_assertforeignkeyact.sas
Go to the documentation of this file.
1 
23 %macro _render_assertForeignKeyAct (i_sourceColumn=
24  ,o_html=0
25  ,o_targetColumn=
26  );
27 
28  hlp = trim(left(&i_sourceColumn.));
29  select (hlp);
30  when (-1) hlp = "&g_nls_reportForeignKey_001.";
31  when (-2) hlp = "&g_nls_reportForeignKey_002.";
32  when (-3) hlp = "&g_nls_reportForeignKey_003.";
33  when (-4) hlp = "&g_nls_reportForeignKey_004.";
34  when (-5) hlp = "&g_nls_reportForeignKey_005.";
35  when (-6) hlp = "&g_nls_reportForeignKey_006.";
36  when (-7) hlp = "&g_nls_reportForeignKey_007.";
37  when (-8) hlp = "&g_nls_reportForeignKey_008.";
38  when (-19) hlp = "&g_nls_reportForeignKey_019.";
39  when (-20) hlp = "&g_nls_reportForeignKey_020.";
40  when (-21) hlp = "&g_nls_reportForeignKey_021.";
41  when (-22) hlp = "&g_nls_reportForeignKey_022.";
42  when (-23) hlp = "&g_nls_reportForeignKey_023.";
43  when (-24) hlp = "&g_nls_reportForeignKey_024.";
44  otherwise hlp = catx(" ",hlp,"&g_nls_reportForeignKey_025.");
45  end;
46 
47  href = catt ('_', put (scn_id, z3.),'_',put (cas_id, z3.),'_',put (tst_id, z3.));
48  %if (&o_html.) %then %do;
49  href_act = catt (href,'_foreignkey_rep.html');
50  %end;
51 
52  &o_targetColumn. = catt ("^{style [flyover=""&g_nls_reportDetail_016"" url=""", href_act, """] &g_nls_reportDetail_038. } ^n ");
53  &o_targetColumn. = catt (hlp, "^n", &o_targetColumn.);
54 
55 %mend _render_assertForeignKeyAct;