DBA Data[Home] [Help]

APPS.JL_CMERGE dependencies on JL_BR_BALANCES

Line 810: -- JL_BR_BALANCES_UPD --

806:
807:
808: ----------------------------------------------------------------------------
809: -- PROCEDURE --
810: -- JL_BR_BALANCES_UPD --
811: -- --
812: -- DESCRIPTION --
813: -- Merge duplicate customer_id stored in column of --
814: -- JL_BR_BALANCES_ALL that refers to cust_account_id column of --

Line 814: -- JL_BR_BALANCES_ALL that refers to cust_account_id column of --

810: -- JL_BR_BALANCES_UPD --
811: -- --
812: -- DESCRIPTION --
813: -- Merge duplicate customer_id stored in column of --
814: -- JL_BR_BALANCES_ALL that refers to cust_account_id column of --
815: -- HZ_CUST_ACCOUNTS --
816: -- --
817: -- PURPOSE: --
818: -- Oracle Applications Rel 11.5 --

Line 829: PROCEDURE jl_br_balances_upd (req_id NUMBER,

825: -- HISTORY: --
826: -- 06/26/01 Rafael Guerrero Created --
827: ----------------------------------------------------------------------------
828:
829: PROCEDURE jl_br_balances_upd (req_id NUMBER,
830: set_num NUMBER,
831: process_mode VARCHAR2)
832: IS
833:

Line 837: FROM jl_br_balances_all

833:
834: /*
835: CURSOR c1 IS
836: SELECT SET_OF_BOOKS_ID
837: FROM jl_br_balances_all
838: WHERE (personnel_id) IN (SELECT unique m.duplicate_id
839: FROM ra_customer_merges m
840: WHERE m.process_flag = 'N'
841: AND m.request_id = req_id

Line 853: JL_BR_BALANCES_ALL.application_id%TYPE

849: INDEX BY BINARY_INTEGER;
850: MERGE_HEADER_ID_LIST MERGE_HEADER_ID_LIST_TYPE;
851:
852: TYPE application_id_LIST_TYPE IS TABLE OF
853: JL_BR_BALANCES_ALL.application_id%TYPE
854: INDEX BY BINARY_INTEGER;
855: PRIMARY_KEY1_LIST application_id_LIST_TYPE;
856:
857: TYPE set_of_books_id_LIST_TYPE IS TABLE OF

Line 858: JL_BR_BALANCES_ALL.set_of_books_id%TYPE

854: INDEX BY BINARY_INTEGER;
855: PRIMARY_KEY1_LIST application_id_LIST_TYPE;
856:
857: TYPE set_of_books_id_LIST_TYPE IS TABLE OF
858: JL_BR_BALANCES_ALL.set_of_books_id%TYPE
859: INDEX BY BINARY_INTEGER;
860: PRIMARY_KEY2_LIST set_of_books_id_LIST_TYPE;
861:
862: TYPE period_set_name_LIST_TYPE IS TABLE OF

Line 863: JL_BR_BALANCES_ALL.period_set_name%TYPE

859: INDEX BY BINARY_INTEGER;
860: PRIMARY_KEY2_LIST set_of_books_id_LIST_TYPE;
861:
862: TYPE period_set_name_LIST_TYPE IS TABLE OF
863: JL_BR_BALANCES_ALL.period_set_name%TYPE
864: INDEX BY BINARY_INTEGER;
865: PRIMARY_KEY3_LIST period_set_name_LIST_TYPE;
866:
867: TYPE period_name_LIST_TYPE IS TABLE OF

Line 868: JL_BR_BALANCES_ALL.period_name%TYPE

864: INDEX BY BINARY_INTEGER;
865: PRIMARY_KEY3_LIST period_set_name_LIST_TYPE;
866:
867: TYPE period_name_LIST_TYPE IS TABLE OF
868: JL_BR_BALANCES_ALL.period_name%TYPE
869: INDEX BY BINARY_INTEGER;
870: PRIMARY_KEY4_LIST period_name_LIST_TYPE;
871:
872: TYPE code_combination_id_LIST_TYPE IS TABLE OF

Line 873: JL_BR_BALANCES_ALL.code_combination_id%TYPE

869: INDEX BY BINARY_INTEGER;
870: PRIMARY_KEY4_LIST period_name_LIST_TYPE;
871:
872: TYPE code_combination_id_LIST_TYPE IS TABLE OF
873: JL_BR_BALANCES_ALL.code_combination_id%TYPE
874: INDEX BY BINARY_INTEGER;
875: PRIMARY_KEY5_LIST code_combination_id_LIST_TYPE;
876:
877: TYPE personnel_id_LIST_TYPE IS TABLE OF

Line 878: JL_BR_BALANCES_ALL.personnel_id%TYPE

874: INDEX BY BINARY_INTEGER;
875: PRIMARY_KEY5_LIST code_combination_id_LIST_TYPE;
876:
877: TYPE personnel_id_LIST_TYPE IS TABLE OF
878: JL_BR_BALANCES_ALL.personnel_id%TYPE
879: INDEX BY BINARY_INTEGER;
880: PRIMARY_KEY6_LIST personnel_id_LIST_TYPE;
881:
882: NUM_COL1_ORIG_LIST personnel_id_LIST_TYPE;

Line 886: JL_BR_BALANCES_ALL.ending_balance%TYPE

882: NUM_COL1_ORIG_LIST personnel_id_LIST_TYPE;
883: NUM_COL1_NEW_LIST personnel_id_LIST_TYPE;
884:
885: TYPE ending_balance_LIST_TYPE IS TABLE OF
886: JL_BR_BALANCES_ALL.ending_balance%TYPE
887: INDEX BY BINARY_INTEGER;
888: NUM_COL2_ORIG_LIST ending_balance_LIST_TYPE;
889: NUM_COL2_NEW_LIST ending_balance_LIST_TYPE;
890:

Line 892: JL_BR_BALANCES_ALL.org_id%TYPE

888: NUM_COL2_ORIG_LIST ending_balance_LIST_TYPE;
889: NUM_COL2_NEW_LIST ending_balance_LIST_TYPE;
890:
891: TYPE org_id_LIST_TYPE IS TABLE OF
892: JL_BR_BALANCES_ALL.org_id%TYPE
893: INDEX BY BINARY_INTEGER;
894: NUM_COL3_ORIG_LIST org_id_LIST_TYPE;
895: NUM_COL3_NEW_LIST org_id_LIST_TYPE;
896:

Line 898: JL_BR_BALANCES_ALL.ending_balance_sign%TYPE

894: NUM_COL3_ORIG_LIST org_id_LIST_TYPE;
895: NUM_COL3_NEW_LIST org_id_LIST_TYPE;
896:
897: TYPE ending_balance_sign_LIST_TYPE IS TABLE OF
898: JL_BR_BALANCES_ALL.ending_balance_sign%TYPE
899: INDEX BY BINARY_INTEGER;
900: NUM_COL4_ORIG_LIST ending_balance_sign_LIST_TYPE;
901: NUM_COL4_NEW_LIST ending_balance_sign_LIST_TYPE;
902:

Line 904: JL_BR_BALANCES_ALL.period_year%TYPE

900: NUM_COL4_ORIG_LIST ending_balance_sign_LIST_TYPE;
901: NUM_COL4_NEW_LIST ending_balance_sign_LIST_TYPE;
902:
903: TYPE period_year_LIST_TYPE IS TABLE OF
904: JL_BR_BALANCES_ALL.period_year%TYPE
905: INDEX BY BINARY_INTEGER;
906: NUM_COL5_ORIG_LIST period_year_LIST_TYPE;
907: NUM_COL5_NEW_LIST period_year_LIST_TYPE;
908:

Line 910: JL_BR_BALANCES_ALL.period_num%TYPE

906: NUM_COL5_ORIG_LIST period_year_LIST_TYPE;
907: NUM_COL5_NEW_LIST period_year_LIST_TYPE;
908:
909: TYPE period_num_LIST_TYPE IS TABLE OF
910: JL_BR_BALANCES_ALL.period_num%TYPE
911: INDEX BY BINARY_INTEGER;
912: NUM_COL6_ORIG_LIST period_num_LIST_TYPE;
913: NUM_COL6_NEW_LIST period_num_LIST_TYPE;
914:

Line 932: FROM JL_BR_BALANCES_ALL yt,

928: ,yt.org_id
929: ,yt.ending_balance_sign
930: ,yt.period_year
931: ,yt.period_num
932: FROM JL_BR_BALANCES_ALL yt,
933: ra_customer_merges m
934: WHERE (yt.personnel_id = m.duplicate_id)
935: AND m.process_flag = 'N'
936: AND m.request_id = req_id

Line 1047: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','JL_BR_BALANCES_ALL',FALSE);

1043:
1044: x_profile_org:=fnd_profile.value ('ORG_ID');
1045:
1046: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
1047: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','JL_BR_BALANCES_ALL',FALSE);
1048: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
1049:
1050: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
1051:

Line 1098: from jl_br_balances

1094: ----------------------------------------------------------
1095:
1096: select nvl(max(period_year),0)
1097: into pl_max_pyear
1098: from jl_br_balances
1099: where application_id = 222
1100: and set_of_books_id = r_bmb.sob
1101: and period_set_name = r_bmb.perset;
1102:

Line 1111: from jl_br_balances

1107: ---------------------------------------------------------------
1108:
1109: select nvl(max(period_num),0)
1110: into pl_max_pnum
1111: from jl_br_balances
1112: where application_id = 222
1113: and set_of_books_id = r_bmb.sob
1114: and period_set_name = r_bmb.perset
1115: and period_year = pl_max_pyear;

Line 1125: from jl_br_balances

1121: ----------------------------------------------------------------------------
1122:
1123: select nvl(min(period_year),0)
1124: into pl_min_pyear
1125: from jl_br_balances
1126: where application_id = 222
1127: and set_of_books_id = r_bmb.sob
1128: and period_set_name = r_bmb.perset
1129: and code_combination_id = r_bmb.ccid

Line 1140: FROM jl_br_balances

1136: -------------------------------------------------------------------------------
1137:
1138: SELECT NVL(MIN(period_num),0)
1139: INTO pl_min_pnum
1140: FROM jl_br_balances
1141: WHERE application_id = 222
1142: AND set_of_books_id = r_bmb.sob
1143: AND period_set_name = r_bmb.perset
1144: AND code_combination_id = r_bmb.ccid

Line 1173: INSERT INTO jl_br_balances

1169: r_bmb.pnum > pl_max_pnum) THEN
1170:
1171: BEGIN
1172:
1173: INSERT INTO jl_br_balances
1174: (application_id,
1175: set_of_books_id,
1176: period_set_name,
1177: period_name,

Line 1208: FROM jl_br_balances

1204: pl_user,
1205: sysdate,
1206: pl_user,
1207: r_bmb.org_id
1208: FROM jl_br_balances
1209: WHERE application_id = 222
1210: AND set_of_books_id = r_bmb.sob
1211: AND period_year = pl_max_pyear
1212: AND period_num = pl_max_pnum;

Line 1223: INSERT INTO jl_br_balances

1219: -----------------------------------------------------------------------------------
1220:
1221: IF r_bmb.pyear = pl_max_pyear THEN
1222:
1223: INSERT INTO jl_br_balances
1224: (application_id,
1225: set_of_books_id,
1226: period_set_name,
1227: period_name,

Line 1255: FROM jl_br_balances b,

1251: sysdate,
1252: sysdate,
1253: pl_user,
1254: b.org_id
1255: FROM jl_br_balances b,
1256: gl_periods g
1257: WHERE b.application_id = 222
1258: and b.period_set_name = g.period_set_name
1259: and b.period_year = g.period_year

Line 1280: INSERT INTO jl_br_balances

1276: exit when c_per%NOTFOUND;
1277:
1278: BEGIN
1279:
1280: INSERT INTO jl_br_balances
1281: (application_id,
1282: set_of_books_id,
1283: period_set_name,
1284: period_name,

Line 1312: FROM jl_br_balances

1308: sysdate,
1309: sysdate,
1310: pl_user,
1311: r_bmb.org_id
1312: FROM jl_br_balances
1313: WHERE application_id = 222
1314: and set_of_books_id = r_bmb.sob
1315: and period_set_name = r_bmb.perset
1316: and period_year = pl_max_pyear

Line 1336: After insert new lines to jl_br_balances to new periods,

1332:
1333: END;
1334:
1335: /**************************************************************
1336: After insert new lines to jl_br_balances to new periods,
1337: update pl_max_pyear and pl_max_pnum.
1338: ***************************************************************/
1339: pl_max_pyear := pl_pyear;
1340: pl_max_pnum := pl_pnum;

Line 1357: INSERT INTO jl_br_balances

1353: (r_bmb.pyear = pl_min_pyear AND
1354: r_bmb.pnum < pl_min_pnum) THEN
1355:
1356: BEGIN
1357: INSERT INTO jl_br_balances
1358: (application_id,
1359: set_of_books_id,
1360: period_set_name,
1361: period_name,

Line 1411: After insert new lines to jl_br_balances to new periods,

1407: WHEN NO_DATA_FOUND THEN NULL; -- No periods to treat
1408: END;
1409:
1410: /**************************************************************
1411: After insert new lines to jl_br_balances to new periods,
1412: update pl_min_pyear and pl_min_pnum.
1413: ***************************************************************/
1414: pl_min_pyear := pl_pyear;
1415: pl_min_pnum := pl_pnum;

Line 1425: UPDATE jl_br_balances

1421: -- Update balances with trasactions amount transferred
1422: -- This is done for current and further on periods
1423: -------------------------------------------------------
1424:
1425: UPDATE jl_br_balances
1426: SET ending_balance = ABS(ending_balance + r_bmb.bal),
1427: ending_balance_sign = decode(sign(ending_balance + r_bmb.bal),-1,'D','C'),
1428: balance_error_flag = '',
1429: last_update_date = sysdate,

Line 1455: INSERT INTO jl_br_balances

1451: -- for periods that come after the one being treated - this is the case for
1452: -- transactions being treated in previous periods
1453: ---------------------------------------------------------------------------------
1454:
1455: INSERT INTO jl_br_balances
1456: (application_id,
1457: set_of_books_id,
1458: period_set_name,
1459: period_name,

Line 1528: arp_message.set_line ('JL_CMERGE.JL_BR_BALANCES_UPD()+');

1524: END BALANCES;
1525:
1526: BEGIN
1527:
1528: arp_message.set_line ('JL_CMERGE.JL_BR_BALANCES_UPD()+');
1529:
1530: IF (process_mode = 'LOCK' ) THEN
1531: arp_message.set_name ('AR', 'AR_LOCKING_TABLE');
1532: arp_message.set_token ('TABLE_NAME','JL_BR_BALANCES_ALL',FALSE);

Line 1532: arp_message.set_token ('TABLE_NAME','JL_BR_BALANCES_ALL',FALSE);

1528: arp_message.set_line ('JL_CMERGE.JL_BR_BALANCES_UPD()+');
1529:
1530: IF (process_mode = 'LOCK' ) THEN
1531: arp_message.set_name ('AR', 'AR_LOCKING_TABLE');
1532: arp_message.set_token ('TABLE_NAME','JL_BR_BALANCES_ALL',FALSE);
1533:
1534: open merged_records;
1535: close merged_records;
1536:

Line 1541: delete jl_br_balances_all

1537: ELSE
1538: --customer level update--
1539:
1540: /*
1541: delete jl_br_balances_all
1542: where (personnel_id) IN (SELECT unique m.duplicate_id
1543: FROM ra_customer_merges m
1544: WHERE m.process_flag = 'N'
1545: AND m.request_id = req_id

Line 1555: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','JL_BR_BALANCES_ALL',FALSE);

1551: */
1552: -- Replaced with new logic that will generate log file.
1553:
1554: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
1555: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','JL_BR_BALANCES_ALL',FALSE);
1556: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
1557: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
1558:
1559: l_count:=0;

Line 1625: 'JL_BR_BALANCES_ALL',

1621: LAST_UPDATE_DATE,
1622: LAST_UPDATED_BY
1623: ) VALUES (
1624: HZ_CUSTOMER_MERGE_LOG_s.nextval,
1625: 'JL_BR_BALANCES_ALL',
1626: MERGE_HEADER_ID_LIST(I),
1627: PRIMARY_KEY1_LIST(I),
1628: PRIMARY_KEY2_LIST(I),
1629: PRIMARY_KEY3_LIST(I),

Line 1656: DELETE JL_BR_BALANCES_ALL

1652:
1653: END IF;
1654:
1655: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
1656: DELETE JL_BR_BALANCES_ALL
1657: WHERE application_id=PRIMARY_KEY1_LIST(I)
1658: AND set_of_books_id=PRIMARY_KEY2_LIST(I)
1659: AND period_set_name=PRIMARY_KEY3_LIST(I)
1660: AND period_name=PRIMARY_KEY4_LIST(I)

Line 1678: arp_message.set_line('JL_CMERGE.JL_BR_BALANCES_UPD()-');

1674: -- now in the merged customer.
1675: Balances;
1676:
1677: END IF ;
1678: arp_message.set_line('JL_CMERGE.JL_BR_BALANCES_UPD()-');
1679:
1680: EXCEPTION
1681: WHEN OTHERS THEN
1682: arp_message.set_error ('JL_CMERGE.JL_BR_BALANCES_UPD');

Line 1682: arp_message.set_error ('JL_CMERGE.JL_BR_BALANCES_UPD');

1678: arp_message.set_line('JL_CMERGE.JL_BR_BALANCES_UPD()-');
1679:
1680: EXCEPTION
1681: WHEN OTHERS THEN
1682: arp_message.set_error ('JL_CMERGE.JL_BR_BALANCES_UPD');
1683: RAISE;
1684: END jl_br_balances_upd ;
1685:
1686:

Line 1684: END jl_br_balances_upd ;

1680: EXCEPTION
1681: WHEN OTHERS THEN
1682: arp_message.set_error ('JL_CMERGE.JL_BR_BALANCES_UPD');
1683: RAISE;
1684: END jl_br_balances_upd ;
1685:
1686:
1687:
1688: ----------------------------------------------------------------------------

Line 1728: jl_br_balances_upd (req_id,set_num,process_mode);

1724: jl_zz_tx_cus_cls_upd (req_id,set_num,process_mode);
1725: jl_zz_tx_exc_cus_upd (req_id,set_num,process_mode);
1726: jl_zz_tx_lgl_msg_upd (req_id,set_num,process_mode);
1727: jl_br_journals_upd (req_id,set_num,process_mode);
1728: jl_br_balances_upd (req_id,set_num,process_mode);
1729: arp_message.set_line ('JL_CMERGE.MERGE()-');
1730:
1731: END merge;
1732: END jl_cmerge;