DBA Data[Home] [Help]

APPS.FA_MODIFY_DISTRIBUTIONS_PKG dependencies on FND_API

Line 28: l_return_status VARCHAR2(10) := FND_API.G_RET_STS_ERROR;

24: l_asset_id NUMBER := 0;
25: l_trx_reference_num NUMBER := -1;
26: l_trx_type VARCHAR2(15) := NULL;
27:
28: l_return_status VARCHAR2(10) := FND_API.G_RET_STS_ERROR;
29: l_transaction_status VARCHAR2(20) := 'ERRORED';
30:
31: CURSOR MET_C IS
32: SELECT MET.rowid row_id, MET.*

Line 49: X_return_status := FND_API.G_RET_STS_SUCCESS;

45:
46: --- int_debug.enable;
47: --- int_debug.print('Entered modify_distributions ');
48:
49: X_return_status := FND_API.G_RET_STS_SUCCESS;
50:
51: -- Standard start of API savepoint.
52: ---SAVEPOINT Modify_Dist_PUB;
53:

Line 55: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

51: -- Standard start of API savepoint.
52: ---SAVEPOINT Modify_Dist_PUB;
53:
54: -- Standard call to check for call compatibility.
55: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
56: l_api_name, G_PKG_NAME)
57: THEN
58: X_return_status := FND_API.G_RET_STS_ERROR;
59: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 58: X_return_status := FND_API.G_RET_STS_ERROR;

54: -- Standard call to check for call compatibility.
55: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
56: l_api_name, G_PKG_NAME)
57: THEN
58: X_return_status := FND_API.G_RET_STS_ERROR;
59: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
60: END IF;
61:
62:

Line 59: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

55: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
56: l_api_name, G_PKG_NAME)
57: THEN
58: X_return_status := FND_API.G_RET_STS_ERROR;
59: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
60: END IF;
61:
62:
63: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 64: IF FND_API.To_Boolean(p_init_msg_list) THEN

60: END IF;
61:
62:
63: -- Initialize message list if p_init_msg_list is set to TRUE.
64: IF FND_API.To_Boolean(p_init_msg_list) THEN
65: -- Initialize error message stack.
66: FA_SRVR_MSG.Init_Server_Message;
67:
68: -- Initialize debug message stack.

Line 152: if (l_return_status = FND_API.G_RET_STS_SUCCESS) then

148: asset_id => l_asset_id);
149:
150: end if;
151:
152: if (l_return_status = FND_API.G_RET_STS_SUCCESS) then
153: l_transaction_status := 'POSTED';
154: else
155: l_transaction_status := 'ERRORED';
156: X_return_status := FND_API.G_RET_STS_ERROR;

Line 156: X_return_status := FND_API.G_RET_STS_ERROR;

152: if (l_return_status = FND_API.G_RET_STS_SUCCESS) then
153: l_transaction_status := 'POSTED';
154: else
155: l_transaction_status := 'ERRORED';
156: X_return_status := FND_API.G_RET_STS_ERROR;
157: end if;
158:
159: FOR i IN asgn_table.FIRST .. asgn_table.LAST LOOP
160:

Line 168: IF FND_API.To_Boolean(p_commit) THEN

164: AND MET.transaction_status = 'POST';
165:
166: END LOOP;
167:
168: IF FND_API.To_Boolean(p_commit) THEN
169: COMMIT WORK;
170: END IF;
171:
172: g_asgn_count := 0;

Line 239: X_return_status := FND_API.G_RET_STS_ERROR;

235: EXCEPTION
236:
237: when others then
238:
239: X_return_status := FND_API.G_RET_STS_ERROR;
240:
241: if (l_met_c_open = TRUE) then
242: CLOSE MET_C;
243: l_met_c_open := FALSE;

Line 663: h_return_status VARCHAR2(10) := FND_API.G_RET_STS_ERROR;

659: asset_id IN NUMBER
660: ) RETURN VARCHAR2
661: IS
662:
663: h_return_status VARCHAR2(10) := FND_API.G_RET_STS_ERROR;
664: h_msg_count NUMBER := 0;
665: h_msg_data VARCHAR2(512) := NULL;
666:
667: X_asset_id NUMBER;

Line 696: l_return_status VARCHAR2(15) := FND_API.G_RET_STS_ERROR;

692: l_FY_Start_Date DATE;
693: l_FY_End_Date DATE;
694: l_total_trans_units NUMBER;
695: l_new_current_units NUMBER;
696: l_return_status VARCHAR2(15) := FND_API.G_RET_STS_ERROR;
697:
698: BEGIN
699:
700: -- check that book_type_code is 'CORPORATE' book

Line 703: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then

699:
700: -- check that book_type_code is 'CORPORATE' book
701: l_return_status := check_if_corp_book(book_type_code => book_type_code);
702:
703: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
704:
705: h_return_status := FND_API.G_RET_STS_ERROR;
706: return(h_return_status);
707:

Line 705: h_return_status := FND_API.G_RET_STS_ERROR;

701: l_return_status := check_if_corp_book(book_type_code => book_type_code);
702:
703: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
704:
705: h_return_status := FND_API.G_RET_STS_ERROR;
706: return(h_return_status);
707:
708: end if;
709:

Line 720: h_return_status := FND_API.G_RET_STS_ERROR;

716: if (ADD_C%NOTFOUND) then
717:
718: CLOSE ADD_C;
719:
720: h_return_status := FND_API.G_RET_STS_ERROR;
721: return(h_return_status);
722:
723: end if;
724:

Line 736: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then

732: l_return_status := check_location_ccid(
733: p_location_id => asgn_table(i).location_id,
734: p_ccid_id => asgn_table(i).ccid);
735:
736: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
737:
738: h_return_status := FND_API.G_RET_STS_ERROR;
739: return(h_return_status);
740:

Line 738: h_return_status := FND_API.G_RET_STS_ERROR;

734: p_ccid_id => asgn_table(i).ccid);
735:
736: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
737:
738: h_return_status := FND_API.G_RET_STS_ERROR;
739: return(h_return_status);
740:
741: end if;
742:

Line 746: h_return_status := FND_API.G_RET_STS_ERROR;

742:
743: if ((asgn_table(i).dist_id is NULL) OR
744: (asgn_table(i).units + asgn_table(i).trans_units < 0)) then
745:
746: h_return_status := FND_API.G_RET_STS_ERROR;
747: return(h_return_status);
748:
749: end if;
750:

Line 759: h_return_status := FND_API.G_RET_STS_ERROR;

755: l_new_current_units := l_total_trans_units + ADDInfo.Current_Units;
756:
757: if (l_new_current_units < 1) then
758:
759: h_return_status := FND_API.G_RET_STS_ERROR;
760: return(h_return_status);
761:
762: end if;
763:

Line 779: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then

775: X_FY_End_Date => l_FY_End_Date,
776: X_return_status => l_return_status
777: );
778:
779: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
780:
781: h_return_status := FND_API.G_RET_STS_ERROR;
782: return(h_return_status);
783:

Line 781: h_return_status := FND_API.G_RET_STS_ERROR;

777: );
778:
779: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
780:
781: h_return_status := FND_API.G_RET_STS_ERROR;
782: return(h_return_status);
783:
784: end if;
785:

Line 798: h_return_status := FND_API.G_RET_STS_ERROR;

794: if (LEA_C%NOTFOUND) then
795:
796: CLOSE LEA_C;
797:
798: h_return_status := FND_API.G_RET_STS_ERROR;
799: return(h_return_status);
800:
801: end if;
802:

Line 810: p_init_msg_list => p_init_msg_list, ----FND_API.G_TRUE,

806:
807: FA_TRANS_API_PUB.Do_Unit_Adjustment(
808: -- Standard Parameters --
809: p_api_version => p_api_version, ----1.0,
810: p_init_msg_list => p_init_msg_list, ----FND_API.G_TRUE,
811: p_commit => p_commit, ----FND_API.G_TRUE,
812: p_validation_level => p_validation_level,
813: ----FND_API.G_VALID_LEVEL_FULL,
814: x_return_status => h_return_status,

Line 811: p_commit => p_commit, ----FND_API.G_TRUE,

807: FA_TRANS_API_PUB.Do_Unit_Adjustment(
808: -- Standard Parameters --
809: p_api_version => p_api_version, ----1.0,
810: p_init_msg_list => p_init_msg_list, ----FND_API.G_TRUE,
811: p_commit => p_commit, ----FND_API.G_TRUE,
812: p_validation_level => p_validation_level,
813: ----FND_API.G_VALID_LEVEL_FULL,
814: x_return_status => h_return_status,
815: x_msg_count => h_msg_count,

Line 813: ----FND_API.G_VALID_LEVEL_FULL,

809: p_api_version => p_api_version, ----1.0,
810: p_init_msg_list => p_init_msg_list, ----FND_API.G_TRUE,
811: p_commit => p_commit, ----FND_API.G_TRUE,
812: p_validation_level => p_validation_level,
813: ----FND_API.G_VALID_LEVEL_FULL,
814: x_return_status => h_return_status,
815: x_msg_count => h_msg_count,
816: x_msg_data => h_msg_data,
817: p_calling_fn =>

Line 862: if (h_return_status <> FND_API.G_RET_STS_SUCCESS) then

858: x_return_status := h_return_status;
859: x_msg_count := h_msg_count;
860: x_msg_data := h_msg_data;
861:
862: if (h_return_status <> FND_API.G_RET_STS_SUCCESS) then
863: h_return_status := FND_API.G_RET_STS_ERROR;
864: end if;
865:
866: return(h_return_status);

Line 863: h_return_status := FND_API.G_RET_STS_ERROR;

859: x_msg_count := h_msg_count;
860: x_msg_data := h_msg_data;
861:
862: if (h_return_status <> FND_API.G_RET_STS_SUCCESS) then
863: h_return_status := FND_API.G_RET_STS_ERROR;
864: end if;
865:
866: return(h_return_status);
867:

Line 871: h_return_status := FND_API.G_RET_STS_ERROR;

867:
868: EXCEPTION
869:
870: when others then
871: h_return_status := FND_API.G_RET_STS_ERROR;
872: x_return_status := h_return_status;
873: x_msg_count := h_msg_count;
874: x_msg_data := h_msg_data;
875:

Line 893: h_return_status VARCHAR2(10) := FND_API.G_RET_STS_ERROR;

889: asset_id IN NUMBER
890: ) RETURN VARCHAR2
891: IS
892:
893: h_return_status VARCHAR2(10) := FND_API.G_RET_STS_ERROR;
894: h_msg_count NUMBER := 0;
895: h_msg_data VARCHAR2(512) := NULL;
896:
897: X_asset_id NUMBER;

Line 916: l_return_status VARCHAR2(15) := FND_API.G_RET_STS_ERROR;

912: l_Calendar_Period_Close_Date DATE;
913: l_FY_Start_Date DATE;
914: l_FY_End_Date DATE;
915: l_total_trans_units NUMBER;
916: l_return_status VARCHAR2(15) := FND_API.G_RET_STS_ERROR;
917: l_count number := 0;
918: l_txn_type_code varchar2(20);
919: l_book varchar2(15);
920: l_asset number;

Line 929: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then

925:
926: -- check that book_type_code is 'CORPORATE' book
927: l_return_status := check_if_corp_book(book_type_code => book_type_code);
928:
929: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
930:
931: h_return_status := FND_API.G_RET_STS_ERROR;
932: return(h_return_status);
933:

Line 931: h_return_status := FND_API.G_RET_STS_ERROR;

927: l_return_status := check_if_corp_book(book_type_code => book_type_code);
928:
929: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
930:
931: h_return_status := FND_API.G_RET_STS_ERROR;
932: return(h_return_status);
933:
934: end if;
935:

Line 946: h_return_status := FND_API.G_RET_STS_ERROR;

942: if (ADD_C%NOTFOUND) then
943:
944: CLOSE ADD_C;
945:
946: h_return_status := FND_API.G_RET_STS_ERROR;
947: return(h_return_status);
948:
949: end if;
950:

Line 964: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then

960: l_return_status := check_location_ccid(
961: p_location_id => asgn_table(i).location_id,
962: p_ccid_id => asgn_table(i).ccid);
963:
964: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
965:
966: h_return_status := FND_API.G_RET_STS_ERROR;
967: return(h_return_status);
968:

Line 966: h_return_status := FND_API.G_RET_STS_ERROR;

962: p_ccid_id => asgn_table(i).ccid);
963:
964: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
965:
966: h_return_status := FND_API.G_RET_STS_ERROR;
967: return(h_return_status);
968:
969: end if;
970:

Line 976: h_return_status := FND_API.G_RET_STS_ERROR;

972: (asgn_table(i).dist_id is NULL)) then
973:
974: --- int_debug.print('trans_units < 0 and dist_id is NULL');
975:
976: h_return_status := FND_API.G_RET_STS_ERROR;
977: return(h_return_status);
978: end if;
979:
980: if (asgn_table(i).units + asgn_table(i).trans_units < 0) then

Line 984: h_return_status := FND_API.G_RET_STS_ERROR;

980: if (asgn_table(i).units + asgn_table(i).trans_units < 0) then
981:
982: --- int_debug.print('units + trans_units < 0');
983:
984: h_return_status := FND_API.G_RET_STS_ERROR;
985: return(h_return_status);
986: end if;
987:
988: l_total_trans_units := l_total_trans_units+asgn_table(i).trans_units;

Line 996: h_return_status := FND_API.G_RET_STS_ERROR;

992: if (l_total_trans_units <> 0) then
993:
994: --- int_debug.print('l_total_trans_units <> 0');
995:
996: h_return_status := FND_API.G_RET_STS_ERROR;
997: return(h_return_status);
998: end if;
999:
1000: --- int_debug.print('Entered get_header_info ');

Line 1017: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then

1013: X_FY_End_Date => l_FY_End_Date,
1014: X_return_status => l_return_status
1015: );
1016:
1017: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1018: h_return_status := FND_API.G_RET_STS_ERROR;
1019: return(h_return_status);
1020: end if;
1021:

Line 1018: h_return_status := FND_API.G_RET_STS_ERROR;

1014: X_return_status => l_return_status
1015: );
1016:
1017: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
1018: h_return_status := FND_API.G_RET_STS_ERROR;
1019: return(h_return_status);
1020: end if;
1021:
1022: -- fix for 2219293

Line 1046: p_init_msg_list => p_init_msg_list, ----FND_API.G_TRUE,

1042:
1043: FA_TRANS_API_PUB.Do_Transfer(
1044: -- Standard Parameters --
1045: p_api_version => p_api_version, ----1.0,
1046: p_init_msg_list => p_init_msg_list, ----FND_API.G_TRUE,
1047: p_commit => p_commit, ----FND_API.G_TRUE,
1048: p_validation_level => p_validation_level,
1049: ----FND_API.G_VALID_LEVEL_FULL,
1050: x_return_status => h_return_status,

Line 1047: p_commit => p_commit, ----FND_API.G_TRUE,

1043: FA_TRANS_API_PUB.Do_Transfer(
1044: -- Standard Parameters --
1045: p_api_version => p_api_version, ----1.0,
1046: p_init_msg_list => p_init_msg_list, ----FND_API.G_TRUE,
1047: p_commit => p_commit, ----FND_API.G_TRUE,
1048: p_validation_level => p_validation_level,
1049: ----FND_API.G_VALID_LEVEL_FULL,
1050: x_return_status => h_return_status,
1051: x_msg_count => h_msg_count,

Line 1049: ----FND_API.G_VALID_LEVEL_FULL,

1045: p_api_version => p_api_version, ----1.0,
1046: p_init_msg_list => p_init_msg_list, ----FND_API.G_TRUE,
1047: p_commit => p_commit, ----FND_API.G_TRUE,
1048: p_validation_level => p_validation_level,
1049: ----FND_API.G_VALID_LEVEL_FULL,
1050: x_return_status => h_return_status,
1051: x_msg_count => h_msg_count,
1052: x_msg_data => h_msg_data,
1053: p_calling_fn =>

Line 1097: if (h_return_status <> FND_API.G_RET_STS_SUCCESS) then

1093: x_return_status := h_return_status;
1094: x_msg_count := h_msg_count;
1095: x_msg_data := h_msg_data;
1096:
1097: if (h_return_status <> FND_API.G_RET_STS_SUCCESS) then
1098: h_return_status := FND_API.G_RET_STS_ERROR;
1099: end if;
1100:
1101: return(h_return_status);

Line 1098: h_return_status := FND_API.G_RET_STS_ERROR;

1094: x_msg_count := h_msg_count;
1095: x_msg_data := h_msg_data;
1096:
1097: if (h_return_status <> FND_API.G_RET_STS_SUCCESS) then
1098: h_return_status := FND_API.G_RET_STS_ERROR;
1099: end if;
1100:
1101: return(h_return_status);
1102:

Line 1105: h_return_status := FND_API.G_RET_STS_ERROR;

1101: return(h_return_status);
1102:
1103: EXCEPTION
1104: when others then
1105: h_return_status := FND_API.G_RET_STS_ERROR;
1106: x_return_status := h_return_status;
1107: x_msg_count := h_msg_count;
1108: x_msg_data := h_msg_data;
1109:

Line 1168: X_return_status := FND_API.G_RET_STS_SUCCESS;

1164: where asset_id = X_Asset_Id
1165: and book_type_code = X_Book_Type_Code;
1166: -------------------------------------------------
1167:
1168: X_return_status := FND_API.G_RET_STS_SUCCESS;
1169:
1170: EXCEPTION
1171: when others then
1172: X_return_status := FND_API.G_RET_STS_ERROR;

Line 1172: X_return_status := FND_API.G_RET_STS_ERROR;

1168: X_return_status := FND_API.G_RET_STS_SUCCESS;
1169:
1170: EXCEPTION
1171: when others then
1172: X_return_status := FND_API.G_RET_STS_ERROR;
1173:
1174: END get_header_info;
1175:
1176: FUNCTION check_if_corp_book(

Line 1191: l_return_status VARCHAR2(15) := FND_API.G_RET_STS_ERROR;

1187: AND BC.book_class = 'CORPORATE'
1188: AND rownum <= 1;
1189:
1190: l_book_class NUMBER := 0;
1191: l_return_status VARCHAR2(15) := FND_API.G_RET_STS_ERROR;
1192: l_cbc_c_open BOOLEAN := FALSE;
1193:
1194: BEGIN
1195:

Line 1210: l_return_status := FND_API.G_RET_STS_ERROR;

1206: if (Chk_Book_Class_C%NOTFOUND) then
1207:
1208: CLOSE Chk_Book_Class_C;
1209:
1210: l_return_status := FND_API.G_RET_STS_ERROR;
1211: return(l_return_status);
1212:
1213: end if;
1214:

Line 1219: l_return_status := FND_API.G_RET_STS_SUCCESS;

1215: CLOSE Chk_Book_Class_C;
1216:
1217:
1218: if (l_book_class = 1) then
1219: l_return_status := FND_API.G_RET_STS_SUCCESS;
1220: return(l_return_status);
1221: else
1222: l_return_status := FND_API.G_RET_STS_ERROR;
1223: return(l_return_status);

Line 1222: l_return_status := FND_API.G_RET_STS_ERROR;

1218: if (l_book_class = 1) then
1219: l_return_status := FND_API.G_RET_STS_SUCCESS;
1220: return(l_return_status);
1221: else
1222: l_return_status := FND_API.G_RET_STS_ERROR;
1223: return(l_return_status);
1224: end if;
1225:
1226: else

Line 1227: l_return_status := FND_API.G_RET_STS_ERROR;

1223: return(l_return_status);
1224: end if;
1225:
1226: else
1227: l_return_status := FND_API.G_RET_STS_ERROR;
1228: return(l_return_status);
1229: end if;
1230:
1231: EXCEPTION

Line 1240: l_return_status := FND_API.G_RET_STS_ERROR;

1236: CLOSE Chk_Book_Class_C;
1237: l_cbc_c_open := FALSE;
1238: end if;
1239:
1240: l_return_status := FND_API.G_RET_STS_ERROR;
1241: return(l_return_status);
1242:
1243:
1244: END check_if_corp_book;

Line 1272: l_return_status VARCHAR2(15) := FND_API.G_RET_STS_ERROR;

1268: AND rownum <= 1;
1269:
1270: l_loc_out NUMBER := 0;
1271: l_ccid_out NUMBER := 0;
1272: l_return_status VARCHAR2(15) := FND_API.G_RET_STS_ERROR;
1273: l_cl_c_open BOOLEAN := FALSE;
1274: l_cc_c_open BOOLEAN := FALSE;
1275:
1276:

Line 1294: l_return_status := FND_API.G_RET_STS_ERROR;

1290: OPEN Chk_Location_C;
1291: FETCH Chk_Location_C INTO l_loc_out;
1292:
1293: if (Chk_Location_C%NOTFOUND) then
1294: l_return_status := FND_API.G_RET_STS_ERROR;
1295: end if;
1296:
1297: CLOSE Chk_Location_C;
1298: l_cl_c_open := TRUE;

Line 1301: l_return_status := FND_API.G_RET_STS_SUCCESS;

1297: CLOSE Chk_Location_C;
1298: l_cl_c_open := TRUE;
1299:
1300: if (l_loc_out = 1) then
1301: l_return_status := FND_API.G_RET_STS_SUCCESS;
1302: else
1303: l_return_status := FND_API.G_RET_STS_ERROR;
1304: return(l_return_status);
1305: end if;

Line 1303: l_return_status := FND_API.G_RET_STS_ERROR;

1299:
1300: if (l_loc_out = 1) then
1301: l_return_status := FND_API.G_RET_STS_SUCCESS;
1302: else
1303: l_return_status := FND_API.G_RET_STS_ERROR;
1304: return(l_return_status);
1305: end if;
1306:
1307: l_ccid_out := 0;

Line 1314: l_return_status := FND_API.G_RET_STS_ERROR;

1310: OPEN Chk_Ccid_C;
1311: FETCH Chk_Ccid_C INTO l_ccid_out;
1312:
1313: if (Chk_Ccid_C%NOTFOUND) then
1314: l_return_status := FND_API.G_RET_STS_ERROR;
1315: end if;
1316:
1317: CLOSE Chk_Ccid_C;
1318: l_cc_c_open := TRUE;

Line 1321: l_return_status := FND_API.G_RET_STS_SUCCESS;

1317: CLOSE Chk_Ccid_C;
1318: l_cc_c_open := TRUE;
1319:
1320: if (l_ccid_out = 1) then
1321: l_return_status := FND_API.G_RET_STS_SUCCESS;
1322: return(l_return_status);
1323: else
1324: l_return_status := FND_API.G_RET_STS_ERROR;
1325: return(l_return_status);

Line 1324: l_return_status := FND_API.G_RET_STS_ERROR;

1320: if (l_ccid_out = 1) then
1321: l_return_status := FND_API.G_RET_STS_SUCCESS;
1322: return(l_return_status);
1323: else
1324: l_return_status := FND_API.G_RET_STS_ERROR;
1325: return(l_return_status);
1326: end if;
1327:
1328: EXCEPTION

Line 1342: l_return_status := FND_API.G_RET_STS_ERROR;

1338: CLOSE Chk_Ccid_C;
1339: l_cc_c_open := FALSE;
1340: end if;
1341:
1342: l_return_status := FND_API.G_RET_STS_ERROR;
1343: return(l_return_status);
1344:
1345:
1346: END check_location_ccid;