1979:
1980: END IF;
1981:
1982: p_system_user := 5;
1983: p_user_id := FND_GLOBAL.user_id;
1984:
1985: l_debug_info := 'Retrieving tolerances for validation';
1986: Print_Debug(l_debug_loc, l_debug_info);
1987:
3672: ap_utilities_pkg.ap_round_currency(
3673: amount * p_exchange_rate,
3674: p_base_currency_code)),
3675: AIL.last_update_date = SYSDATE,
3676: AIL.last_updated_by = FND_GLOBAL.user_id,
3677: AIL.last_update_login = FND_GLOBAL.login_id
3678: WHERE AIL.invoice_id = p_invoice_id
3679: -- Bug 6621883
3680: AND (EXISTS ( SELECT 'NOT POSTED'
3673: amount * p_exchange_rate,
3674: p_base_currency_code)),
3675: AIL.last_update_date = SYSDATE,
3676: AIL.last_updated_by = FND_GLOBAL.user_id,
3677: AIL.last_update_login = FND_GLOBAL.login_id
3678: WHERE AIL.invoice_id = p_invoice_id
3679: -- Bug 6621883
3680: AND (EXISTS ( SELECT 'NOT POSTED'
3681: FROM ap_invoice_distributions_all D
3749: UPDATE AP_INVOICE_LINES
3750: SET base_amount = l_base_amt,
3751: rounding_amt = ABS( NVL(l_modified_line_rounding_amt, 0) ),
3752: last_update_date = SYSDATE,
3753: last_updated_by = FND_GLOBAL.user_id,
3754: last_update_login = FND_GLOBAL.login_id
3755: WHERE invoice_id = p_invoice_id
3756: AND line_number = l_round_inv_line_numbers(i);
3757: ELSE--adjustment not required or there are no lines that can be adjusted
3750: SET base_amount = l_base_amt,
3751: rounding_amt = ABS( NVL(l_modified_line_rounding_amt, 0) ),
3752: last_update_date = SYSDATE,
3753: last_updated_by = FND_GLOBAL.user_id,
3754: last_update_login = FND_GLOBAL.login_id
3755: WHERE invoice_id = p_invoice_id
3756: AND line_number = l_round_inv_line_numbers(i);
3757: ELSE--adjustment not required or there are no lines that can be adjusted
3758: EXIT;
3844: NULL, ap_utilities_pkg.ap_round_currency(
3845: amount * p_invoice_exchange_rate,
3846: p_base_currency_code)),
3847: last_update_date = SYSDATE,
3848: last_updated_by = FND_GLOBAL.user_id,
3849: last_update_login = FND_GLOBAL.login_id
3850: WHERE invoice_id = p_invoice_id
3851: AND invoice_line_number = p_invoice_line_number
3852: AND NVL(posted_flag,'N') = 'N'
3845: amount * p_invoice_exchange_rate,
3846: p_base_currency_code)),
3847: last_update_date = SYSDATE,
3848: last_updated_by = FND_GLOBAL.user_id,
3849: last_update_login = FND_GLOBAL.login_id
3850: WHERE invoice_id = p_invoice_id
3851: AND invoice_line_number = p_invoice_line_number
3852: AND NVL(posted_flag,'N') = 'N'
3853: --Bugfix:4625771
3902: UPDATE AP_INVOICE_DISTRIBUTIONS
3903: SET base_amount = l_base_amt,
3904: rounding_amt = ABS( l_modified_dist_rounding_amt ),
3905: last_update_date = SYSDATE,
3906: last_updated_by = FND_GLOBAL.user_id,
3907: last_update_login = FND_GLOBAL.login_id
3908: WHERE invoice_distribution_id = l_round_dist_id_list(i);
3909:
3910: ELSE
3903: SET base_amount = l_base_amt,
3904: rounding_amt = ABS( l_modified_dist_rounding_amt ),
3905: last_update_date = SYSDATE,
3906: last_updated_by = FND_GLOBAL.user_id,
3907: last_update_login = FND_GLOBAL.login_id
3908: WHERE invoice_distribution_id = l_round_dist_id_list(i);
3909:
3910: ELSE
3911: --adjustment not required or there are no dists that can be adjusted
4730: UPDATE ap_invoice_distributions D
4731: SET match_status_flag = 'T',
4732: last_update_date = SYSDATE,
4733: last_updated_by = p_user_id,
4734: program_application_id = decode(fnd_global.prog_appl_id,
4735: -1,null,
4736: fnd_global.prog_appl_id),
4737: request_id = decode(fnd_global.conc_request_id,
4738: -1,null, fnd_global.conc_request_id),
4732: last_update_date = SYSDATE,
4733: last_updated_by = p_user_id,
4734: program_application_id = decode(fnd_global.prog_appl_id,
4735: -1,null,
4736: fnd_global.prog_appl_id),
4737: request_id = decode(fnd_global.conc_request_id,
4738: -1,null, fnd_global.conc_request_id),
4739: program_id = decode(fnd_global.conc_program_id,
4740: -1,null, fnd_global.conc_program_id),
4733: last_updated_by = p_user_id,
4734: program_application_id = decode(fnd_global.prog_appl_id,
4735: -1,null,
4736: fnd_global.prog_appl_id),
4737: request_id = decode(fnd_global.conc_request_id,
4738: -1,null, fnd_global.conc_request_id),
4739: program_id = decode(fnd_global.conc_program_id,
4740: -1,null, fnd_global.conc_program_id),
4741: program_update_date = decode(fnd_global.conc_program_id,
4734: program_application_id = decode(fnd_global.prog_appl_id,
4735: -1,null,
4736: fnd_global.prog_appl_id),
4737: request_id = decode(fnd_global.conc_request_id,
4738: -1,null, fnd_global.conc_request_id),
4739: program_id = decode(fnd_global.conc_program_id,
4740: -1,null, fnd_global.conc_program_id),
4741: program_update_date = decode(fnd_global.conc_program_id,
4742: -1,null, SYSDATE)
4735: -1,null,
4736: fnd_global.prog_appl_id),
4737: request_id = decode(fnd_global.conc_request_id,
4738: -1,null, fnd_global.conc_request_id),
4739: program_id = decode(fnd_global.conc_program_id,
4740: -1,null, fnd_global.conc_program_id),
4741: program_update_date = decode(fnd_global.conc_program_id,
4742: -1,null, SYSDATE)
4743: WHERE match_status_flag = 'S'
4736: fnd_global.prog_appl_id),
4737: request_id = decode(fnd_global.conc_request_id,
4738: -1,null, fnd_global.conc_request_id),
4739: program_id = decode(fnd_global.conc_program_id,
4740: -1,null, fnd_global.conc_program_id),
4741: program_update_date = decode(fnd_global.conc_program_id,
4742: -1,null, SYSDATE)
4743: WHERE match_status_flag = 'S'
4744: AND D.invoice_id = p_invoice_id;
4737: request_id = decode(fnd_global.conc_request_id,
4738: -1,null, fnd_global.conc_request_id),
4739: program_id = decode(fnd_global.conc_program_id,
4740: -1,null, fnd_global.conc_program_id),
4741: program_update_date = decode(fnd_global.conc_program_id,
4742: -1,null, SYSDATE)
4743: WHERE match_status_flag = 'S'
4744: AND D.invoice_id = p_invoice_id;
4745:
4747: UPDATE ap_self_assessed_tax_dist_all D
4748: SET match_status_flag = 'T',
4749: last_update_date = SYSDATE,
4750: last_updated_by = p_user_id,
4751: program_application_id = decode(fnd_global.prog_appl_id,
4752: -1,null,
4753: fnd_global.prog_appl_id),
4754: request_id = decode(fnd_global.conc_request_id,
4755: -1,null, fnd_global.conc_request_id),
4749: last_update_date = SYSDATE,
4750: last_updated_by = p_user_id,
4751: program_application_id = decode(fnd_global.prog_appl_id,
4752: -1,null,
4753: fnd_global.prog_appl_id),
4754: request_id = decode(fnd_global.conc_request_id,
4755: -1,null, fnd_global.conc_request_id),
4756: program_id = decode(fnd_global.conc_program_id,
4757: -1,null, fnd_global.conc_program_id),
4750: last_updated_by = p_user_id,
4751: program_application_id = decode(fnd_global.prog_appl_id,
4752: -1,null,
4753: fnd_global.prog_appl_id),
4754: request_id = decode(fnd_global.conc_request_id,
4755: -1,null, fnd_global.conc_request_id),
4756: program_id = decode(fnd_global.conc_program_id,
4757: -1,null, fnd_global.conc_program_id),
4758: program_update_date = decode(fnd_global.conc_program_id,
4751: program_application_id = decode(fnd_global.prog_appl_id,
4752: -1,null,
4753: fnd_global.prog_appl_id),
4754: request_id = decode(fnd_global.conc_request_id,
4755: -1,null, fnd_global.conc_request_id),
4756: program_id = decode(fnd_global.conc_program_id,
4757: -1,null, fnd_global.conc_program_id),
4758: program_update_date = decode(fnd_global.conc_program_id,
4759: -1,null, SYSDATE)
4752: -1,null,
4753: fnd_global.prog_appl_id),
4754: request_id = decode(fnd_global.conc_request_id,
4755: -1,null, fnd_global.conc_request_id),
4756: program_id = decode(fnd_global.conc_program_id,
4757: -1,null, fnd_global.conc_program_id),
4758: program_update_date = decode(fnd_global.conc_program_id,
4759: -1,null, SYSDATE)
4760: WHERE match_status_flag = 'S'
4753: fnd_global.prog_appl_id),
4754: request_id = decode(fnd_global.conc_request_id,
4755: -1,null, fnd_global.conc_request_id),
4756: program_id = decode(fnd_global.conc_program_id,
4757: -1,null, fnd_global.conc_program_id),
4758: program_update_date = decode(fnd_global.conc_program_id,
4759: -1,null, SYSDATE)
4760: WHERE match_status_flag = 'S'
4761: AND D.invoice_id = p_invoice_id;
4754: request_id = decode(fnd_global.conc_request_id,
4755: -1,null, fnd_global.conc_request_id),
4756: program_id = decode(fnd_global.conc_program_id,
4757: -1,null, fnd_global.conc_program_id),
4758: program_update_date = decode(fnd_global.conc_program_id,
4759: -1,null, SYSDATE)
4760: WHERE match_status_flag = 'S'
4761: AND D.invoice_id = p_invoice_id;
4762: --Bug6963908
6962: l_dist_tab(i).awt_group_id := p_invoice_line_rec.awt_group_id;
6963: l_dist_tab(i).inventory_transfer_status := 'N';
6964: l_dist_tab(i).intended_use := p_invoice_line_rec.primary_intended_use;
6965: l_dist_tab(i).rcv_charge_addition_flag := 'N';
6966: l_dist_tab(i).created_by := FND_GLOBAL.user_id;
6967: l_dist_tab(i).creation_date := SYSDATE;
6968: l_dist_tab(i).last_update_date := SYSDATE;
6969: l_dist_tab(i).last_update_login := FND_GLOBAL.login_id;
6970: l_dist_tab(i).last_updated_by := FND_GLOBAL.user_id;
6965: l_dist_tab(i).rcv_charge_addition_flag := 'N';
6966: l_dist_tab(i).created_by := FND_GLOBAL.user_id;
6967: l_dist_tab(i).creation_date := SYSDATE;
6968: l_dist_tab(i).last_update_date := SYSDATE;
6969: l_dist_tab(i).last_update_login := FND_GLOBAL.login_id;
6970: l_dist_tab(i).last_updated_by := FND_GLOBAL.user_id;
6971:
6972: END LOOP;
6973:
6966: l_dist_tab(i).created_by := FND_GLOBAL.user_id;
6967: l_dist_tab(i).creation_date := SYSDATE;
6968: l_dist_tab(i).last_update_date := SYSDATE;
6969: l_dist_tab(i).last_update_login := FND_GLOBAL.login_id;
6970: l_dist_tab(i).last_updated_by := FND_GLOBAL.user_id;
6971:
6972: END LOOP;
6973:
6974: END IF; /* If l_exp_report_dists_tab.count > 0 */
8206: nvl(fp.non_recoverable_tax_flag, 'N') non_recoverable_tax_flag,
8207: nvl(disc_is_inv_less_tax_flag,'N') disc_is_inv_less_tax_flag,
8208: fp.org_id org_id,
8209: 5 System_User,
8210: fnd_global.user_id User_Id
8211: FROM ap_system_parameters_all sp,
8212: financials_system_params_all fp,
8213: gl_sets_of_books gls,
8214: Mo_Glob_Org_Access_Tmp mo