408: -- Code to validate the Header rule. --
409: -------------------------------------------------------------------------------------------
410: IF (FND_CONC_GLOBAL.request_data is null) THEN
411:
412: trunc_curs := DBMS_SQL.OPEN_CURSOR;
413: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
414: rc := dbms_sql.execute(trunc_curs);
415: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
416:
409: -------------------------------------------------------------------------------------------
410: IF (FND_CONC_GLOBAL.request_data is null) THEN
411:
412: trunc_curs := DBMS_SQL.OPEN_CURSOR;
413: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
414: rc := dbms_sql.execute(trunc_curs);
415: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
416:
417:
410: IF (FND_CONC_GLOBAL.request_data is null) THEN
411:
412: trunc_curs := DBMS_SQL.OPEN_CURSOR;
413: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
414: rc := dbms_sql.execute(trunc_curs);
415: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
416:
417:
418: If (p_status is null and p_org_id is null ) then
411:
412: trunc_curs := DBMS_SQL.OPEN_CURSOR;
413: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
414: rc := dbms_sql.execute(trunc_curs);
415: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
416:
417:
418: If (p_status is null and p_org_id is null ) then
419: -- The following csr is on OKC_RULE_GROUPS_B
498: -- Code to validate the Header History rule. --
499: -------------------------------------------------------------------------------------------
500: IF (FND_CONC_GLOBAL.request_data is null) THEN
501:
502: trunc_curs := DBMS_SQL.OPEN_CURSOR;
503: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
504: rc := dbms_sql.execute(trunc_curs);
505: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
506:
499: -------------------------------------------------------------------------------------------
500: IF (FND_CONC_GLOBAL.request_data is null) THEN
501:
502: trunc_curs := DBMS_SQL.OPEN_CURSOR;
503: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
504: rc := dbms_sql.execute(trunc_curs);
505: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
506:
507: If (p_status is null and p_org_id is null ) then
500: IF (FND_CONC_GLOBAL.request_data is null) THEN
501:
502: trunc_curs := DBMS_SQL.OPEN_CURSOR;
503: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
504: rc := dbms_sql.execute(trunc_curs);
505: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
506:
507: If (p_status is null and p_org_id is null ) then
508: -- The following csr is on OKC_RULE_GROUPS_BH
501:
502: trunc_curs := DBMS_SQL.OPEN_CURSOR;
503: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
504: rc := dbms_sql.execute(trunc_curs);
505: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
506:
507: If (p_status is null and p_org_id is null ) then
508: -- The following csr is on OKC_RULE_GROUPS_BH
509: open l_hdr_agg_csr3;
587: -- Code to validate the Line rule. --
588: -------------------------------------------------------------------------------------------
589: IF (FND_CONC_GLOBAL.request_data is null) THEN
590:
591: trunc_curs := DBMS_SQL.OPEN_CURSOR;
592: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
593: rc := dbms_sql.execute(trunc_curs);
594: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
595:
588: -------------------------------------------------------------------------------------------
589: IF (FND_CONC_GLOBAL.request_data is null) THEN
590:
591: trunc_curs := DBMS_SQL.OPEN_CURSOR;
592: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
593: rc := dbms_sql.execute(trunc_curs);
594: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
595:
596: If (p_status is null and p_org_id is null ) then
589: IF (FND_CONC_GLOBAL.request_data is null) THEN
590:
591: trunc_curs := DBMS_SQL.OPEN_CURSOR;
592: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
593: rc := dbms_sql.execute(trunc_curs);
594: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
595:
596: If (p_status is null and p_org_id is null ) then
597: -- The following csr is on OKC_RULE_GROUPS_B
590:
591: trunc_curs := DBMS_SQL.OPEN_CURSOR;
592: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
593: rc := dbms_sql.execute(trunc_curs);
594: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
595:
596: If (p_status is null and p_org_id is null ) then
597: -- The following csr is on OKC_RULE_GROUPS_B
598: open l_hdr_agg_csr1;
672: -- Code to validate the Line History rule. --
673: -------------------------------------------------------------------------------------------
674: IF (FND_CONC_GLOBAL.request_data is null) THEN
675:
676: trunc_curs := DBMS_SQL.OPEN_CURSOR;
677: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
678: rc := dbms_sql.execute(trunc_curs);
679: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
680:
673: -------------------------------------------------------------------------------------------
674: IF (FND_CONC_GLOBAL.request_data is null) THEN
675:
676: trunc_curs := DBMS_SQL.OPEN_CURSOR;
677: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
678: rc := dbms_sql.execute(trunc_curs);
679: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
680:
681: If (p_status is null and p_org_id is null ) then
674: IF (FND_CONC_GLOBAL.request_data is null) THEN
675:
676: trunc_curs := DBMS_SQL.OPEN_CURSOR;
677: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
678: rc := dbms_sql.execute(trunc_curs);
679: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
680:
681: If (p_status is null and p_org_id is null ) then
682: -- The following csr is on OKC_RULE_GROUPS_B
675:
676: trunc_curs := DBMS_SQL.OPEN_CURSOR;
677: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
678: rc := dbms_sql.execute(trunc_curs);
679: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
680:
681: If (p_status is null and p_org_id is null ) then
682: -- The following csr is on OKC_RULE_GROUPS_B
683: open l_hdr_agg_csr3;
759: -- Code to validate the ALL rules. --
760: -------------------------------------------------------------------------------------------
761: IF (FND_CONC_GLOBAL.request_data is null) THEN
762:
763: trunc_curs := DBMS_SQL.OPEN_CURSOR;
764: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
765: rc := dbms_sql.execute(trunc_curs);
766: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
767:
760: -------------------------------------------------------------------------------------------
761: IF (FND_CONC_GLOBAL.request_data is null) THEN
762:
763: trunc_curs := DBMS_SQL.OPEN_CURSOR;
764: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
765: rc := dbms_sql.execute(trunc_curs);
766: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
767:
768:
761: IF (FND_CONC_GLOBAL.request_data is null) THEN
762:
763: trunc_curs := DBMS_SQL.OPEN_CURSOR;
764: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
765: rc := dbms_sql.execute(trunc_curs);
766: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
767:
768:
769: If (p_status is null and p_org_id is null ) then
762:
763: trunc_curs := DBMS_SQL.OPEN_CURSOR;
764: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
765: rc := dbms_sql.execute(trunc_curs);
766: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
767:
768:
769: If (p_status is null and p_org_id is null ) then
770: -- The following csr is on OKC_RULE_GROUPS_BH
38997: -------------------------------------------------------------------------------------
38998: -- Code for Synchronization phase --
38999: -------------------------------------------------------------------------------------
39000: IF (FND_CONC_GLOBAL.REQUEST_DATA IS NULL) THEN
39001: trunc_curs := DBMS_SQL.OPEN_CURSOR;
39002: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
39003: rc := dbms_sql.execute(trunc_curs);
39004: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
39005:
38998: -- Code for Synchronization phase --
38999: -------------------------------------------------------------------------------------
39000: IF (FND_CONC_GLOBAL.REQUEST_DATA IS NULL) THEN
39001: trunc_curs := DBMS_SQL.OPEN_CURSOR;
39002: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
39003: rc := dbms_sql.execute(trunc_curs);
39004: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
39005:
39006: OPEN L_UPGRADE_CNT_CSR;
38999: -------------------------------------------------------------------------------------
39000: IF (FND_CONC_GLOBAL.REQUEST_DATA IS NULL) THEN
39001: trunc_curs := DBMS_SQL.OPEN_CURSOR;
39002: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
39003: rc := dbms_sql.execute(trunc_curs);
39004: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
39005:
39006: OPEN L_UPGRADE_CNT_CSR;
39007: FETCH L_UPGRADE_CNT_CSR INTO L_UPGRD_CNT;
39000: IF (FND_CONC_GLOBAL.REQUEST_DATA IS NULL) THEN
39001: trunc_curs := DBMS_SQL.OPEN_CURSOR;
39002: DBMS_SQL.PARSE(trunc_curs,l_truncate_string,dbms_sql.native);
39003: rc := dbms_sql.execute(trunc_curs);
39004: DBMS_SQL.CLOSE_CURSOR(trunc_curs);
39005:
39006: OPEN L_UPGRADE_CNT_CSR;
39007: FETCH L_UPGRADE_CNT_CSR INTO L_UPGRD_CNT;
39008: CLOSE L_UPGRADE_CNT_CSR;