%let tRes = 0;
%CheckPars(
pNotEmpty = %str(pLib pDs1 pDS2 pDS1Var1 pDS1Var2 pDS2Var1 pDS2Var2)
,pLibExist = %str(pLib)
,pDSExist = %str(pLib.pDs1 pLib.pDs2)
,pDSNotEmpty = %str(pLib.pDs1 pLib.pDs2)
,pDSVarExist = %str(pLib.pDs1 - pDS1Var1 pDS1Var2 | pLib.pDs2 - pDS2Var1 pDS2Var2)
,pError = tRes
);
%if &tRes. ne 0 %then %do;
/* Der Parametercheck hat einen Fehler ergeben. */
%end;
|