This document contains a list of ID codes and instructions to update employee records in a database. It will delete certain records based on their ID codes, then replace fields like job type, job structure, job title and work location for other records based on the employee's ID code and salary grade.
2. FOR EMPTY(ALLTRIM(jab_struk)) AND
INLIST(ALLTRIM(kdunor),'FFSU122381','FFSU122383','FFSU124390','FFSU124392','FFSU
124395','FFSU124396','FFSU124400','FFSU124403','FFSU125541','FFSU125547',;
'FFSU125549','FFSU127956','FFSU000001','FFSU000002')
REPLACE ALL jenis_jab WITH "FT",;
jab_struk WITH IIF(EVALUATE(golru)<=32,"1960GUBA10",;
IIF(EVALUATE(golru)<=34 AND
EVALUATE(golru)>=33,"1960GUBA11",;
IIF(EVALUATE(golru)<=43 AND
EVALUATE(golru)>=41,"1960GUBA12",""))),;
nmjabatan WITH IIF(EVALUATE(golru)<=32,"Guru Pertama",;
IIF(EVALUATE(golru)<=34 AND
EVALUATE(golru)>=33,"Guru Muda",;
IIF(EVALUATE(golru)<=43 AND
EVALUATE(golru)>=41,"Guru Madya",""))) ;
FOR EMPTY(ALLTRIM(jab_struk)) AND
INLIST(ALLTRIM(kdunor),'SS01051000','FFSU122353','FFSU122355','FFSU122356','FFSU
122357','FFSU122359','FFSU122360',;
'FFSU122361','FFSU122362','FFSU122363','FFSU122364','FFSU122365','FFSU122367','F
FSU122369','FFSU122375','FFSU122376','FFSU122380')
ISI ADD5
REPLACE ALL add5 WITH "KCD SIANTAR UTARA" FOR
INLIST(ALLTRIM(kdunor),'SS01051000','FFSU122353','FFSU122355','FFSU122356','FFSU
122357','FFSU122359','FFSU122360',;
'FFSU122361','FFSU122362','FFSU122363','FFSU122364','FFSU122365','FFSU122367','F
FSU122369','FFSU122375','FFSU122376','FFSU122380')
REPLACE ALL add5 WITH "KCD SIANTAR UTARA" FOR
INLIST(ALLTRIM(kdunor),'FFSU122381','FFSU122383','FFSU124390','FFSU124392','FFSU
124395','FFSU124396','FFSU124400','FFSU124403','FFSU125541','FFSU125547',;
'FFSU125549','FFSU127956','FFSU000001','FFSU000002')
196502272012122001
197201081993052001
197212012007012005