44 lines
1.3 KiB
Plaintext
44 lines
1.3 KiB
Plaintext
MAIN
|
|
|
|
CONNECT TO "smarmotech" USER 'jsoto' USING 'lmmjvsd2014'
|
|
CALL elimina()
|
|
END MAIN
|
|
FUNCTION elimina()
|
|
DEFINE zk_numemp,numemp INT,
|
|
nombre VARCHAR(100),
|
|
selec STRING
|
|
|
|
LET selec=
|
|
"SELECT a.id,b.nom1_emp,b.num_emp FROM zkbiotime.dbo.hr_employee a,adtb00003 b
|
|
WHERE a.emp_cardnumber = b.num_emp AND b.status_t IS NOT NULL"
|
|
|
|
PREPARE comando FROM selec
|
|
DECLARE buscar CURSOR FOR comando
|
|
|
|
|
|
LET selec = "DELETE FROM zkbiotime.dbo.att_punches WHERE employee_id = ?"
|
|
|
|
PREPARE bpunches FROM selec
|
|
|
|
LET selec = "DELETE FROM zkbiotime.dbo.hr_biotemplate WHERE employee_id = ?"
|
|
|
|
PREPARE bbiotemplate FROM selec
|
|
|
|
LET selec = "DELETE FROM zkbiotime.dbo.att_employee_zone WHERE employee_id = ?"
|
|
PREPARE bzone FROM selec
|
|
|
|
LET selec = "DELETE FROM zkbiotime.dbo.hr_employee WHERE id = ?"
|
|
PREPARE employee FROM selec
|
|
|
|
FOREACH buscar INTO zk_numemp,nombre,numemp
|
|
|
|
EXECUTE bpunches USING zk_numemp
|
|
EXECUTE bbiotemplate USING zk_numemp
|
|
EXECUTE bzone USING zk_numemp
|
|
EXECUTE employee USING zk_numemp
|
|
|
|
|
|
DISPLAY "BORRE ",zk_numemp ,' ',nombre,' ',numemp
|
|
|
|
END FOREACH
|
|
END FUNCTION |