Changeset 26939 in main


Ignore:
Timestamp:
03/07/23 13:48:45 (4 weeks ago)
Author:
Maria Baron
Message:

with corrected a-a CLs

Location:
adopters/nj/trunk/src/main/ibisq/qModules3/mort
Files:
2 added
8 edited

Legend:

Unmodified
Added
Removed
  • adopters/nj/trunk/src/main/ibisq/qModules3/mort/AgeRate.def

    r26754 r26939  
     1#### NO LONGER USING! PRODUCES CONFIDENCE LIMITS FOR CRUDE RATES, NOT A-A RATES! ###
    12#can use ajrate2 standard func file 10/19/05
    23f label Age&Adjusted&Rate
     
    45#f data_where %cross1% %cross2%^=99
    56# pop_where %cross2%=1&and&15<=age<=44
    6 f data_where resid=1
    7 f small_num 20
    8 f small_pop 20
     7#f data_where resid=1
     8#f small_num 20
     9#f small_pop 20
    910
    1011#########################################
     
    107108 r2=put((rate+stdev)*100000, 8.2);
    108109 rate=rate*100000;
    109  r1=compress(r1);
    110  r2=compress(r2);
    111  ci=r1 || ' - ' || r2;
     110 LL=compress(r1);
     111 UL=compress(r2);
     112 ci=LL || ' - ' || UL;
    112113 n=number;
    113114if %cross1%=-1 then %cross1%=.;
    114115?cross2? if %cross2%=-1 then %cross2%=.;
    115  *keep %cross1% %cross2% rate number popnum ci r1 r2;
     116 *keep %cross1% %cross2% rate number popnum ci LL UL;
    116117run;
    117118
     
    120121title 'before final change';
    121122run;
     123 
     124        data tmp;
     125                set tmp;
     126                if  popnum ne . and 0<n<20 then do;
     127                        rate = .A;
     128                        *n = .A;
     129                        *popnum = .A;
     130                        *LL = .A;
     131                        *UL = .A;
     132                        LL = put('**', 8.0);
     133                        UL = put('**', 8.0);
     134
     135                *Only one value attribute is allowed - so if suppressed, overwrite unstable;
     136                *This also puts ** in record code column for suppressed rows, and adds footnote;
     137                        redflag = put('Suppressed', $12.);
     138                end;
     139                *if pop=. then redflag=put('', $12.); *no value attribute for missing crossby values;
     140
     141                if popnum eq . and n eq 0 then delete;  *deletes zero rows with no corresponding pop estimate, e.g. Sex unknown;
     142               
     143                if popnum eq . and n ne 0 then do;      *no matching denominator value, e.g., Other Race;
     144                        rate = put('.', 8.0);
     145                        LL = put('.', 8.0);
     146                        UL = put('.', 8.0);
     147                        redflag= put('NoPop', $12.);
     148                end;
     149
     150        proc print data=tmp noobs;  title2 '6. TMP - final dataset to pass to IBIS View app';
     151        run;
    122152 
    123153--------BoNdArY--------
     
    129159f out_detail lbl_not_used__see_xml_out_map_file
    130160  rate 15.2
    131  r1 15.
    132  r2 15.
    133  n 15.0
    134  popnum 15.0
     161  LL 15.3
     162  UL 15.3
     163  n 15.0
     164  popnum 15.0
     165  redflag 12.0
    135166--------BoNdArY--------
     167--------BoNdArY--------
     1681 suppressed_variables 5
     169  rate
     170  LL
     171  UL
     172  n
     173  popnum
     174--------BoNdArY--------
     175
  • adopters/nj/trunk/src/main/ibisq/qModules3/mort/AgeRateCo.def

    r26754 r26939  
     1#### NO LONGER USING! PRODUCES CONFIDENCE LIMITS FOR CRUDE RATES, NOT A-A RATES! ###
    12#can use ajrate2 standard func file 10/19/05
    23f label Age&Adjusted&Rate
     
    45#f data_where %cross1% %cross2%^=99
    56# pop_where %cross2%=1&and&15<=age<=44
    6 f data_where resid=1
    7 f small_num 20
    8 f small_pop 20
     7#f data_where resid=1
     8#f small_num 20
     9#f small_pop 20
    910
    1011#########################################
     
    107108 r2=put((rate+stdev)*100000, 8.2);
    108109 rate=rate*100000;
    109  r1=compress(r1);
    110  r2=compress(r2);
    111  ci=r1 || ' - ' || r2;
     110 LL=compress(r1);
     111 UL=compress(r2);
     112 ci=LL || ' - ' || UL;
    112113 n=number;
    113114if %cross1%=-1 then %cross1%=.;
    114115?cross2? if %cross2%=-1 then %cross2%=.;
    115  *keep %cross1% %cross2% rate number popnum ci r1 r2;
     116 *keep %cross1% %cross2% rate number popnum ci LL UL;
    116117run;
    117118
     
    121122run;
    122123 
     124        data tmp;
     125                set tmp;
     126                if  popnum ne . and 0<n<20 then do;
     127                        rateper = .A;
     128                        *n = .A;
     129                        *popnum = .A;
     130                        *LL = .A;
     131                        *UL = .A;
     132                        LL = put('**', 8.0);
     133                        UL = put('**', 8.0);
     134
     135                *Only one value attribute is allowed - so if suppressed, overwrite unstable;
     136                *This also puts ** in record code column for suppressed rows, and adds footnote;
     137                        redflag = put('Suppressed', $12.);
     138                end;
     139                *if pop=. then redflag=put('', $12.); *no value attribute for missing crossby values;
     140        proc print data=tmp noobs;  title2 '6. TMP - final dataset to pass to IBIS View app';
     141        run;
    123142--------BoNdArY--------
    124143f out_variable
     
    129148f out_detail lbl_not_used__see_xml_out_map_file
    130149  rate 15.2
    131  r1 15.
    132  r2 15.
    133  n 15.0
    134  popnum 15.0
     150  LL 15.3
     151  UL 15.3
     152  n 15.0
     153  popnum 15.0
     154  redflag 12.0
    135155--------BoNdArY--------
     156--------BoNdArY--------
     1571 suppressed_variables 5
     158  rate
     159  LL
     160  UL
     161  n
     162  popnum
     163--------BoNdArY--------
  • adopters/nj/trunk/src/main/ibisq/qModules3/mort/AgeRateMuni.def

    r26754 r26939  
     1#### NO LONGER USING! PRODUCES CONFIDENCE LIMITS FOR CRUDE RATES, NOT A-A RATES! ###
    12#can use ajrate2 standard func file 10/19/05
    23f label Age&Adjusted&Rate
    34f type special
     5#f data_where %cross1% %cross2%^=99
     6# pop_where %cross2%=1&and&15<=age<=44
    47f data_where resid=1
    58f small_num 20
     
    118121title 'before final change';
    119122run;
    120  
     123
     124data tmp;
     125        set tmp;
     126 if (0<n<10) then do;
     127   rate = .A;
     128   r1 = put('**', 8.0);
     129   r2 = put('**', 8.0);
     130   end;
     131   run;
     132   
    121133--------BoNdArY--------
    122134f out_variable
     
    126138--------BoNdArY--------
    127139f out_detail lbl_not_used__see_xml_out_map_file
    128   rate 15.2
     140 rate 15.2
     141 n 15.0
     142 popnum 15.0
    129143 r1 15.
    130144 r2 15.
    131  n 15.0
    132  popnum 15.0
    133145--------BoNdArY--------
     146***************** 12. suppressed_variables *****************************************;
     147* ZW's CGI program must be told how many variables it will need to suppress and     ;
     148* which ones they are. NOTE: If the SAS code for cell suppression is commented-out, ;
     149* these lines can be left in the .def file without causing any problems. They will  ;
     150* only be used if the SAS code above is active, OR if the small_num and small_pop   ;
     151parameters are active, and with non-zero values, in the .CFG file.                  ;
     152************************************************************************************;
     153--------BoNdArY--------
     1541 suppressed_variables 1
     155rate
     156--------BoNdArY--------
  • adopters/nj/trunk/src/main/ibisq/qModules3/mort/CrudeRate.def

    r26754 r26939  
     1#### NO LONGER USING! USE RateCrude100K.DEF INSTEAD ###
    12#f label Crude&Rate
    23f type special
  • adopters/nj/trunk/src/main/ibisq/qModules3/mort/Mort.cfg

    r26754 r26939  
    3232r sas 0
    3333r test 0
    34 r small_num 0
    35 r small_pop 20
     34#r small_num 0
     35#r small_pop 20
    3636#############################################################
    3737# for type1=num -- SAS data type is numeric
  • adopters/nj/trunk/src/main/ibisq/qModules3/mort/MortCo.cfg

    r26754 r26939  
    3434r test 0
    3535r resid 1
    36 r small_num 20
    37 r small_pop 20
     36#r small_num 20
     37#r small_pop 20
    3838#############################################################
    3939# for type1=num -- SAS data type is numeric
  • adopters/nj/trunk/src/main/ibisq/qModules3/mort/MortMuni.cfg

    r26754 r26939  
    3535r test 0
    3636r resid 1
    37 r small_num 20
    38 r small_pop 20
     37#r small_num 20
     38#r small_pop 20
    3939############################################################# for type1=num -- SAS data type is numeric
    4040#           char -- SAS data type is Alphabetic
  • adopters/nj/trunk/src/main/ibisq/qModules3/mort/MortMuni65K.cfg

    r26754 r26939  
    3333r test 0
    3434r resid 1
    35 r small_num 20
    36 r small_pop 20
     35#r small_num 20
     36#r small_pop 20
    3737#############################################################
    3838# for type1=num -- SAS data type is numeric
Note: See TracChangeset for help on using the changeset viewer.