qa_mil_package_pd

/*-------------------------------------------------------------------------------------*\

|  PROGRAM NAME:                                                                        |

|     scdm_data_qa_review-level2.sas                                                    |

|---------------------------------------------------------------------------------------|

|  PURPOSE:                                                                             |

|     The purpose of the program is to perform critical level 2 data quality checks     |

|     on all applicable tables.                                                         |     

|---------------------------------------------------------------------------------------|

|  PROGRAM INPUT:                                                                       |

|     see 00.0_scdm_mil_data_qa_review_master_file.sas                                  |

|                                                                                       |

|  PROGRAM OUTPUT:                                                                      |

|     see Workplan PDF                                                                  |

|---------------------------------------------------------------------------------------|

|  CONTACT:                                                                             |

|     Sentinel Coordinating Center                                                      |

|     info@sentinelsystem.org                                                           |

\*-------------------------------------------------------------------------------------*/

​

*-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-;

*  PLEASE DO NOT EDIT BELOW WITHOUT CONTACTING THE SENTINEL OPERATIONS CENTER           ;

*-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-;

​

%timestamp(&module._start);

​

/*-------------------------------------------------------------------------------------*/

/*  START Level 2 Macro                                                                */

/*-------------------------------------------------------------------------------------*/

/*  All macros called from level2_abort are found in 00.1_scdm_standard_macros.sas     */

/*-------------------------------------------------------------------------------------*/ 

%macro level2_abort (level=2);

/* Create the list of tables to to include for Level 2 Checks */

  proc sql noprint;

    select module

         , quote(strip(module))

    into :tabidlist separated by ' '

       , :sql_tabidlist separated by ','

    from msoc.control_flow_3 (where=(execute_flag='y' and cc_table ne 'X'))

    ;

  quit;

/*-------------------------------------------------------------------------------------*/

/* 1 - Perform L2 1.intra-table and 2.cross-table datachecks where AbortYN='y' for     */

/*-------------------------------------------------------------------------------------*/

  %do l=1 %to 2; 

  /*-----------------------------------------------------------------------------------*/

  /* 1.1 - Create temporary lookup table                                               */

  /*-----------------------------------------------------------------------------------*/

   /*1:indicates no crosstable, and abort=y only*/

    %if &l.=1 %then %do;

      %l2_lkp_table (abortyn=, crosstable=n);

      %l2_ds_nodupkey;

    %end;

​

    %else %if &l.=2 %then %do;  

      %l2_lkp_table (abortyn=y, crosstable=y);

    %end;

​

  /*-----------------------------------------------------------------------------------*/

  /* 1.2 - Create a macro variable with list of unique CheckIds from temporary lookup  */

  /*-----------------------------------------------------------------------------------*/

    proc sql noprint;

      select distinct checkid

           , count(distinct checkid)