ICASE(test1, nulldev(_VFP.SETVAR('lnVar1',1), _VFP.SETVAR('lnVar2',2)), ; test2, nulldev(_VFP.SETVAR('lnVar1',10), _VFP.SETVAR('lnVar2',20), ; test3, nulldev(_VFP.SETVAR('lnVar1',lnVar1+10), _VFP.SETVAR('lnVar2',lnVar2+20), ; nulldev(_VFP.SETVAR('lnVar1',-1), _VFP.SETVAR('lnVar2',-2)) FUNCTION nulldev *just nothing, only to provide parameters LPARAMETER; lvPara01,; lvPara02,; lvPara03,; lvPara04,; lvPara05,; lvPara06,; lvPara07,; lvPara08,; lvPara09,; lvPara10,; lvPara11,; lvPara12,; lvPara13,; lvPara14,; lvPara15,; lvPara16,; lvPara17,; lvPara18,; lvPara19 ENDPROC