135: end if;
136:
137: save_threshold := wf_engine.threshold;
138: l_PROGRAM_START_DATE := sysdate;
139: l_REQUEST_ID := TO_NUMBER(fnd_profile.value('CONC_REQUEST_ID'));
140: l_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
141: l_PROGRAM_ID := TO_NUMBER(fnd_profile.value('CONC_PROGRAM_ID'));
142: l_PROGRAM_LOGIN_ID := TO_NUMBER(fnd_profile.value('USER_ID'));
143: l_CREATED_BY := l_PROGRAM_LOGIN_ID;
137: save_threshold := wf_engine.threshold;
138: l_PROGRAM_START_DATE := sysdate;
139: l_REQUEST_ID := TO_NUMBER(fnd_profile.value('CONC_REQUEST_ID'));
140: l_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
141: l_PROGRAM_ID := TO_NUMBER(fnd_profile.value('CONC_PROGRAM_ID'));
142: l_PROGRAM_LOGIN_ID := TO_NUMBER(fnd_profile.value('USER_ID'));
143: l_CREATED_BY := l_PROGRAM_LOGIN_ID;
144: l_LAST_UPDATED_BY := l_PROGRAM_LOGIN_ID;
145: l_LAST_UPDATE_LOGIN := TO_NUMBER(fnd_profile.value('CONC_LOGIN_ID'));
138: l_PROGRAM_START_DATE := sysdate;
139: l_REQUEST_ID := TO_NUMBER(fnd_profile.value('CONC_REQUEST_ID'));
140: l_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
141: l_PROGRAM_ID := TO_NUMBER(fnd_profile.value('CONC_PROGRAM_ID'));
142: l_PROGRAM_LOGIN_ID := TO_NUMBER(fnd_profile.value('USER_ID'));
143: l_CREATED_BY := l_PROGRAM_LOGIN_ID;
144: l_LAST_UPDATED_BY := l_PROGRAM_LOGIN_ID;
145: l_LAST_UPDATE_LOGIN := TO_NUMBER(fnd_profile.value('CONC_LOGIN_ID'));
146:
141: l_PROGRAM_ID := TO_NUMBER(fnd_profile.value('CONC_PROGRAM_ID'));
142: l_PROGRAM_LOGIN_ID := TO_NUMBER(fnd_profile.value('USER_ID'));
143: l_CREATED_BY := l_PROGRAM_LOGIN_ID;
144: l_LAST_UPDATED_BY := l_PROGRAM_LOGIN_ID;
145: l_LAST_UPDATE_LOGIN := TO_NUMBER(fnd_profile.value('CONC_LOGIN_ID'));
146:
147: open getLastRunDate;
148: fetch getLastRunDate into l_program_ref_date;
149: close getLastRunDate;