eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PO_AP_PURGE_GRP dependencies on FND_API

Line 52: * FND_API.G_TRUE ('T') if it is ok to purge the given document.

48: * and there exist any documents (in any status) in enabled OUs referencing
49: * the Global Agreement.
50: *
51: * RETURNS:
52: * FND_API.G_TRUE ('T') if it is ok to purge the given document.
53: * FND_API.G_FALSE ('F') otherwise.
54: *
55: *===========================================================================
56: */

Line 53: * FND_API.G_FALSE ('F') otherwise.

49: * the Global Agreement.
50: *
51: * RETURNS:
52: * FND_API.G_TRUE ('T') if it is ok to purge the given document.
53: * FND_API.G_FALSE ('F') otherwise.
54: *
55: *===========================================================================
56: */
57:

Line 71: return (FND_API.G_FALSE); -- this GA from another OU

67:
68: IF ( PO_AP_PURGE_GRP.referencing_docs_exist(p_po_header_id) ) OR
69: ( referencing_asl_exist(p_po_header_id) ) THEN
70: -- IF no documents/Asl's reference
71: return (FND_API.G_FALSE); -- this GA from another OU
72: -- THEN, OK to purge document
73: ELSE -- ELSE, POs exist
74: -- and NOT OK to purge
75: return (FND_API.G_TRUE);

Line 75: return (FND_API.G_TRUE);

71: return (FND_API.G_FALSE); -- this GA from another OU
72: -- THEN, OK to purge document
73: ELSE -- ELSE, POs exist
74: -- and NOT OK to purge
75: return (FND_API.G_TRUE);
76:
77: END IF;
78:
79: ELSE -- if not a GA then check if its std PO referencing an open GA

Line 83: return (FND_API.G_TRUE);

79: ELSE -- if not a GA then check if its std PO referencing an open GA
80:
81: IF ( stdpo_ref_ga_check (p_po_header_id) ) THEN -- Bug 2812416
82:
83: return (FND_API.G_TRUE);
84:
85: ELSE -- for all other cases OK to purge
86:
87: return (FND_API.G_FALSE);

Line 87: return (FND_API.G_FALSE);

83: return (FND_API.G_TRUE);
84:
85: ELSE -- for all other cases OK to purge
86:
87: return (FND_API.G_FALSE);
88:
89: END IF;
90:
91: END IF;

Line 93: return (FND_API.G_TRUE);

89: END IF;
90:
91: END IF;
92:
93: return (FND_API.G_TRUE);
94:
95: EXCEPTION
96:
97: WHEN OTHERS THEN

Line 98: return (FND_API.G_FALSE);

94:
95: EXCEPTION
96:
97: WHEN OTHERS THEN
98: return (FND_API.G_FALSE);
99:
100: END validate_purge;
101:
102:

Line 115: * x_return_status - (a) FND_API.G_RET_STS_SUCCESS if purge successful

111: * Purges all entries of the given Document ID from the Global Agreements'
112: * Organization Assignment table. (This procedure does not commit.)
113: *
114: * RETURNS:
115: * x_return_status - (a) FND_API.G_RET_STS_SUCCESS if purge successful
116: * (b) FND_API.G_RET_STS_ERROR if error during purge
117: * (c) FND_API.G_RET_STS_UNEXP_ERROR if unexpected error
118: *
119: *===========================================================================

Line 116: * (b) FND_API.G_RET_STS_ERROR if error during purge

112: * Organization Assignment table. (This procedure does not commit.)
113: *
114: * RETURNS:
115: * x_return_status - (a) FND_API.G_RET_STS_SUCCESS if purge successful
116: * (b) FND_API.G_RET_STS_ERROR if error during purge
117: * (c) FND_API.G_RET_STS_UNEXP_ERROR if unexpected error
118: *
119: *===========================================================================
120: */

Line 117: * (c) FND_API.G_RET_STS_UNEXP_ERROR if unexpected error

113: *
114: * RETURNS:
115: * x_return_status - (a) FND_API.G_RET_STS_SUCCESS if purge successful
116: * (b) FND_API.G_RET_STS_ERROR if error during purge
117: * (c) FND_API.G_RET_STS_UNEXP_ERROR if unexpected error
118: *
119: *===========================================================================
120: */
121: PROCEDURE purge

Line 140: x_return_status := FND_API.G_RET_STS_SUCCESS; -- Initialize return status

136: l_pos_dynamic_call VARCHAR2(2000);
137:
138: BEGIN
139:
140: x_return_status := FND_API.G_RET_STS_SUCCESS; -- Initialize return status
141:
142: IF ( NOT FND_API.compatible_api_call(l_api_version,p_api_version,l_api_name,G_PKG_NAME) ) THEN
143: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
144: END IF;

Line 142: IF ( NOT FND_API.compatible_api_call(l_api_version,p_api_version,l_api_name,G_PKG_NAME) ) THEN

138: BEGIN
139:
140: x_return_status := FND_API.G_RET_STS_SUCCESS; -- Initialize return status
141:
142: IF ( NOT FND_API.compatible_api_call(l_api_version,p_api_version,l_api_name,G_PKG_NAME) ) THEN
143: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
144: END IF;
145:
146: l_progress := '000';

Line 143: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

139:
140: x_return_status := FND_API.G_RET_STS_SUCCESS; -- Initialize return status
141:
142: IF ( NOT FND_API.compatible_api_call(l_api_version,p_api_version,l_api_name,G_PKG_NAME) ) THEN
143: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
144: END IF;
145:
146: l_progress := '000';
147:

Line 183: x_return_status := FND_API.G_RET_STS_SUCCESS;

179: USING OUT x_return_status;
180: EXCEPTION
181: WHEN OTHERS THEN
182: IF (SQLCODE = -6550) THEN
183: x_return_status := FND_API.G_RET_STS_SUCCESS;
184:
185: IF (g_fnd_debug = 'Y') THEN
186: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
187: FND_LOG.string

Line 219: WHEN FND_API.G_EXC_ERROR THEN

215: */
216:
217: EXCEPTION
218:
219: WHEN FND_API.G_EXC_ERROR THEN
220: x_return_status := FND_API.G_RET_STS_ERROR;
221:
222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 220: x_return_status := FND_API.G_RET_STS_ERROR;

216:
217: EXCEPTION
218:
219: WHEN FND_API.G_EXC_ERROR THEN
220: x_return_status := FND_API.G_RET_STS_ERROR;
221:
222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
224:

Line 222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

218:
219: WHEN FND_API.G_EXC_ERROR THEN
220: x_return_status := FND_API.G_RET_STS_ERROR;
221:
222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
224:
225: WHEN OTHERS THEN
226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

219: WHEN FND_API.G_EXC_ERROR THEN
220: x_return_status := FND_API.G_RET_STS_ERROR;
221:
222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
224:
225: WHEN OTHERS THEN
226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
227:

Line 226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
224:
225: WHEN OTHERS THEN
226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
227:
228: END purge;
229:
230:

Line 591: -- FND_API.G_TRUE: initialize the message list

587: --IN:
588: --p_api_version
589: -- Version of the api the caller is assuming
590: --p_init_msg_list
591: -- FND_API.G_TRUE: initialize the message list
592: -- FND_API.G_FALSE: do not initialize the message list
593: --p_commit
594: -- Whether the API should commit
595: --p_purge_name

Line 592: -- FND_API.G_FALSE: do not initialize the message list

588: --p_api_version
589: -- Version of the api the caller is assuming
590: --p_init_msg_list
591: -- FND_API.G_TRUE: initialize the message list
592: -- FND_API.G_FALSE: do not initialize the message list
593: --p_commit
594: -- Whether the API should commit
595: --p_purge_name
596: -- Name of this purge process

Line 645: IF (FND_API.to_boolean (p_init_msg_list)) THEN

641: END IF;
642:
643: SAVEPOINT seed_records_grp;
644:
645: IF (FND_API.to_boolean (p_init_msg_list)) THEN
646: FND_MSG_PUB.initialize;
647: END IF;
648:
649: IF (NOT FND_API.Compatible_API_Call

Line 649: IF (NOT FND_API.Compatible_API_Call

645: IF (FND_API.to_boolean (p_init_msg_list)) THEN
646: FND_MSG_PUB.initialize;
647: END IF;
648:
649: IF (NOT FND_API.Compatible_API_Call
650: ( p_current_version_number => l_api_version,
651: p_caller_version_number => p_api_version,
652: p_api_name => l_api_name,
653: p_pkg_name => g_pkg_name

Line 657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

653: p_pkg_name => g_pkg_name
654: )
655: ) THEN
656:
657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
658: END IF;
659:
660: x_return_status := FND_API.G_RET_STS_SUCCESS;
661:

Line 660: x_return_status := FND_API.G_RET_STS_SUCCESS;

656:
657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
658: END IF;
659:
660: x_return_status := FND_API.G_RET_STS_SUCCESS;
661:
662: l_progress := '010';
663:
664: PO_AP_PURGE_PVT.seed_records

Line 666: p_init_msg_list => FND_API.G_FALSE,

662: l_progress := '010';
663:
664: PO_AP_PURGE_PVT.seed_records
665: ( p_api_version => 1.0,
666: p_init_msg_list => FND_API.G_FALSE,
667: p_commit => p_commit,
668: x_return_status => x_return_status,
669: x_msg_data => x_msg_data,
670: p_purge_name => p_purge_name,

Line 688: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

684: END IF;
685: END IF;
686:
687: EXCEPTION
688: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
689: ROLLBACK TO seed_records_grp;
690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
691: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
692:

Line 690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

686:
687: EXCEPTION
688: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
689: ROLLBACK TO seed_records_grp;
690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
691: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
692:
693: WHEN OTHERS THEN
694: ROLLBACK TO seed_records_grp;

Line 695: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

691: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
692:
693: WHEN OTHERS THEN
694: ROLLBACK TO seed_records_grp;
695: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
696: FND_MSG_PUB.add_exc_msg
697: ( p_pkg_name => g_pkg_name,
698: p_procedure_name => l_api_name || '.' || l_progress
699: );

Line 721: -- FND_API.G_TRUE: initialize the message list

717: --IN:
718: --p_api_version
719: -- Version of the api the caller is assuming
720: --p_init_msg_list
721: -- FND_API.G_TRUE: initialize the message list
722: -- FND_API.G_FALSE: do not initialize the message list
723: --p_commit
724: -- FND_API.G_TRUE: commit changes
725: -- FND_API.G_FALSE: do not commit changes

Line 722: -- FND_API.G_FALSE: do not initialize the message list

718: --p_api_version
719: -- Version of the api the caller is assuming
720: --p_init_msg_list
721: -- FND_API.G_TRUE: initialize the message list
722: -- FND_API.G_FALSE: do not initialize the message list
723: --p_commit
724: -- FND_API.G_TRUE: commit changes
725: -- FND_API.G_FALSE: do not commit changes
726: --p_purge_status

Line 724: -- FND_API.G_TRUE: commit changes

720: --p_init_msg_list
721: -- FND_API.G_TRUE: initialize the message list
722: -- FND_API.G_FALSE: do not initialize the message list
723: --p_commit
724: -- FND_API.G_TRUE: commit changes
725: -- FND_API.G_FALSE: do not commit changes
726: --p_purge_status
727: -- Current stage of the purge process
728: --p_purge_name

Line 725: -- FND_API.G_FALSE: do not commit changes

721: -- FND_API.G_TRUE: initialize the message list
722: -- FND_API.G_FALSE: do not initialize the message list
723: --p_commit
724: -- FND_API.G_TRUE: commit changes
725: -- FND_API.G_FALSE: do not commit changes
726: --p_purge_status
727: -- Current stage of the purge process
728: --p_purge_name
729: -- Name of this purge process

Line 794: IF (FND_API.to_boolean (p_init_msg_list)) THEN

790: END IF;
791:
792: SAVEPOINT filter_records_grp;
793:
794: IF (FND_API.to_boolean (p_init_msg_list)) THEN
795: FND_MSG_PUB.initialize;
796: END IF;
797:
798: IF (NOT FND_API.Compatible_API_Call

Line 798: IF (NOT FND_API.Compatible_API_Call

794: IF (FND_API.to_boolean (p_init_msg_list)) THEN
795: FND_MSG_PUB.initialize;
796: END IF;
797:
798: IF (NOT FND_API.Compatible_API_Call
799: ( p_current_version_number => l_api_version,
800: p_caller_version_number => p_api_version,
801: p_api_name => l_api_name,
802: p_pkg_name => g_pkg_name

Line 806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

802: p_pkg_name => g_pkg_name
803: )
804: ) THEN
805:
806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
807: END IF;
808:
809: x_return_status := FND_API.G_RET_STS_SUCCESS;
810:

Line 809: x_return_status := FND_API.G_RET_STS_SUCCESS;

805:
806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
807: END IF;
808:
809: x_return_status := FND_API.G_RET_STS_SUCCESS;
810:
811: l_progress := '010';
812:
813: PO_AP_PURGE_PVT.filter_records

Line 815: p_init_msg_list => FND_API.G_FALSE,

811: l_progress := '010';
812:
813: PO_AP_PURGE_PVT.filter_records
814: ( p_api_version => 1.0,
815: p_init_msg_list => FND_API.G_FALSE,
816: p_commit => p_commit,
817: x_return_status => x_return_status,
818: x_msg_data => x_msg_data,
819: p_purge_status => p_purge_status,

Line 839: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

835: END IF;
836: END IF;
837:
838: EXCEPTION
839: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
840: ROLLBACK TO filter_records_grp;
841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
842: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
843:

Line 841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

837:
838: EXCEPTION
839: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
840: ROLLBACK TO filter_records_grp;
841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
842: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
843:
844: WHEN OTHERS THEN
845: ROLLBACK TO filter_records_grp;

Line 846: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

842: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
843:
844: WHEN OTHERS THEN
845: ROLLBACK TO filter_records_grp;
846: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
847: FND_MSG_PUB.add_exc_msg
848: ( p_pkg_name => g_pkg_name,
849: p_procedure_name => l_api_name || '.' || l_progress
850: );

Line 874: -- FND_API.G_TRUE: initialize the message list

870: --IN:
871: --p_api_version
872: -- Version of the api the caller is assuming
873: --p_init_msg_list
874: -- FND_API.G_TRUE: initialize the message list
875: -- FND_API.G_FALSE: do not initialize the message list
876: --p_commit
877: -- FND_API.G_TRUE: procedure should commit
878: -- FND_API.G_FALSE: procedure should not commit

Line 875: -- FND_API.G_FALSE: do not initialize the message list

871: --p_api_version
872: -- Version of the api the caller is assuming
873: --p_init_msg_list
874: -- FND_API.G_TRUE: initialize the message list
875: -- FND_API.G_FALSE: do not initialize the message list
876: --p_commit
877: -- FND_API.G_TRUE: procedure should commit
878: -- FND_API.G_FALSE: procedure should not commit
879: --p_purge_name

Line 877: -- FND_API.G_TRUE: procedure should commit

873: --p_init_msg_list
874: -- FND_API.G_TRUE: initialize the message list
875: -- FND_API.G_FALSE: do not initialize the message list
876: --p_commit
877: -- FND_API.G_TRUE: procedure should commit
878: -- FND_API.G_FALSE: procedure should not commit
879: --p_purge_name
880: -- Name of the purge
881: --p_purge_category

Line 878: -- FND_API.G_FALSE: procedure should not commit

874: -- FND_API.G_TRUE: initialize the message list
875: -- FND_API.G_FALSE: do not initialize the message list
876: --p_commit
877: -- FND_API.G_TRUE: procedure should commit
878: -- FND_API.G_FALSE: procedure should not commit
879: --p_purge_name
880: -- Name of the purge
881: --p_purge_category
882: -- Purge Category

Line 929: IF (FND_API.to_boolean (p_init_msg_list)) THEN

925: END IF;
926:
927: SAVEPOINT confirm_records_grp;
928:
929: IF (FND_API.to_boolean (p_init_msg_list)) THEN
930: FND_MSG_PUB.initialize;
931: END IF;
932:
933: IF (NOT FND_API.Compatible_API_Call

Line 933: IF (NOT FND_API.Compatible_API_Call

929: IF (FND_API.to_boolean (p_init_msg_list)) THEN
930: FND_MSG_PUB.initialize;
931: END IF;
932:
933: IF (NOT FND_API.Compatible_API_Call
934: ( p_current_version_number => l_api_version,
935: p_caller_version_number => p_api_version,
936: p_api_name => l_api_name,
937: p_pkg_name => g_pkg_name

Line 941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

937: p_pkg_name => g_pkg_name
938: )
939: ) THEN
940:
941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
942: END IF;
943:
944: x_return_status := FND_API.G_RET_STS_SUCCESS;
945:

Line 944: x_return_status := FND_API.G_RET_STS_SUCCESS;

940:
941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
942: END IF;
943:
944: x_return_status := FND_API.G_RET_STS_SUCCESS;
945:
946: l_progress := '010';
947:
948: PO_AP_PURGE_PVT.confirm_records

Line 950: p_init_msg_list => FND_API.G_FALSE,

946: l_progress := '010';
947:
948: PO_AP_PURGE_PVT.confirm_records
949: ( p_api_version => 1.0,
950: p_init_msg_list => FND_API.G_FALSE,
951: p_commit => p_commit,
952: x_return_status => x_return_status,
953: x_msg_data => x_msg_data,
954: p_purge_name => p_purge_name,

Line 972: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

968: END IF;
969: END IF;
970:
971: EXCEPTION
972: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
973: ROLLBACK TO confirm_records_grp;
974: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
975: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
976:

Line 974: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

970:
971: EXCEPTION
972: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
973: ROLLBACK TO confirm_records_grp;
974: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
975: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
976:
977: WHEN OTHERS THEN
978: ROLLBACK TO confirm_records_grp;

Line 979: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

975: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
976:
977: WHEN OTHERS THEN
978: ROLLBACK TO confirm_records_grp;
979: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
980: FND_MSG_PUB.add_exc_msg
981: ( p_pkg_name => g_pkg_name,
982: p_procedure_name => l_api_name || '.' || l_progress
983: );

Line 1007: -- FND_API.G_TRUE: initialize the message list

1003: --IN:
1004: --p_api_version
1005: -- Version of the api the caller is assuming
1006: --p_init_msg_list
1007: -- FND_API.G_TRUE: initialize the message list
1008: -- FND_API.G_FALSE: do not initialize the message list
1009: --p_commit
1010: -- FND_API.G_TRUE: procedure should commit
1011: -- FND_API.G_FALSE: procedure should not commit

Line 1008: -- FND_API.G_FALSE: do not initialize the message list

1004: --p_api_version
1005: -- Version of the api the caller is assuming
1006: --p_init_msg_list
1007: -- FND_API.G_TRUE: initialize the message list
1008: -- FND_API.G_FALSE: do not initialize the message list
1009: --p_commit
1010: -- FND_API.G_TRUE: procedure should commit
1011: -- FND_API.G_FALSE: procedure should not commit
1012: --p_purge_name

Line 1010: -- FND_API.G_TRUE: procedure should commit

1006: --p_init_msg_list
1007: -- FND_API.G_TRUE: initialize the message list
1008: -- FND_API.G_FALSE: do not initialize the message list
1009: --p_commit
1010: -- FND_API.G_TRUE: procedure should commit
1011: -- FND_API.G_FALSE: procedure should not commit
1012: --p_purge_name
1013: -- Name of the purge
1014: --p_purge_category

Line 1011: -- FND_API.G_FALSE: procedure should not commit

1007: -- FND_API.G_TRUE: initialize the message list
1008: -- FND_API.G_FALSE: do not initialize the message list
1009: --p_commit
1010: -- FND_API.G_TRUE: procedure should commit
1011: -- FND_API.G_FALSE: procedure should not commit
1012: --p_purge_name
1013: -- Name of the purge
1014: --p_purge_category
1015: -- Purge Category

Line 1062: IF (FND_API.to_boolean (p_init_msg_list)) THEN

1058: );
1059: END IF;
1060: END IF;
1061:
1062: IF (FND_API.to_boolean (p_init_msg_list)) THEN
1063: FND_MSG_PUB.initialize;
1064: END IF;
1065:
1066: IF (NOT FND_API.Compatible_API_Call

Line 1066: IF (NOT FND_API.Compatible_API_Call

1062: IF (FND_API.to_boolean (p_init_msg_list)) THEN
1063: FND_MSG_PUB.initialize;
1064: END IF;
1065:
1066: IF (NOT FND_API.Compatible_API_Call
1067: ( p_current_version_number => l_api_version,
1068: p_caller_version_number => p_api_version,
1069: p_api_name => l_api_name,
1070: p_pkg_name => g_pkg_name

Line 1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1070: p_pkg_name => g_pkg_name
1071: )
1072: ) THEN
1073:
1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1075: END IF;
1076:
1077: x_return_status := FND_API.G_RET_STS_SUCCESS;
1078:

Line 1077: x_return_status := FND_API.G_RET_STS_SUCCESS;

1073:
1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1075: END IF;
1076:
1077: x_return_status := FND_API.G_RET_STS_SUCCESS;
1078:
1079: l_progress := '010';
1080:
1081: PO_AP_PURGE_PVT.summarize_records

Line 1083: p_init_msg_list => FND_API.G_FALSE,

1079: l_progress := '010';
1080:
1081: PO_AP_PURGE_PVT.summarize_records
1082: ( p_api_version => 1.0,
1083: p_init_msg_list => FND_API.G_FALSE,
1084: p_commit => p_commit,
1085: x_return_status => x_return_status,
1086: x_msg_data => x_msg_data,
1087: p_purge_name => p_purge_name,

Line 1105: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1101: END IF;
1102: END IF;
1103:
1104: EXCEPTION
1105: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1107: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1108:
1109: WHEN OTHERS THEN

Line 1106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1102: END IF;
1103:
1104: EXCEPTION
1105: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1107: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1108:
1109: WHEN OTHERS THEN
1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1107: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1108:
1109: WHEN OTHERS THEN
1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1111: FND_MSG_PUB.add_exc_msg
1112: ( p_pkg_name => g_pkg_name,
1113: p_procedure_name => l_api_name || '.' || l_progress
1114: );

Line 1136: -- FND_API.G_TRUE: initialize the message list

1132: --IN:
1133: --p_api_version
1134: -- Version of the api the caller is assuming
1135: --p_init_msg_list
1136: -- FND_API.G_TRUE: initialize the message list
1137: -- FND_API.G_FALSE: do not initialize the message list
1138: --p_commit
1139: -- FND_API.G_TRUE: procedure should commit
1140: -- FND_API.G_FALSE: procedure should not commit

Line 1137: -- FND_API.G_FALSE: do not initialize the message list

1133: --p_api_version
1134: -- Version of the api the caller is assuming
1135: --p_init_msg_list
1136: -- FND_API.G_TRUE: initialize the message list
1137: -- FND_API.G_FALSE: do not initialize the message list
1138: --p_commit
1139: -- FND_API.G_TRUE: procedure should commit
1140: -- FND_API.G_FALSE: procedure should not commit
1141: --p_purge_name

Line 1139: -- FND_API.G_TRUE: procedure should commit

1135: --p_init_msg_list
1136: -- FND_API.G_TRUE: initialize the message list
1137: -- FND_API.G_FALSE: do not initialize the message list
1138: --p_commit
1139: -- FND_API.G_TRUE: procedure should commit
1140: -- FND_API.G_FALSE: procedure should not commit
1141: --p_purge_name
1142: -- Name of the purge
1143: --p_purge_category

Line 1140: -- FND_API.G_FALSE: procedure should not commit

1136: -- FND_API.G_TRUE: initialize the message list
1137: -- FND_API.G_FALSE: do not initialize the message list
1138: --p_commit
1139: -- FND_API.G_TRUE: procedure should commit
1140: -- FND_API.G_FALSE: procedure should not commit
1141: --p_purge_name
1142: -- Name of the purge
1143: --p_purge_category
1144: -- Purge Category

Line 1191: IF (FND_API.to_boolean (p_init_msg_list)) THEN

1187: );
1188: END IF;
1189: END IF;
1190:
1191: IF (FND_API.to_boolean (p_init_msg_list)) THEN
1192: FND_MSG_PUB.initialize;
1193: END IF;
1194:
1195: IF (NOT FND_API.Compatible_API_Call

Line 1195: IF (NOT FND_API.Compatible_API_Call

1191: IF (FND_API.to_boolean (p_init_msg_list)) THEN
1192: FND_MSG_PUB.initialize;
1193: END IF;
1194:
1195: IF (NOT FND_API.Compatible_API_Call
1196: ( p_current_version_number => l_api_version,
1197: p_caller_version_number => p_api_version,
1198: p_api_name => l_api_name,
1199: p_pkg_name => g_pkg_name

Line 1203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1199: p_pkg_name => g_pkg_name
1200: )
1201: ) THEN
1202:
1203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1204: END IF;
1205:
1206: x_return_status := FND_API.G_RET_STS_SUCCESS;
1207:

Line 1206: x_return_status := FND_API.G_RET_STS_SUCCESS;

1202:
1203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1204: END IF;
1205:
1206: x_return_status := FND_API.G_RET_STS_SUCCESS;
1207:
1208: l_progress := '010';
1209:
1210: PO_AP_PURGE_PVT.delete_records

Line 1212: p_init_msg_list => FND_API.G_FALSE,

1208: l_progress := '010';
1209:
1210: PO_AP_PURGE_PVT.delete_records
1211: ( p_api_version => 1.0,
1212: p_init_msg_list => FND_API.G_FALSE,
1213: p_commit => p_commit,
1214: x_return_status => x_return_status,
1215: x_msg_data => x_msg_data,
1216: p_purge_name => p_purge_name,

Line 1234: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1230: END IF;
1231: END IF;
1232:
1233: EXCEPTION
1234: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1235: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1236: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1237:
1238: WHEN OTHERS THEN

Line 1235: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1231: END IF;
1232:
1233: EXCEPTION
1234: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1235: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1236: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1237:
1238: WHEN OTHERS THEN
1239: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1239: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1235: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1236: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1237:
1238: WHEN OTHERS THEN
1239: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1240: FND_MSG_PUB.add_exc_msg
1241: ( p_pkg_name => g_pkg_name,
1242: p_procedure_name => l_api_name || '.' || l_progress
1243: );

Line 1264: -- FND_API.G_TRUE: initialize the message list

1260: --IN:
1261: --p_api_version
1262: -- Version of the api the caller is assuming
1263: --p_init_msg_list
1264: -- FND_API.G_TRUE: initialize the message list
1265: -- FND_API.G_FALSE: do not initialize the message list
1266: --p_commit
1267: -- FND_API.G_TRUE: procedure should commit
1268: -- FND_API.G_FALSE: procedure should not commit

Line 1265: -- FND_API.G_FALSE: do not initialize the message list

1261: --p_api_version
1262: -- Version of the api the caller is assuming
1263: --p_init_msg_list
1264: -- FND_API.G_TRUE: initialize the message list
1265: -- FND_API.G_FALSE: do not initialize the message list
1266: --p_commit
1267: -- FND_API.G_TRUE: procedure should commit
1268: -- FND_API.G_FALSE: procedure should not commit
1269: --p_purge_name

Line 1267: -- FND_API.G_TRUE: procedure should commit

1263: --p_init_msg_list
1264: -- FND_API.G_TRUE: initialize the message list
1265: -- FND_API.G_FALSE: do not initialize the message list
1266: --p_commit
1267: -- FND_API.G_TRUE: procedure should commit
1268: -- FND_API.G_FALSE: procedure should not commit
1269: --p_purge_name
1270: -- Name of the purge
1271: --IN OUT:

Line 1268: -- FND_API.G_FALSE: procedure should not commit

1264: -- FND_API.G_TRUE: initialize the message list
1265: -- FND_API.G_FALSE: do not initialize the message list
1266: --p_commit
1267: -- FND_API.G_TRUE: procedure should commit
1268: -- FND_API.G_FALSE: procedure should not commit
1269: --p_purge_name
1270: -- Name of the purge
1271: --IN OUT:
1272: --OUT:

Line 1314: IF (FND_API.to_boolean (p_init_msg_list)) THEN

1310: END IF;
1311:
1312: SAVEPOINT delete_purge_lists_grp;
1313:
1314: IF (FND_API.to_boolean (p_init_msg_list)) THEN
1315: FND_MSG_PUB.initialize;
1316: END IF;
1317:
1318: IF (NOT FND_API.Compatible_API_Call

Line 1318: IF (NOT FND_API.Compatible_API_Call

1314: IF (FND_API.to_boolean (p_init_msg_list)) THEN
1315: FND_MSG_PUB.initialize;
1316: END IF;
1317:
1318: IF (NOT FND_API.Compatible_API_Call
1319: ( p_current_version_number => l_api_version,
1320: p_caller_version_number => p_api_version,
1321: p_api_name => l_api_name,
1322: p_pkg_name => g_pkg_name

Line 1326: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1322: p_pkg_name => g_pkg_name
1323: )
1324: ) THEN
1325:
1326: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1327: END IF;
1328:
1329: x_return_status := FND_API.G_RET_STS_SUCCESS;
1330:

Line 1329: x_return_status := FND_API.G_RET_STS_SUCCESS;

1325:
1326: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1327: END IF;
1328:
1329: x_return_status := FND_API.G_RET_STS_SUCCESS;
1330:
1331: l_progress := '010';
1332:
1333: PO_AP_PURGE_PVT.delete_purge_lists

Line 1335: p_init_msg_list => FND_API.G_FALSE,

1331: l_progress := '010';
1332:
1333: PO_AP_PURGE_PVT.delete_purge_lists
1334: ( p_api_version => 1.0,
1335: p_init_msg_list => FND_API.G_FALSE,
1336: p_commit => p_commit,
1337: x_return_status => x_return_status,
1338: x_msg_data => x_msg_data,
1339: p_purge_name => p_purge_name

Line 1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1351: END IF;
1352: END IF;
1353:
1354: EXCEPTION
1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1356: ROLLBACK TO delete_purge_lists_grp;
1357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1358: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1359:

Line 1357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1353:
1354: EXCEPTION
1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1356: ROLLBACK TO delete_purge_lists_grp;
1357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1358: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1359:
1360: WHEN OTHERS THEN
1361: ROLLBACK TO delete_purge_lists_grp;

Line 1362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1358: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1359:
1360: WHEN OTHERS THEN
1361: ROLLBACK TO delete_purge_lists_grp;
1362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1363: FND_MSG_PUB.add_exc_msg
1364: ( p_pkg_name => g_pkg_name,
1365: p_procedure_name => l_api_name || '.' || l_progress
1366: );

Line 1388: -- FND_API.G_TRUE: initialize the message list

1384: --IN:
1385: --p_api_version
1386: -- Version of the api the caller is assuming
1387: --p_init_msg_list
1388: -- FND_API.G_TRUE: initialize the message list
1389: -- FND_API.G_FALSE: do not initialize the message list
1390: --p_commit
1391: -- FND_API.G_TRUE: procedure should commit
1392: -- FND_API.G_FALSE: procedure should not commit

Line 1389: -- FND_API.G_FALSE: do not initialize the message list

1385: --p_api_version
1386: -- Version of the api the caller is assuming
1387: --p_init_msg_list
1388: -- FND_API.G_TRUE: initialize the message list
1389: -- FND_API.G_FALSE: do not initialize the message list
1390: --p_commit
1391: -- FND_API.G_TRUE: procedure should commit
1392: -- FND_API.G_FALSE: procedure should not commit
1393: --p_purge_name

Line 1391: -- FND_API.G_TRUE: procedure should commit

1387: --p_init_msg_list
1388: -- FND_API.G_TRUE: initialize the message list
1389: -- FND_API.G_FALSE: do not initialize the message list
1390: --p_commit
1391: -- FND_API.G_TRUE: procedure should commit
1392: -- FND_API.G_FALSE: procedure should not commit
1393: --p_purge_name
1394: -- Name of the purge
1395: --IN OUT:

Line 1392: -- FND_API.G_FALSE: procedure should not commit

1388: -- FND_API.G_TRUE: initialize the message list
1389: -- FND_API.G_FALSE: do not initialize the message list
1390: --p_commit
1391: -- FND_API.G_TRUE: procedure should commit
1392: -- FND_API.G_FALSE: procedure should not commit
1393: --p_purge_name
1394: -- Name of the purge
1395: --IN OUT:
1396: --OUT:

Line 1438: IF (FND_API.to_boolean (p_init_msg_list)) THEN

1434: END IF;
1435:
1436: SAVEPOINT delete_history_tables_grp;
1437:
1438: IF (FND_API.to_boolean (p_init_msg_list)) THEN
1439: FND_MSG_PUB.initialize;
1440: END IF;
1441:
1442: IF (NOT FND_API.Compatible_API_Call

Line 1442: IF (NOT FND_API.Compatible_API_Call

1438: IF (FND_API.to_boolean (p_init_msg_list)) THEN
1439: FND_MSG_PUB.initialize;
1440: END IF;
1441:
1442: IF (NOT FND_API.Compatible_API_Call
1443: ( p_current_version_number => l_api_version,
1444: p_caller_version_number => p_api_version,
1445: p_api_name => l_api_name,
1446: p_pkg_name => g_pkg_name

Line 1450: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1446: p_pkg_name => g_pkg_name
1447: )
1448: ) THEN
1449:
1450: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1451: END IF;
1452:
1453: x_return_status := FND_API.G_RET_STS_SUCCESS;
1454:

Line 1453: x_return_status := FND_API.G_RET_STS_SUCCESS;

1449:
1450: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1451: END IF;
1452:
1453: x_return_status := FND_API.G_RET_STS_SUCCESS;
1454:
1455: l_progress := '010';
1456:
1457: PO_AP_PURGE_PVT.delete_history_tables

Line 1459: p_init_msg_list => FND_API.G_FALSE,

1455: l_progress := '010';
1456:
1457: PO_AP_PURGE_PVT.delete_history_tables
1458: ( p_api_version => 1.0,
1459: p_init_msg_list => FND_API.G_FALSE,
1460: p_commit => p_commit,
1461: x_return_status => x_return_status,
1462: x_msg_data => x_msg_data,
1463: p_purge_name => p_purge_name

Line 1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1475: END IF;
1476: END IF;
1477:
1478: EXCEPTION
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1480: ROLLBACK TO delete_history_tables_grp;
1481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1482: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1483:

Line 1481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1477:
1478: EXCEPTION
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1480: ROLLBACK TO delete_history_tables_grp;
1481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1482: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1483:
1484: WHEN OTHERS THEN
1485: ROLLBACK TO delete_history_tables_grp;

Line 1486: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1482: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1483:
1484: WHEN OTHERS THEN
1485: ROLLBACK TO delete_history_tables_grp;
1486: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1487: FND_MSG_PUB.add_exc_msg
1488: ( p_pkg_name => g_pkg_name,
1489: p_procedure_name => l_api_name || '.' || l_progress
1490: );

Line 1509: -- FND_API.G_TRUE: initialize the message list

1505: --Parameters:
1506: --p_api_version
1507: -- Version of the api the caller is assuming
1508: --p_init_msg_list
1509: -- FND_API.G_TRUE: initialize the message list
1510: -- FND_API.G_FALSE: do not initialize the message list
1511: --IN OUT:
1512: --OUT:
1513: --x_return_status

Line 1510: -- FND_API.G_FALSE: do not initialize the message list

1506: --p_api_version
1507: -- Version of the api the caller is assuming
1508: --p_init_msg_list
1509: -- FND_API.G_TRUE: initialize the message list
1510: -- FND_API.G_FALSE: do not initialize the message list
1511: --IN OUT:
1512: --OUT:
1513: --x_return_status
1514: -- status of the procedure

Line 1571: IF (FND_API.to_boolean (p_init_msg_list)) THEN

1567: );
1568: END IF;
1569: END IF;
1570:
1571: IF (FND_API.to_boolean (p_init_msg_list)) THEN
1572: FND_MSG_PUB.initialize;
1573: END IF;
1574:
1575: IF (NOT FND_API.Compatible_API_Call

Line 1575: IF (NOT FND_API.Compatible_API_Call

1571: IF (FND_API.to_boolean (p_init_msg_list)) THEN
1572: FND_MSG_PUB.initialize;
1573: END IF;
1574:
1575: IF (NOT FND_API.Compatible_API_Call
1576: ( p_current_version_number => l_api_version,
1577: p_caller_version_number => p_api_version,
1578: p_api_name => l_api_name,
1579: p_pkg_name => g_pkg_name

Line 1583: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1579: p_pkg_name => g_pkg_name
1580: )
1581: ) THEN
1582:
1583: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1584: END IF;
1585:
1586: x_return_status := FND_API.G_RET_STS_SUCCESS;
1587:

Line 1586: x_return_status := FND_API.G_RET_STS_SUCCESS;

1582:
1583: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1584: END IF;
1585:
1586: x_return_status := FND_API.G_RET_STS_SUCCESS;
1587:
1588: l_progress := '010';
1589:
1590: PO_AP_PURGE_PVT.count_po_rows

Line 1592: p_init_msg_list => FND_API.G_FALSE,

1588: l_progress := '010';
1589:
1590: PO_AP_PURGE_PVT.count_po_rows
1591: ( p_api_version => 1.0,
1592: p_init_msg_list => FND_API.G_FALSE,
1593: x_return_status => x_return_status,
1594: x_msg_data => x_msg_data,
1595: x_po_hdr_count => x_po_hdr_count,
1596: x_rcv_line_count => x_rcv_line_count,

Line 1617: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1613: END IF;
1614: END IF;
1615:
1616: EXCEPTION
1617: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1619: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1620:
1621: WHEN OTHERS THEN

Line 1618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1614: END IF;
1615:
1616: EXCEPTION
1617: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1619: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1620:
1621: WHEN OTHERS THEN
1622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1619: x_msg_data := FND_MSG_PUB.get (p_encoded => 'F');
1620:
1621: WHEN OTHERS THEN
1622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1623: FND_MSG_PUB.add_exc_msg
1624: ( p_pkg_name => g_pkg_name,
1625: p_procedure_name => l_api_name || '.' || l_progress
1626: );