42: X_LAST_UPDATE_DATE in DATE,
43: X_LAST_UPDATED_BY in NUMBER,
44: X_LAST_UPDATE_LOGIN in NUMBER
45: ) is
46: cursor C is select ROWID from AR_BPA_TEMPLATES_B
47: where TEMPLATE_ID = X_TEMPLATE_ID
48: ;
49: begin
50: insert into AR_BPA_TEMPLATES_B (
46: cursor C is select ROWID from AR_BPA_TEMPLATES_B
47: where TEMPLATE_ID = X_TEMPLATE_ID
48: ;
49: begin
50: insert into AR_BPA_TEMPLATES_B (
51: TEMPLATE_ID,
52: REF_TEMPLATE_ID,
53: PRIMARY_APP_ID,
54: SECONDARY_APP_ID,
236: PRINT_FONT_FAMILY,
237: PRINT_FONT_SIZE,
238: TRX_CLASS,
239: TEMPLATE_FORMAT
240: from AR_BPA_TEMPLATES_B
241: where TEMPLATE_ID = X_TEMPLATE_ID
242: for update of TEMPLATE_ID nowait;
243: recinfo c%rowtype;
244:
385: X_LAST_UPDATED_BY in NUMBER,
386: X_LAST_UPDATE_LOGIN in NUMBER
387: ) is
388: begin
389: update AR_BPA_TEMPLATES_B set
390: REF_TEMPLATE_ID = X_REF_TEMPLATE_ID,
391: PRIMARY_APP_ID = X_PRIMARY_APP_ID,
392: SECONDARY_APP_ID = X_SECONDARY_APP_ID,
393: CONTRACT_LINE_TYPE = X_CONTRACT_LINE_TYPE,
474: if (sql%notfound) then
475: raise no_data_found;
476: end if;
477:
478: delete from AR_BPA_TEMPLATES_B
479: where TEMPLATE_ID = X_TEMPLATE_ID;
480:
481: if (sql%notfound) then
482: raise no_data_found;
488: begin
489: delete from AR_BPA_TEMPLATES_TL T
490: where not exists
491: (select NULL
492: from AR_BPA_TEMPLATES_B B
493: where B.TEMPLATE_ID = T.TEMPLATE_ID
494: );
495:
496: update AR_BPA_TEMPLATES_TL T set (