select plplfmae . . . select plplfmov IF SEEK(configtraba+ccodempleado+xmes+xano+cconcepto) DELETE FOR cod_emple= plplfmae.cod_emple AND mes = xmes AND; ano=xano AND mocodconce= cconcepto MESSAGEBOX("REGISTRO BORRADO ") ELSE MESSAGEBOX("NO SE ENCUENTRA EL CONCEPTO --> "+cconcepto) ENDIF . . . . ENDIF