[Home] [Help]
3:
4: g_module_name VARCHAR2(200) := 'fv.plsql.fv_treasury_payments_pkg.';
5: g_errmsg VARCHAR2(1000);
6: g_ledger_id gl_ledgers.ledger_id%TYPE;
7: g_org_id fv_operating_units.org_id%TYPE;
8: g_treasury_conf_id fv_treasury_confirmations.treasury_confirmation_id%TYPE;
9: g_accounting_date fv_treasury_confirmations.treasury_doc_date%TYPE;
10: g_payment_instr_id iby_pay_instructions_all.payment_instruction_id%TYPE;
11: g_checkrun_name ap_checks_all.checkrun_name%TYPE;
37: ,p_button_name IN VARCHAR2)
38: IS
39: l_module_name VARCHAR2(200);
40: l_dummy NUMBER;
41: l_dit_flag fv_operating_units.dit_flag%TYPE;
42: X_status_code VARCHAR2(100);
43: X_return_status VARCHAR2(100);
44: BEGIN
45: l_module_name := g_module_name || 'Main ';
109: WHERE treasury_confirmation_id = g_treasury_conf_id;
110:
111: /* Bug: 5727409 - getting open period accounting date */
112: get_open_period(g_accounting_date);
113: --Check whether dit_flag is enabled in fv_operating_units table
114: g_dit_flag := Null;
115:
116: SELECT dit_flag
117: INTO l_dit_flag
114: g_dit_flag := Null;
115:
116: SELECT dit_flag
117: INTO l_dit_flag
118: FROM fv_operating_units
119: where org_id = g_org_id ;
120:
121: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
122: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,