PACKAGE BODY: APPS.AR_DOCUMENT_TRANSFER_PKG

Source

1 package body ar_document_transfer_pkg as
2 /*$Header: ARDCUMTB.pls 115.1 2002/12/23 22:40:05 tkoshio noship $ */
3 
4 procedure insertRow(P_DOCUMENT_TRANSFER_REC IN AR_DOCUMENT_TRANSFERS%ROWTYPE) is
5   begin
6     if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_DOCUMENT_TRANSFER_PKG.insertRow(+)'); end if;
7     if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_DOCUMENT_TRANSFER_PKG.insertRow(-)'); end if;
8   end;
9 
10 procedure deleteRow(P_DOCUMENT_TRANSFER_ID  IN NUMBER) is
11   begin
12     if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_DOCUMENT_TRANSFER_PKG.deleteRow(+)'); end if;
13     delete from ar_document_transfers
14     where document_transfer_id = p_document_transfer_id;
15     if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_DOCUMENT_TRANSFER_PKG.deleteRow(-)'); end if;
16   end;
17 
18 procedure updateRow(P_DOCUMENT_TRANSFER_REC IN AR_DOCUMENT_TRANSFERS%ROWTYPE) is
19   begin
20     if ar_doc_transfer_standard.isDebugOn then
21       ar_doc_transfer_standard.debug('AR_DOCUMENT_TRANSFER_PKG.updateRow(+)');
22       ar_doc_transfer_standard.debug('document_transfer_id:'||p_document_transfer_rec.document_transfer_id);
23       ar_doc_transfer_standard.debug('status:'||p_document_transfer_rec.status);
24       ar_doc_transfer_standard.debug('document_msgid:'||p_document_transfer_rec.document_msgid);
25     end if;
26     update ar_document_transfers
27     set last_updated_by    = fnd_global.user_id,
28         last_update_date   = sysdate,
29         SOURCE_ID          = p_document_transfer_rec.source_id,
30         SOURCE_TABLE       = p_document_transfer_rec.source_table,
31         TP_SOURCE_TABLE    = p_document_transfer_rec.tp_source_table,
32         TP_SOURCE_ID       = p_document_transfer_rec.tp_source_id,
33         STATUS             = p_document_transfer_rec.status,
34         EVENT_NAME         = p_document_transfer_rec.event_name,
35         ECX_TRX_TYPE       = p_document_transfer_rec.ecx_trx_type,
36         ECX_TRX_SUBTYPE    = p_document_transfer_rec.ecx_trx_subtype,
37         ECX_PARTY_TYPE     = p_document_transfer_rec.ecx_party_type,
38         EMAIL_ADDRESS      = p_document_transfer_rec.email_address,
39         DOCUMENT_MSGID     = p_document_transfer_rec.document_msgid,
40         CONFIRMATION_MSGID = p_document_transfer_rec.confirmation_msgid,
41         EXCEPTION_TYPE     = p_document_transfer_rec.exception_type,
42         EXCEPTION_MESSAGE  = p_document_transfer_rec.exception_message,
43         REQUEST_ID         = p_document_transfer_rec.request_id,
44         APPLICATION_ID     = p_document_transfer_rec.application_id,
45         RESPONSIBILITY_ID  = p_document_transfer_rec.responsibility_id,
46 	LAST_SUBMISSION_DATE = p_document_transfer_rec.LAST_SUBMISSION_DATE
47     where document_transfer_id = p_document_transfer_rec.document_transfer_id;
48     if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_DOCUMENT_TRANSFER_PKG.updateRow(-)'); end if;
49   end;
50 
51 begin
52   if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_DOCUMENT_TRANSFER_PKG(+)'); end if;
53   if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_DOCUMENT_TRANSFER_PKG(-)'); end if;
54 end;