140:
141: BEGIN
142:
143: BEGIN
144: SELECT 'X' INTO dummy FROM CZ_XFR_RUN_INFOS WHERE RUN_ID=inRUN_ID;
145:
146: UPDATE CZ_XFR_RUN_INFOS SET
147: STARTED=SYSDATE,
148: LAST_ACTIVITY=SYSDATE
142:
143: BEGIN
144: SELECT 'X' INTO dummy FROM CZ_XFR_RUN_INFOS WHERE RUN_ID=inRUN_ID;
145:
146: UPDATE CZ_XFR_RUN_INFOS SET
147: STARTED=SYSDATE,
148: LAST_ACTIVITY=SYSDATE
149: WHERE RUN_ID=inRUN_ID;
150:
149: WHERE RUN_ID=inRUN_ID;
150:
151: EXCEPTION
152: WHEN NO_DATA_FOUND THEN
153: INSERT INTO CZ_XFR_RUN_INFOS (RUN_ID,STARTED,LAST_ACTIVITY)
154: VALUES(inRUN_ID,SYSDATE,SYSDATE);
155:
156: WHEN OTHERS THEN
157: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_PR_MAIN.MAIN_PRICE',11276);
217: dummy CHAR(1);
218: BEGIN
219:
220: BEGIN
221: SELECT 'X' INTO dummy FROM CZ_XFR_RUN_INFOS WHERE RUN_ID=inRUN_ID;
222:
223: UPDATE CZ_XFR_RUN_INFOS SET
224: STARTED=SYSDATE,
225: LAST_ACTIVITY=SYSDATE
219:
220: BEGIN
221: SELECT 'X' INTO dummy FROM CZ_XFR_RUN_INFOS WHERE RUN_ID=inRUN_ID;
222:
223: UPDATE CZ_XFR_RUN_INFOS SET
224: STARTED=SYSDATE,
225: LAST_ACTIVITY=SYSDATE
226: WHERE RUN_ID=inRUN_ID;
227:
226: WHERE RUN_ID=inRUN_ID;
227:
228: EXCEPTION
229: WHEN NO_DATA_FOUND THEN
230: INSERT INTO CZ_XFR_RUN_INFOS (RUN_ID,STARTED,LAST_ACTIVITY)
231: VALUES(inRUN_ID,SYSDATE,SYSDATE);
232:
233: WHEN OTHERS THEN
234: x_error:=CZ_IMP_ALL.REPORT(SQLERRM,1,'CZ_IMP_PR_MAIN.MAIN_PRICE_GROUP',11276);
320: BEGIN
321: OPEN c_get_nErrors;
322: FETCH c_get_nErrors INTO nErrors;
323: CLOSE c_get_nErrors;
324: UPDATE CZ_XFR_RUN_INFOS
325: SET TOTAL_ERRORS=NVL(TOTAL_ERRORS,0)+NVL(nErrors,0),
326: COMPLETED='1'
327: WHERE RUN_ID=inRUN_ID;
328: COMMIT;
385: BEGIN
386: OPEN c_get_nErrors;
387: FETCH c_get_nErrors INTO nErrors;
388: CLOSE c_get_nErrors;
389: UPDATE CZ_XFR_RUN_INFOS
390: SET TOTAL_ERRORS=NVL(TOTAL_ERRORS,0)+NVL(nErrors,0),
391: COMPLETED='1'
392: WHERE RUN_ID=inRUN_ID;
393: COMMIT;