Skip to content

Commit

Permalink
Add files via upload
Browse files Browse the repository at this point in the history
  • Loading branch information
@SebChami
SebChami authored Nov 14, 2024
1 parent aa5db25 commit 06eed1d
Show file tree
Hide file tree
Showing 2 changed files with 23 additions and 7 deletions.
24 changes: 17 additions & 7 deletions 5.3_Validation/pgm/XML_SVAL.sas
View file
Original file line number Diff line number Diff line change
Expand Up @@ -251,13 +251,13 @@ RUN;

DATA SVAL&MODE;
MERGE SVAL&MODE (in=A) NAS_PRIMARY (in=B);
BY VARIABLE;
BY VARIABLE MOD_ID;
IF A;
RUN;

DATA SVAL_NAS&MODE;
MERGE SVAL_NAS&MODE (in=A) SVAL&MODE (in=B KEEP=VARIABLE FORMAT);
BY VARIABLE;
DATA SVAL_NAS&MODE ;
MERGE SVAL_NAS&MODE (in=A) SVAL&MODE (in=B KEEP=VARIABLE FORMAT MOD_ID);
BY VARIABLE MOD_ID;
IF B;
RUN;

Expand Down Expand Up @@ -1133,13 +1133,18 @@ QUIT;
RES = 0;
END;
%END;
/* %ELSE %IF &MOD EQ RECUR3 %THEN %DO;*/
/* IF &VARX._F EQ -7 AND &F.B010 GE &START AND &F.B010 LE &END AND MOD( ( &F.B010 - &START ), 3 ) EQ 0 THEN DO;*/
/* RES = 0;*/
/* END;*/
/* %END;*/
%ELSE %IF &MOD EQ RECUR3 %THEN %DO;
IF &VARX._F EQ -7 AND &F.B010 GE &START AND &F.B010 LE &END AND MOD( ( &F.B010 - &START ), 3 ) EQ 0 THEN DO;
IF &VARX._F EQ -7 AND &F.B010 = &YYYY THEN DO;
RES = 0;
END;
%END;
%ELSE %IF &MOD EQ RECUR6 %THEN %DO;
IF &VARX._F EQ -7 AND &F.B010 GE &START AND &F.B010 LE &END AND MOD( ( &F.B010 - &START ), 6 ) EQ 0 THEN DO;
IF &VARX._F EQ -7 AND &F.B010 = &YYYY THEN DO;
RES = 0;
END;
%END;
Expand Down Expand Up @@ -1183,8 +1188,13 @@ QUIT;
RES = 0;
END;
%END;
/* %ELSE %IF &MOD EQ RECUR3 %THEN %DO;*/
/* IF &VARX._F NE -7 AND &F.B010 LT &YYYY THEN DO;*/
/* RES = 0;*/
/* END;*/
/* %END;*/
%ELSE %IF &MOD EQ RECUR6 %THEN %DO;
IF &VARX._F NE -7 AND MOD( ( &F.B010 - &START ), 6 ) NE 0 THEN DO;
IF &VARX._F NE -7 AND &F.B010 LT &YYYY THEN DO;
RES = 0;
END;
%END;
Expand Down
6 changes: 6 additions & 0 deletions 5.3_Validation/pgm/XML_WEIGHT.sas
View file
Original file line number Diff line number Diff line change
Expand Up @@ -758,3 +758,9 @@ ODS &OUTPUTFORMAT CLOSE;

%MEND check_WEIGHT;







0 comments on commit 06eed1d

Please sign in to comment.