[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';
622:
623: END IF;
624:
625: G_err_stage := 'FETCHING PROFILE OPTION: COMMIT SIZE';
626: fnd_profile.get(G_PROFILE_NAME, v_commit_size);
627:
628: G_COMMIT_SIZE := to_number(v_commit_size);
629:
630: IF (G_COMMIT_SIZE <= 0) THEN
643: /* Get the profile option of whether to transfer DFF from AP */
644: G_err_stage := 'FETCHING PROFILE OPTION: TRANS DFF FROM AP';
645:
646: G_PROFILE_NAME := 'PA_TRANSFER_DFF_AP';
647: fnd_profile.get(G_PROFILE_NAME, G_TRANS_DFF_AP);
648: If g_body_debug_mode = 'Y' Then
649: write_log(LOG,'Processing DFFs for AP?'||G_TRANS_DFF_AP);
650: End If;
651: IF p_process_receipts = 'Y' THEN
650: End If;
651: IF p_process_receipts = 'Y' THEN
652:
653: G_PROFILE_NAME := 'PA_TRANSFER_DFF_PO';
654: fnd_profile.get(G_PROFILE_NAME, G_TRANS_DFF_PO);
655: If g_body_debug_mode = 'Y' Then
656: write_log(LOG,'Processing DFFs for PO?'||G_TRANS_DFF_PO);
657: End if;
658: END IF;
5549: v_discount_start_date VARCHAR2(15);
5550:
5551: BEGIN
5552:
5553: select nvl(fnd_profile.value_specific('PA_DISC_PULL_START_DATE'),'2051/01/01') --bug4474213.
5554: INTO v_discount_start_date
5555: from DUAL;
5556: RETURN v_discount_start_date;
5557: