[Home] [Help]
36: X_FROM_REV_NUM in NUMBER,
37: X_TO_REV_NUM in NUMBER,
38: X_CSEQNUM in VARCHAR2
39: ) is
40: cursor C is select ROWID from AMW_AP_STEPS_B
41: where AP_STEP_ID = X_AP_STEP_ID
42: ;
43: begin
44: insert into AMW_AP_STEPS_B (
40: cursor C is select ROWID from AMW_AP_STEPS_B
41: where AP_STEP_ID = X_AP_STEP_ID
42: ;
43: begin
44: insert into AMW_AP_STEPS_B (
45: AP_STEP_ID,
46: AUDIT_PROCEDURE_ID,
47: SEQNUM,
48: SAMPLESIZE,
210: REQUESTOR_ID,
211: FROM_REV_NUM,
212: TO_REV_NUM,
213: CSEQNUM
214: from AMW_AP_STEPS_B
215: where AP_STEP_ID = X_AP_STEP_ID
216: for update of AP_STEP_ID nowait;
217: recinfo c%rowtype;
218:
339: X_CSEQNUM in VARCHAR2
340:
341: ) is
342: begin
343: update AMW_AP_STEPS_B set
344: AUDIT_PROCEDURE_ID = X_AUDIT_PROCEDURE_ID,
345: SEQNUM = X_SEQNUM,
346: SAMPLESIZE = X_SAMPLESIZE,
347: ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
402: if (sql%notfound) then
403: raise no_data_found;
404: end if;
405:
406: delete from AMW_AP_STEPS_B
407: where AP_STEP_ID = X_AP_STEP_ID;
408:
409: if (sql%notfound) then
410: raise no_data_found;
416: begin
417: delete from AMW_AP_STEPS_TL T
418: where not exists
419: (select NULL
420: from AMW_AP_STEPS_B B
421: where B.AP_STEP_ID = T.AP_STEP_ID
422: );
423:
424: update AMW_AP_STEPS_TL T set (