[Home] [Help]
3:
4: /*------------------Main Procedure-------------------------------------------*/
5: /* Added for Bug # 2138340 */
6: p_trans_import_failed varchar2(1) := 'N'; /* package level var for detecting if trans import ever failed */
7: g_body_debug_mode varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
8: --g_body_debug_mode varchar2(1) := 'Y';
9:
10: /* 3917045 : This variable holds the value of the request parameter 'Interface Supplier Invoices' */
11: G_PROCESS_INVOICES VARCHAR2(1) := 'Y';
620:
621: END IF;
622:
623: G_err_stage := 'FETCHING PROFILE OPTION: COMMIT SIZE';
624: fnd_profile.get(G_PROFILE_NAME, v_commit_size);
625:
626: G_COMMIT_SIZE := to_number(v_commit_size);
627:
628: IF (G_COMMIT_SIZE <= 0) THEN
641: /* Get the profile option of whether to transfer DFF from AP */
642: G_err_stage := 'FETCHING PROFILE OPTION: TRANS DFF FROM AP';
643:
644: G_PROFILE_NAME := 'PA_TRANSFER_DFF_AP';
645: fnd_profile.get(G_PROFILE_NAME, G_TRANS_DFF_AP);
646: If g_body_debug_mode = 'Y' Then
647: write_log(LOG,'Processing DFFs for AP?'||G_TRANS_DFF_AP);
648: End If;
649: IF p_process_receipts = 'Y' THEN
648: End If;
649: IF p_process_receipts = 'Y' THEN
650:
651: G_PROFILE_NAME := 'PA_TRANSFER_DFF_PO';
652: fnd_profile.get(G_PROFILE_NAME, G_TRANS_DFF_PO);
653: If g_body_debug_mode = 'Y' Then
654: write_log(LOG,'Processing DFFs for PO?'||G_TRANS_DFF_PO);
655: End if;
656: END IF;
4393: v_discount_start_date VARCHAR2(15);
4394:
4395: BEGIN
4396:
4397: select nvl(fnd_profile.value_specific('PA_DISC_PULL_START_DATE'),'2051/01/01') --bug4474213.
4398: INTO v_discount_start_date
4399: from DUAL;
4400: RETURN v_discount_start_date;
4401: