1: PACKAGE BODY ARP_CMERGE_ARTAX as
2: /* $Header: ARPLTAXB.pls 120.4 2005/10/30 04:24:46 appldev ship $ */
3:
4: /*---------------------------- PRIVATE VARIABLES ----------------------------*/
5: g_count NUMBER := 0;
62: MERGE_HEADER_ID_LIST
63: , PRIMARY_KEY_ID_LIST
64: , NUM_COL1_ORIG_LIST
65: , NUM_COL2_ORIG_LIST
66: LIMIT ARP_CMERGE.max_array_size;/*Additional changes for 2447449*/
67: IF merged_records%NOTFOUND THEN
68: l_last_fetch := TRUE;
69: END IF;
70: IF MERGE_HEADER_ID_LIST.COUNT = 0 and l_last_fetch then
138: /*---------------------------- PUBLIC ROUTINES ------------------------------*/
139: PROCEDURE merge (req_id NUMBER, set_num NUMBER, process_mode VARCHAR2) is
140: BEGIN
141:
142: arp_message.set_line( 'ARP_CMERGE_ARTAX.MERGE()+' );
143:
144: ra_te( req_id, set_num, process_mode );
145:
146: arp_message.set_line( 'ARP_CMERGE_ARTAX.MERGE()-' );
142: arp_message.set_line( 'ARP_CMERGE_ARTAX.MERGE()+' );
143:
144: ra_te( req_id, set_num, process_mode );
145:
146: arp_message.set_line( 'ARP_CMERGE_ARTAX.MERGE()-' );
147:
148: END merge;
149:
150: end ARP_CMERGE_ARTAX;
146: arp_message.set_line( 'ARP_CMERGE_ARTAX.MERGE()-' );
147:
148: END merge;
149:
150: end ARP_CMERGE_ARTAX;