77: X_LAST_UPDATE_DATE in DATE,
78: X_LAST_UPDATED_BY in NUMBER,
79: X_LAST_UPDATE_LOGIN in NUMBER
80: ) is
81: cursor C is select ROWID from AMS_EVENT_HEADERS_ALL_B
82: where EVENT_HEADER_ID = X_EVENT_HEADER_ID
83: ;
84: begin
85: insert into AMS_EVENT_HEADERS_ALL_B (
81: cursor C is select ROWID from AMS_EVENT_HEADERS_ALL_B
82: where EVENT_HEADER_ID = X_EVENT_HEADER_ID
83: ;
84: begin
85: insert into AMS_EVENT_HEADERS_ALL_B (
86: FUND_AMOUNT_TC,
87: FUND_AMOUNT_FC,
88: ATTRIBUTE4,
89: USER_STATUS_ID,
410: CERT_CREDIT_TYPE_CODE,
411: CERTIFICATION_CREDITS,
412: INVENTORY_ITEM_ID,
413: FORECASTED_REVENUE
414: from AMS_EVENT_HEADERS_ALL_B
415: where EVENT_HEADER_ID = X_EVENT_HEADER_ID
416: for update of EVENT_HEADER_ID nowait;
417: recinfo c%rowtype;
418:
658: X_LAST_UPDATED_BY in NUMBER,
659: X_LAST_UPDATE_LOGIN in NUMBER
660: ) is
661: begin
662: update AMS_EVENT_HEADERS_ALL_B set
663: FUND_AMOUNT_TC = X_FUND_AMOUNT_TC,
664: FUND_AMOUNT_FC = X_FUND_AMOUNT_FC,
665: ATTRIBUTE4 = X_ATTRIBUTE4,
666: USER_STATUS_ID = X_USER_STATUS_ID,
761: if (sql%notfound) then
762: raise no_data_found;
763: end if;
764:
765: delete from AMS_EVENT_HEADERS_ALL_B
766: where EVENT_HEADER_ID = X_EVENT_HEADER_ID;
767:
768: if (sql%notfound) then
769: raise no_data_found;
775: begin
776: delete from AMS_EVENT_HEADERS_ALL_TL T
777: where not exists
778: (select NULL
779: from AMS_EVENT_HEADERS_ALL_B B
780: where B.EVENT_HEADER_ID = T.EVENT_HEADER_ID
781: );
782:
783: update AMS_EVENT_HEADERS_ALL_TL T set (
946: l_row_id varchar2(100);
947:
948: cursor c_version is
949: select object_version_number
950: from ams_event_headers_all_b
951: where event_header_id = X_EVENT_HEADER_ID;
952:
953: cursor c_evh_exists is
954: select 'x'
951: where event_header_id = X_EVENT_HEADER_ID;
952:
953: cursor c_evh_exists is
954: select 'x'
955: from ams_event_headers_all_b
956: where event_header_id = X_EVENT_HEADER_ID;
957:
958: cursor c_evh_id is
959: select ams_event_headers_all_b_s.nextval
955: from ams_event_headers_all_b
956: where event_header_id = X_EVENT_HEADER_ID;
957:
958: cursor c_evh_id is
959: select ams_event_headers_all_b_s.nextval
960: from dual;
961:
962: BEGIN
963: