[Home] [Help]
585: BEGIN
586: l_account_found:=NULL;
587: SELECT 'x'
588: INTO l_account_found
589: FROM csi_ip_accounts
590: WHERE ip_account_id =p_party_account_tbl(l_acct_row).ip_account_id;
591: EXCEPTION
592: WHEN OTHERS THEN
593: l_account_found:=NULL;
745: CURSOR acct_csr (p_ins_pty_id IN NUMBER) IS
746: SELECT acct.party_account_id
747: ,acct.active_end_date
748: ,pty.instance_id
749: FROM csi_ip_accounts acct
750: ,csi_i_parties pty
751: WHERE acct.instance_party_id = p_ins_pty_id
752: AND acct.relationship_type_code = 'OWNER'
753: AND ((acct.active_end_date IS NULL) OR (acct.active_end_date>SYSDATE))
786: CURSOR exp_acct_csr (p_inst_party_id IN NUMBER) IS
787: SELECT ip_account_id,
788: relationship_type_code,
789: object_version_number
790: FROM csi_ip_accounts
791: WHERE instance_party_id=p_inst_party_id
792: AND relationship_type_code <>'OWNER'
793: AND nvl(active_end_date, sysdate+1) >= sysdate;
794: --end of fix
1055: IF l_party_rec.instance_party_id IS NOT NULL THEN
1056: BEGIN
1057: SELECT party_account_id
1058: INTO l_old_parent_owner_pty_acct_id
1059: FROM csi_ip_accounts
1060: WHERE instance_party_id = l_party_rec.instance_party_id
1061: AND relationship_type_code = 'OWNER';
1062: EXCEPTION
1063: WHEN NO_DATA_FOUND THEN
1076: AND p_party_account_tbl(l_row).ip_account_id <> fnd_api.g_miss_num
1077: THEN
1078: SELECT acct.object_version_number
1079: INTO l_obj_ver_number
1080: FROM csi_ip_accounts acct
1081: WHERE acct.ip_account_id= p_party_account_tbl(l_row).ip_account_id;
1082: END IF;
1083: EXCEPTION
1084: WHEN OTHERS THEN
1174: l_found := TRUE;
1175: BEGIN
1176: SELECT acct.object_version_number
1177: INTO p_party_account_tbl(l_arow).object_version_number
1178: FROM csi_ip_accounts acct
1179: WHERE acct.ip_account_id= p_party_account_tbl(l_arow).ip_account_id;
1180: EXCEPTION
1181: WHEN OTHERS THEN
1182: NULL;
1190: IF p_txn_rec.transaction_type_id = 7 THEN -- only for Account Merge
1191: BEGIN
1192: SELECT acct.object_version_number,acct.active_end_date
1193: INTO p_party_account_tbl(l_acct_row).object_version_number,l_end_date
1194: FROM csi_ip_accounts acct
1195: WHERE acct.ip_account_id= p_party_account_tbl(l_acct_row).ip_account_id;
1196: -- Commenting for bug 3692167 as it will fail the unique constraint.
1197: -- At any time there should be one active record in combination of
1198: -- (party_account_id,relationship_type_code) associated to an
1355: object_version_number
1356: INTO l_exp_acct_rec.ip_account_id,
1357: l_exp_acct_rec.relationship_type_code,
1358: l_exp_acct_rec.object_version_number
1359: FROM csi_ip_accounts
1360: WHERE instance_party_id=p_party_tbl(p_row).instance_party_id
1361: AND relationship_type_code ='OWNER'
1362: AND nvl(active_end_date, sysdate+1) >= sysdate;
1363: l_exp_acct_rec.active_end_date :=SYSDATE;
1477: ,l_ip_acct_rec.attribute12
1478: ,l_ip_acct_rec.attribute13
1479: ,l_ip_acct_rec.attribute14
1480: ,l_ip_acct_rec.attribute15
1481: FROM csi_ip_accounts
1482: WHERE instance_party_id = l_old_party_tbl(l_old_party_row).instance_party_id
1483: AND relationship_type_code = 'OWNER'
1484: AND SYSDATE BETWEEN nvl(active_start_date, SYSDATE-1)
1485: AND nvl(active_end_date, SYSDATE+1);
1583:
1584: BEGIN
1585: SELECT party_account_id
1586: INTO l_cld_party_acct_id
1587: FROM csi_ip_accounts
1588: WHERE instance_party_id = l_cld_party_rec.instance_party_id
1589: AND relationship_type_code = 'OWNER'
1590: AND SYSDATE BETWEEN nvl(active_start_date, sysdate-1)
1591: AND nvl(active_end_date, sysdate+1);
1615: IF l_cld_party_rec.instance_party_id IS NOT NULL THEN
1616: BEGIN
1617: SELECT party_account_id
1618: INTO l_old_child_owner_pty_acct_id
1619: FROM csi_ip_accounts
1620: WHERE instance_party_id = l_cld_party_rec.instance_party_id
1621: AND relationship_type_code = 'OWNER';
1622: EXCEPTION
1623: WHEN NO_DATA_FOUND THEN
1732: object_version_number
1733: INTO l_exp_acct_rec.ip_account_id,
1734: l_exp_acct_rec.relationship_type_code,
1735: l_exp_acct_rec.object_version_number
1736: FROM csi_ip_accounts
1737: WHERE instance_party_id=l_cld_party_rec.instance_party_id
1738: AND relationship_type_code ='OWNER';
1739: -- Bug 3804960
1740: -- srramakr Need to use the same the date used by the item instance
2115: l_select_stmt VARCHAR2(2000) := ' SELECT ip_account_id , instance_party_id, party_account_id, '||
2116: ' relationship_type_code, active_start_date, active_end_date,context , attribute1, '||
2117: ' attribute2, attribute3, attribute4, attribute5, attribute6, attribute7,attribute8, '||
2118: ' attribute9, attribute10,attribute11, attribute12,attribute13,attribute14,attribute15, '||
2119: ' object_version_number, bill_to_address, ship_to_address from csi_ip_accounts ';
2120:
2121:
2122: BEGIN
2123: -- Standard Start of API savepoint
2577: pty.party_id
2578: INTO l_temp_account_tbl(l_acct_row).ip_account_id,
2579: l_temp_account_tbl(l_acct_row).party_account_id,
2580: l_temp_account_tbl(l_acct_row).attribute1
2581: FROM csi_ip_accounts acct,
2582: csi_i_parties pty
2583: WHERE acct.ip_account_id = p_party_account_tbl(l_count).ip_account_id
2584: AND acct.instance_party_id = pty.instance_party_id;
2585:
2703: pty.party_id
2704: INTO l_party_account_tbl(l_old_party_row).ip_account_id,
2705: l_party_account_tbl(l_old_party_row).object_version_number,
2706: l_party_id
2707: FROM csi_ip_accounts acct,
2708: csi_i_parties pty
2709: WHERE pty.instance_party_id = acct.instance_party_id
2710: AND pty.instance_id = l_rel_tbl(j).subject_id
2711: AND acct.relationship_type_code = 'OWNER'