908: --Update the balances if the record exists in pa_bc_balances
909: FORALL i in l_PktIdTab.FIRST..l_PktIdTab.LAST
910: UPDATE pa_bc_balances pb
911: SET pb.last_update_date = sysdate,
912: pb.last_update_login = fnd_global.login_id,
913: pb.last_updated_by = fnd_global.user_id,
914: pb.request_id = fnd_global.conc_request_id,
915: pb.program_id = fnd_global.conc_program_id,
916: pb.program_application_id = fnd_global.prog_appl_id,
909: FORALL i in l_PktIdTab.FIRST..l_PktIdTab.LAST
910: UPDATE pa_bc_balances pb
911: SET pb.last_update_date = sysdate,
912: pb.last_update_login = fnd_global.login_id,
913: pb.last_updated_by = fnd_global.user_id,
914: pb.request_id = fnd_global.conc_request_id,
915: pb.program_id = fnd_global.conc_program_id,
916: pb.program_application_id = fnd_global.prog_appl_id,
917: pb.program_update_date = sysdate,
910: UPDATE pa_bc_balances pb
911: SET pb.last_update_date = sysdate,
912: pb.last_update_login = fnd_global.login_id,
913: pb.last_updated_by = fnd_global.user_id,
914: pb.request_id = fnd_global.conc_request_id,
915: pb.program_id = fnd_global.conc_program_id,
916: pb.program_application_id = fnd_global.prog_appl_id,
917: pb.program_update_date = sysdate,
918: pb.actual_period_to_date = nvl(pb.actual_period_to_date,0) +
911: SET pb.last_update_date = sysdate,
912: pb.last_update_login = fnd_global.login_id,
913: pb.last_updated_by = fnd_global.user_id,
914: pb.request_id = fnd_global.conc_request_id,
915: pb.program_id = fnd_global.conc_program_id,
916: pb.program_application_id = fnd_global.prog_appl_id,
917: pb.program_update_date = sysdate,
918: pb.actual_period_to_date = nvl(pb.actual_period_to_date,0) +
919: (nvl(l_PktAcctDrTab(i),0)- nvl(l_PktAcctCrTab(i),0)) *
912: pb.last_update_login = fnd_global.login_id,
913: pb.last_updated_by = fnd_global.user_id,
914: pb.request_id = fnd_global.conc_request_id,
915: pb.program_id = fnd_global.conc_program_id,
916: pb.program_application_id = fnd_global.prog_appl_id,
917: pb.program_update_date = sysdate,
918: pb.actual_period_to_date = nvl(pb.actual_period_to_date,0) +
919: (nvl(l_PktAcctDrTab(i),0)- nvl(l_PktAcctCrTab(i),0)) *
920: decode(l_PktDocTypTab(i),'EXP',1,0),
1091: l_PktPrjEncTypIdTab(k),
1092: l_PktOrgIdTab(k),
1093: l_PktCstBurdFlagTab(k),
1094: sysdate,
1095: FND_GLOBAL.USER_ID,
1096: FND_GLOBAL.USER_ID,
1097: sysdate,
1098: FND_GLOBAL.LOGIN_ID,
1099: 'P',
1092: l_PktOrgIdTab(k),
1093: l_PktCstBurdFlagTab(k),
1094: sysdate,
1095: FND_GLOBAL.USER_ID,
1096: FND_GLOBAL.USER_ID,
1097: sysdate,
1098: FND_GLOBAL.LOGIN_ID,
1099: 'P',
1100: fnd_global.conc_request_id,
1094: sysdate,
1095: FND_GLOBAL.USER_ID,
1096: FND_GLOBAL.USER_ID,
1097: sysdate,
1098: FND_GLOBAL.LOGIN_ID,
1099: 'P',
1100: fnd_global.conc_request_id,
1101: fnd_global.conc_program_id,
1102: fnd_global.prog_appl_id,
1096: FND_GLOBAL.USER_ID,
1097: sysdate,
1098: FND_GLOBAL.LOGIN_ID,
1099: 'P',
1100: fnd_global.conc_request_id,
1101: fnd_global.conc_program_id,
1102: fnd_global.prog_appl_id,
1103: sysdate
1104: --PA.M
1097: sysdate,
1098: FND_GLOBAL.LOGIN_ID,
1099: 'P',
1100: fnd_global.conc_request_id,
1101: fnd_global.conc_program_id,
1102: fnd_global.prog_appl_id,
1103: sysdate
1104: --PA.M
1105: ,l_PktDocLineIdTab(k)
1098: FND_GLOBAL.LOGIN_ID,
1099: 'P',
1100: fnd_global.conc_request_id,
1101: fnd_global.conc_program_id,
1102: fnd_global.prog_appl_id,
1103: sysdate
1104: --PA.M
1105: ,l_PktDocLineIdTab(k)
1106: ,l_PktCompMultiplierTab(k)
1179: pbc.bud_task_id = l_PktBdgtTaskTab(j),
1180: pbc.actual_flag = l_PktActFlagTab(j),
1181: pbc.encumbrance_type_id = l_PktEncTypIdTab(j),
1182: pbc.proj_encumbrance_type_id = l_PktPrjEncTypIdTab(j),
1183: pbc.last_updated_by = fnd_global.user_id,
1184: pbc.last_update_date = sysdate,
1185: pbc.last_update_login = fnd_global.login_id,
1186: pbc.request_id = fnd_global.conc_request_id,
1187: pbc.program_id = fnd_global.conc_program_id,
1181: pbc.encumbrance_type_id = l_PktEncTypIdTab(j),
1182: pbc.proj_encumbrance_type_id = l_PktPrjEncTypIdTab(j),
1183: pbc.last_updated_by = fnd_global.user_id,
1184: pbc.last_update_date = sysdate,
1185: pbc.last_update_login = fnd_global.login_id,
1186: pbc.request_id = fnd_global.conc_request_id,
1187: pbc.program_id = fnd_global.conc_program_id,
1188: pbc.program_application_id = fnd_global.prog_appl_id,
1189: pbc.program_update_date = sysdate,
1182: pbc.proj_encumbrance_type_id = l_PktPrjEncTypIdTab(j),
1183: pbc.last_updated_by = fnd_global.user_id,
1184: pbc.last_update_date = sysdate,
1185: pbc.last_update_login = fnd_global.login_id,
1186: pbc.request_id = fnd_global.conc_request_id,
1187: pbc.program_id = fnd_global.conc_program_id,
1188: pbc.program_application_id = fnd_global.prog_appl_id,
1189: pbc.program_update_date = sysdate,
1190: pbc.budget_line_id = l_PktBudgetLineIdTab(j)
1183: pbc.last_updated_by = fnd_global.user_id,
1184: pbc.last_update_date = sysdate,
1185: pbc.last_update_login = fnd_global.login_id,
1186: pbc.request_id = fnd_global.conc_request_id,
1187: pbc.program_id = fnd_global.conc_program_id,
1188: pbc.program_application_id = fnd_global.prog_appl_id,
1189: pbc.program_update_date = sysdate,
1190: pbc.budget_line_id = l_PktBudgetLineIdTab(j)
1191: where ((pbc.bc_commitment_id = l_PktBcCommTab(j))
1184: pbc.last_update_date = sysdate,
1185: pbc.last_update_login = fnd_global.login_id,
1186: pbc.request_id = fnd_global.conc_request_id,
1187: pbc.program_id = fnd_global.conc_program_id,
1188: pbc.program_application_id = fnd_global.prog_appl_id,
1189: pbc.program_update_date = sysdate,
1190: pbc.budget_line_id = l_PktBudgetLineIdTab(j)
1191: where ((pbc.bc_commitment_id = l_PktBcCommTab(j))
1192: or (l_PktBcCommTab(j) is null
1250: UPDATE pa_bc_packets pbc
1251: SET pbc.status_code = 'X',
1252: pbc.balance_posted_flag = 'Y',
1253: pbc.last_update_date = sysdate,
1254: pbc.last_update_login = fnd_global.login_id,
1255: pbc.last_updated_by = fnd_global.user_id
1256: WHERE pbc.status_code = 'A'
1257: AND pbc.packet_id = l_StsUpdPktIdTab(m)
1258: AND pbc.bc_packet_id = l_StsUpdBcPktIdTab(m)
1251: SET pbc.status_code = 'X',
1252: pbc.balance_posted_flag = 'Y',
1253: pbc.last_update_date = sysdate,
1254: pbc.last_update_login = fnd_global.login_id,
1255: pbc.last_updated_by = fnd_global.user_id
1256: WHERE pbc.status_code = 'A'
1257: AND pbc.packet_id = l_StsUpdPktIdTab(m)
1258: AND pbc.bc_packet_id = l_StsUpdBcPktIdTab(m)
1259: AND pbc.balance_posted_flag = 'N'
1397: l_InsSobTab(p),
1398: l_InsBdgtVerTab(p),
1399: l_InsDocTypTab(p),
1400: sysdate,
1401: FND_GLOBAL.USER_ID,
1402: FND_GLOBAL.USER_ID,
1403: sysdate,
1404: FND_GLOBAL.LOGIN_ID,
1405: --GetBCBalStartDate(l_InsTPCTab(p),l_InsProjectTab(p),l_InsEiDateTab(p),
1398: l_InsBdgtVerTab(p),
1399: l_InsDocTypTab(p),
1400: sysdate,
1401: FND_GLOBAL.USER_ID,
1402: FND_GLOBAL.USER_ID,
1403: sysdate,
1404: FND_GLOBAL.LOGIN_ID,
1405: --GetBCBalStartDate(l_InsTPCTab(p),l_InsProjectTab(p),l_InsEiDateTab(p),
1406: -- l_InsBdgtVerTab(p),l_InsSobTab(p),l_InsOrgIdTab(p)),
1400: sysdate,
1401: FND_GLOBAL.USER_ID,
1402: FND_GLOBAL.USER_ID,
1403: sysdate,
1404: FND_GLOBAL.LOGIN_ID,
1405: --GetBCBalStartDate(l_InsTPCTab(p),l_InsProjectTab(p),l_InsEiDateTab(p),
1406: -- l_InsBdgtVerTab(p),l_InsSobTab(p),l_InsOrgIdTab(p)),
1407: --GetBCBalEndDate(l_InsTPCTab(p),l_InsProjectTab(p),l_InsEiDateTab(p),
1408: -- l_InsBdgtVerTab(p),l_InsSobTab(p),l_InsOrgIdTab(p)),
1411: l_InsParResTab(p),
1412: 0,
1413: l_InsActPTDTab(p),
1414: l_InsEncPTDTab(p),
1415: fnd_global.conc_request_id,
1416: fnd_global.conc_program_id,
1417: fnd_global.prog_appl_id,
1418: sysdate
1419: from dual where l_InsDocTypTab(p) in ('EXP', 'AP','PO','REQ','CC_C_CO','CC_P_CO','CC_C_PAY','CC_P_PAY');
1412: 0,
1413: l_InsActPTDTab(p),
1414: l_InsEncPTDTab(p),
1415: fnd_global.conc_request_id,
1416: fnd_global.conc_program_id,
1417: fnd_global.prog_appl_id,
1418: sysdate
1419: from dual where l_InsDocTypTab(p) in ('EXP', 'AP','PO','REQ','CC_C_CO','CC_P_CO','CC_C_PAY','CC_P_PAY');
1420:
1413: l_InsActPTDTab(p),
1414: l_InsEncPTDTab(p),
1415: fnd_global.conc_request_id,
1416: fnd_global.conc_program_id,
1417: fnd_global.prog_appl_id,
1418: sysdate
1419: from dual where l_InsDocTypTab(p) in ('EXP', 'AP','PO','REQ','CC_C_CO','CC_P_CO','CC_C_PAY','CC_P_PAY');
1420:
1421: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1433: UPDATE pa_bc_packets pbc
1434: SET pbc.status_code = 'X',
1435: pbc.balance_posted_flag = 'Y',
1436: pbc.last_update_date = sysdate,
1437: pbc.last_update_login = fnd_global.login_id,
1438: pbc.last_updated_by = fnd_global.user_id
1439: WHERE pbc.status_code = 'A'
1440: AND pbc.project_id = l_InsProjectTab(m)
1441: AND pbc.task_id = l_InsTaskTab(m)
1434: SET pbc.status_code = 'X',
1435: pbc.balance_posted_flag = 'Y',
1436: pbc.last_update_date = sysdate,
1437: pbc.last_update_login = fnd_global.login_id,
1438: pbc.last_updated_by = fnd_global.user_id
1439: WHERE pbc.status_code = 'A'
1440: AND pbc.project_id = l_InsProjectTab(m)
1441: AND pbc.task_id = l_InsTaskTab(m)
1442: AND pbc.balance_posted_flag = 'N'