DBA Data[Home] [Help]

APPS.IGC_CBC_PO_GRP dependencies on FND_API

Line 146: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

142: -- Is_CBC_enabled
143: -- *************************************************************************
144:
145: Procedure is_cbc_enabled(p_api_version IN NUMBER
146: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
147: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
148: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
149: ,x_return_status OUT NOCOPY VARCHAR2
150: ,x_msg_count OUT NOCOPY NUMBER

Line 147: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

143: -- *************************************************************************
144:
145: Procedure is_cbc_enabled(p_api_version IN NUMBER
146: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
147: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
148: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
149: ,x_return_status OUT NOCOPY VARCHAR2
150: ,x_msg_count OUT NOCOPY NUMBER
151: ,x_msg_data OUT NOCOPY VARCHAR2

Line 148: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

144:
145: Procedure is_cbc_enabled(p_api_version IN NUMBER
146: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
147: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
148: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
149: ,x_return_status OUT NOCOPY VARCHAR2
150: ,x_msg_count OUT NOCOPY NUMBER
151: ,x_msg_data OUT NOCOPY VARCHAR2
152: ,x_cbc_enabled OUT NOCOPY VARCHAR2 )

Line 171: IF (NOT FND_API.Compatible_API_Call(l_api_version

167: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';
168:
169: -- Standard call to check for call compatibility
170:
171: IF (NOT FND_API.Compatible_API_Call(l_api_version
172: ,p_api_version
173: ,l_api_name
174: ,G_PKG_NAME))
175: THEN

Line 176: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

172: ,p_api_version
173: ,l_api_name
174: ,G_PKG_NAME))
175: THEN
176: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
177: END IF;
178:
179:
180: -- Check p_init_msg_list

Line 182: IF FND_API.to_Boolean(p_init_msg_list) THEN

178:
179:
180: -- Check p_init_msg_list
181:
182: IF FND_API.to_Boolean(p_init_msg_list) THEN
183:
184: FND_MSG_PUB.initialize;
185:
186: END IF;

Line 190: x_return_status := FND_API.G_RET_STS_SUCCESS;

186: END IF;
187:
188: -- Initialize API return status to success
189:
190: x_return_status := FND_API.G_RET_STS_SUCCESS;
191:
192: OPEN c_is_cbc_on;
193: FETCH c_is_cbc_on INTO l_cbc_enable;
194: CLOSE c_is_cbc_on;

Line 217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

213: THEN
214: CLOSE c_is_cbc_on;
215: END IF;
216:
217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
218: IF c_is_cbc_on%ISOPEN
219: THEN
220: CLOSE c_is_cbc_on;
221: END IF;

Line 224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

220: CLOSE c_is_cbc_on;
221: END IF;
222: x_cbc_enabled := 'N';
223: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';
224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
225: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
226: p_data => x_msg_data);
227:
228:

Line 235: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

231: THEN
232: CLOSE c_is_cbc_on;
233: END IF;
234:
235: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
236: x_cbc_enabled := 'N';
237: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';
238:
239: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 299: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

295: -- dates are in the same fiscal year or not.
296:
297: PROCEDURE cbc_header_validations(
298: p_api_version IN NUMBER
299: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
300: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
301: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
302: ,x_return_status OUT NOCOPY VARCHAR2
303: ,x_msg_count OUT NOCOPY NUMBER

Line 300: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

296:
297: PROCEDURE cbc_header_validations(
298: p_api_version IN NUMBER
299: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
300: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
301: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
302: ,x_return_status OUT NOCOPY VARCHAR2
303: ,x_msg_count OUT NOCOPY NUMBER
304: ,x_msg_data OUT NOCOPY VARCHAR2

Line 301: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

297: PROCEDURE cbc_header_validations(
298: p_api_version IN NUMBER
299: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
300: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
301: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
302: ,x_return_status OUT NOCOPY VARCHAR2
303: ,x_msg_count OUT NOCOPY NUMBER
304: ,x_msg_data OUT NOCOPY VARCHAR2
305: ,p_document_id IN NUMBER

Line 326: IF (NOT FND_API.Compatible_API_Call( l_api_version

322: BEGIN
323:
324: -- standard call to check for call compatibility.
325:
326: IF (NOT FND_API.Compatible_API_Call( l_api_version
327: ,p_api_version
328: ,l_api_name
329: ,G_PKG_NAME))
330: THEN

Line 331: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

327: ,p_api_version
328: ,l_api_name
329: ,G_PKG_NAME))
330: THEN
331: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
332: END IF;
333:
334: -- check p_init_msg_list
335:

Line 336: IF FND_API.to_Boolean(p_init_msg_list) THEN

332: END IF;
333:
334: -- check p_init_msg_list
335:
336: IF FND_API.to_Boolean(p_init_msg_list) THEN
337: FND_MSG_PUB.initialize;
338: END IF;
339:
340: -- initialize API return status to success

Line 342: x_return_status := FND_API.G_RET_STS_SUCCESS;

338: END IF;
339:
340: -- initialize API return status to success
341:
342: x_return_status := FND_API.G_RET_STS_SUCCESS;
343:
344: -- Find the set of books id and encumbrance flags for requisitions and purchasing
345:
346: SELECT set_of_books_id,req_encumbrance_flag,purch_encumbrance_flag

Line 402: x_return_status := FND_API.G_RET_STS_ERROR;

398: IF (l_max_fiscal_year <> l_min_fiscal_year) THEN
399:
400: FND_MESSAGE.Set_Name('IGC','IGC_MULT_FISCAL_YEARS');
401: FND_MSG_PUB.Add;
402: x_return_status := FND_API.G_RET_STS_ERROR;
403:
404: END IF;
405:
406: FND_MSG_PUB.Count_and_Get( p_count => x_msg_count

Line 414: x_return_status := FND_API.G_RET_STS_ERROR;

410: WHEN e_document_not_found THEN
411: fnd_message.set_name('IGC','IGC_DOCUMENT_NOT_FOUND');
412: fnd_message.set_token('DOC_ID',p_document_id);
413: FND_MSG_PUB.Add;
414: x_return_status := FND_API.G_RET_STS_ERROR;
415: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
416: ,p_data => x_msg_data);
417:
418: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 418: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

414: x_return_status := FND_API.G_RET_STS_ERROR;
415: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
416: ,p_data => x_msg_data);
417:
418: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
419: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
420: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
421: ,p_data => x_msg_data);
422:

Line 419: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

415: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
416: ,p_data => x_msg_data);
417:
418: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
419: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
420: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
421: ,p_data => x_msg_data);
422:
423: WHEN OTHERS THEN

Line 424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

420: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
421: ,p_data => x_msg_data);
422:
423: WHEN OTHERS THEN
424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
425:
426: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
427: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME
428: ,l_api_name);

Line 443: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

439: -- *************************************************************************
440: -- This procedure validates the CBC Accounting Date.
441:
442: PROCEDURE valid_cbc_acct_date( p_api_version IN NUMBER
443: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
444: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
445: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
446: ,x_return_status OUT NOCOPY VARCHAR2
447: ,x_msg_count OUT NOCOPY NUMBER

Line 444: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

440: -- This procedure validates the CBC Accounting Date.
441:
442: PROCEDURE valid_cbc_acct_date( p_api_version IN NUMBER
443: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
444: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
445: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
446: ,x_return_status OUT NOCOPY VARCHAR2
447: ,x_msg_count OUT NOCOPY NUMBER
448: ,x_msg_data OUT NOCOPY VARCHAR2

Line 445: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

441:
442: PROCEDURE valid_cbc_acct_date( p_api_version IN NUMBER
443: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
444: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
445: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
446: ,x_return_status OUT NOCOPY VARCHAR2
447: ,x_msg_count OUT NOCOPY NUMBER
448: ,x_msg_data OUT NOCOPY VARCHAR2
449: ,p_document_id IN NUMBER

Line 510: IF (NOT FND_API.Compatible_API_Call( l_api_version

506: BEGIN
507:
508: -- Standard Call to check for call compatibility
509:
510: IF (NOT FND_API.Compatible_API_Call( l_api_version
511: ,p_api_version
512: ,l_api_name
513: ,G_PKG_NAME))
514: THEN

Line 515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

511: ,p_api_version
512: ,l_api_name
513: ,G_PKG_NAME))
514: THEN
515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
516: END IF;
517:
518: -- Check p_init_msg_list
519:

Line 520: IF FND_API.to_Boolean( p_init_msg_list)

516: END IF;
517:
518: -- Check p_init_msg_list
519:
520: IF FND_API.to_Boolean( p_init_msg_list)
521: THEN
522: FND_MSG_PUB.initialize;
523: END IF;
524:

Line 527: x_return_status := FND_API.G_RET_STS_SUCCESS;

523: END IF;
524:
525: -- Initialize API return status to success
526:
527: x_return_status := FND_API.G_RET_STS_SUCCESS;
528:
529:
530: -- Get the set of books id and encumbrance flags for requisitions and purchasing
531:

Line 592: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;

588:
589: IF (p_cbc_acct_date is NULL) THEN
590: FND_MESSAGE.SET_NAME('IGC','IGC_PO_ACCT_DATE_NULL');
591: FND_MSG_PUB.Add;
592: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
593: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
594: ,p_data => x_msg_data);
595: RETURN;
596: END IF;

Line 609: x_return_status := FND_API.G_RET_STS_ERROR;

605:
606: FND_MESSAGE.SET_NAME('IGC','IGC_FISCAL_YEAR_NOT_FOUND');
607: FND_MESSAGE.SET_TOKEN('CBC_DATE',p_cbc_acct_date);
608: FND_MSG_PUB.Add;
609: x_return_status := FND_API.G_RET_STS_ERROR;
610: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
611: ,p_data => x_msg_data);
612: Return;
613:

Line 628: x_return_status := FND_API.G_RET_STS_ERROR;

624: IF l_po_prd_sts <> 'O'
625: THEN
626: FND_MESSAGE.SET_NAME('IGC','IGC_PO_PERIOD_NOT_OPEN');
627: FND_MSG_PUB.ADD;
628: x_return_status := FND_API.G_RET_STS_ERROR;
629: END IF;
630:
631: -- Get status of GL Period
632:

Line 643: x_return_status := FND_API.G_RET_STS_ERROR;

639: IF l_gl_prd_sts NOT IN ('O','F') THEN
640:
641: FND_MESSAGE.SET_NAME('IGC', 'IGC_GL_PERIOD_NOT_OPEN_OR_FE');
642: FND_MSG_PUB.ADD;
643: x_return_status := FND_API.G_RET_STS_ERROR;
644:
645: END IF;
646:
647: -- get the previous cbc accounting date

Line 683: x_return_status := FND_API.G_RET_STS_ERROR;

679: FND_MESSAGE.SET_NAME('IGC','IGC_CC_ACCT_DATE_BEFORE_PREV');
680: FND_MESSAGE.SET_TOKEN('ACCT_DATE',p_cbc_acct_date);
681: FND_MESSAGE.SET_TOKEN('PREV_DATE',l_prev_cbc_acct_date);
682: FND_MSG_PUB.Add;
683: x_return_status := FND_API.G_RET_STS_ERROR;
684:
685: END IF;
686:
687: -- Get the previous accounting date fiscal year

Line 699: x_return_status := FND_API.G_RET_STS_ERROR;

695: FND_MESSAGE.SET_NAME('IGC','IGC_FISCAL_YEAR_DIFF');
696: FND_MESSAGE.SET_TOKEN('ACCT_DATE',p_cbc_acct_date);
697: FND_MESSAGE.SET_TOKEN('PREV_DATE',l_prev_cbc_acct_date);
698: FND_MSG_PUB.Add;
699: x_return_status := FND_API.G_RET_STS_ERROR;
700:
701: END IF;
702:
703: END IF;

Line 761: x_return_status := FND_API.G_RET_STS_ERROR;

757: FND_MESSAGE.SET_NAME('IGC','IGC_ACCT_DATE_FY_AFTER_DISTS');
758: FND_MESSAGE.SET_TOKEN('ACCT_YEAR',l_fiscal_year);
759: FND_MESSAGE.SET_TOKEN('DIST_YEAR',l_dist_max_fiscal_year);
760: FND_MSG_PUB.Add;
761: x_return_status := FND_API.G_RET_STS_ERROR;
762:
763: END IF;
764:
765: -- Accounting date should preferrably be before the least GL date

Line 831: x_return_status := FND_API.G_RET_STS_ERROR;

827: THEN
828: FND_MESSAGE.SET_NAME('IGC','IGC_ACCT_DATE_BEFORE_REQ_DATE');
829: FND_MESSAGE.SET_TOKEN('ACCT_DATE',p_cbc_acct_date);
830: FND_MSG_PUB.Add;
831: x_return_status := FND_API.G_RET_STS_ERROR;
832:
833: END IF;
834:
835: l_max_req_fiscal_year := igc_cbc_po_grp.get_fiscal_year(

Line 848: x_return_status := FND_API.G_RET_STS_ERROR;

844: THEN
845: FND_MESSAGE.SET_NAME('IGC','IGC_ACCT_DATE_FY_DIFF_REQ');
846: FND_MESSAGE.SET_TOKEN('ACCT_YEAR',l_fiscal_year);
847: FND_MSG_PUB.Add;
848: x_return_status := FND_API.G_RET_STS_ERROR;
849: END IF;
850: END IF;
851:
852: -- Will Check Releases Accounting Date with that of PO Headers,

Line 869: x_return_status := FND_API.G_RET_STS_ERROR;

865:
866: FND_MESSAGE.SET_NAME('IGC','IGC_ACCT_DATE_BEFORE_PO_DATE');
867: FND_MESSAGE.SET_TOKEN('ACCT_DATE', p_cbc_acct_date);
868: FND_MSG_PUB.Add;
869: x_return_status := FND_API.G_RET_STS_ERROR;
870:
871: END IF;
872:
873: -- ssmales 05-Feb-2003 bug 2784922 start

Line 879: x_return_status := FND_API.G_RET_STS_ERROR;

875: l_po_cbc_acct_date, l_sob_id) THEN
876: FND_MESSAGE.SET_NAME('IGC','IGC_ACCT_DATE_FY_DIFF_PO');
877: FND_MESSAGE.SET_TOKEN('ACCT_DATE', l_fiscal_year);
878: FND_MSG_PUB.Add;
879: x_return_status := FND_API.G_RET_STS_ERROR;
880: END IF;
881: -- ssmales 05-Feb-2003 bug 2784922 end
882:
883: END IF;

Line 942: X_return_Status := FND_API.G_RET_STS_ERROR;

938: THEN
939: FND_MESSAGE.SET_NAME('IGC', 'IGC_ACCT_DATE_BEFORE_BPA_DATE');
940: FND_MESSAGE.SET_TOKEN('ACCT_DATE', p_cbc_acct_date);
941: FND_MSG_PUB.Add;
942: X_return_Status := FND_API.G_RET_STS_ERROR;
943: END IF;
944:
945: l_max_bpa_fiscal_year := igc_cbc_po_grp.get_fiscal_year
946: (l_max_bpa_accounting_date, l_sob_id);

Line 956: X_return_Status := FND_API.G_RET_STS_ERROR;

952: THEN
953: FND_MESSAGE.SET_NAME('IGC', 'IGC_ACCT_DATE_FY_DIFF_BPA');
954: FND_MESSAGE.SET_TOKEN('ACCT_YEAR', l_fiscal_year);
955: FND_MSG_PUB.Add;
956: X_return_Status := FND_API.G_RET_STS_ERROR;
957: END IF;
958: END IF;
959:
960: -- Added for PRC.FP.J, 3173178, End

Line 970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

966: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
967: p_data => x_msg_data);
968:
969: EXCEPTION
970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
972: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
973: p_data => x_msg_data);
974:

Line 971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

967: p_data => x_msg_data);
968:
969: EXCEPTION
970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
972: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
973: p_data => x_msg_data);
974:
975: WHEN OTHERS THEN

Line 976: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

972: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
973: p_data => x_msg_data);
974:
975: WHEN OTHERS THEN
976: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
977:
978: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
979: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name);
980: END IF;

Line 998: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

994:
995: PROCEDURE get_cbc_acct_date
996: (
997: p_api_version IN NUMBER,
998: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
999: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1000: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1001: x_return_status OUT NOCOPY VARCHAR2 ,
1002: x_msg_count OUT NOCOPY NUMBER ,

Line 999: p_commit IN VARCHAR2 := FND_API.G_FALSE,

995: PROCEDURE get_cbc_acct_date
996: (
997: p_api_version IN NUMBER,
998: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
999: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1000: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1001: x_return_status OUT NOCOPY VARCHAR2 ,
1002: x_msg_count OUT NOCOPY NUMBER ,
1003: x_msg_data OUT NOCOPY VARCHAR2 ,

Line 1000: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

996: (
997: p_api_version IN NUMBER,
998: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
999: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1000: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1001: x_return_status OUT NOCOPY VARCHAR2 ,
1002: x_msg_count OUT NOCOPY NUMBER ,
1003: x_msg_data OUT NOCOPY VARCHAR2 ,
1004: p_document_id IN NUMBER,

Line 1144: IF NOT FND_API.Compatible_API_Call(

1140:
1141: BEGIN
1142:
1143: -- Standard call to check for call compatibility.
1144: IF NOT FND_API.Compatible_API_Call(
1145: l_api_version,
1146: p_api_version,
1147: l_api_name,
1148: G_PKG_NAME

Line 1151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1147: l_api_name,
1148: G_PKG_NAME
1149: )
1150: THEN
1151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1152: END IF ;
1153:
1154: -- Check p_init_msg_list
1155: IF FND_API.To_Boolean(p_init_msg_list)

Line 1155: IF FND_API.To_Boolean(p_init_msg_list)

1151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1152: END IF ;
1153:
1154: -- Check p_init_msg_list
1155: IF FND_API.To_Boolean(p_init_msg_list)
1156: THEN
1157: FND_MSG_PUB.Initialize ;
1158: END IF ;
1159:

Line 1161: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1157: FND_MSG_PUB.Initialize ;
1158: END IF ;
1159:
1160: -- Initialize API return status to success
1161: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1162: l_return_status := FND_API.G_RET_STS_SUCCESS ;
1163:
1164: OPEN c_fin_info ;
1165: FETCH c_fin_info INTO l_req_enc_flag,

Line 1162: l_return_status := FND_API.G_RET_STS_SUCCESS ;

1158: END IF ;
1159:
1160: -- Initialize API return status to success
1161: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1162: l_return_status := FND_API.G_RET_STS_SUCCESS ;
1163:
1164: OPEN c_fin_info ;
1165: FETCH c_fin_info INTO l_req_enc_flag,
1166: l_pur_enc_flag,

Line 1239: p_init_msg_list => FND_API.G_FALSE,

1235: IF p_default = 'Y'
1236: THEN
1237: igc_cbc_po_grp.valid_cbc_acct_date(
1238: p_api_version => 1.0,
1239: p_init_msg_list => FND_API.G_FALSE,
1240: p_commit => FND_API.G_FALSE,
1241: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1242: x_return_status => l_return_status,
1243: x_msg_count => x_msg_count,

Line 1240: p_commit => FND_API.G_FALSE,

1236: THEN
1237: igc_cbc_po_grp.valid_cbc_acct_date(
1238: p_api_version => 1.0,
1239: p_init_msg_list => FND_API.G_FALSE,
1240: p_commit => FND_API.G_FALSE,
1241: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1242: x_return_status => l_return_status,
1243: x_msg_count => x_msg_count,
1244: x_msg_data => x_msg_data,

Line 1241: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1237: igc_cbc_po_grp.valid_cbc_acct_date(
1238: p_api_version => 1.0,
1239: p_init_msg_list => FND_API.G_FALSE,
1240: p_commit => FND_API.G_FALSE,
1241: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1242: x_return_status => l_return_status,
1243: x_msg_count => x_msg_count,
1244: x_msg_data => x_msg_data,
1245: p_document_id => p_document_id,

Line 1251: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

1247: p_document_sub_type => p_document_sub_type,
1248: p_cbc_acct_date => l_accounting_date
1249: ) ;
1250:
1251: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1252: THEN
1253: -- If date is not valid, get the maximum Acct date FROM related
1254: -- backing agreements or requisitions
1255: IF p_document_type LIKE 'REQ%'

Line 1326: p_init_msg_list => FND_API.G_FALSE,

1322:
1323: -- Validate this accounting Date
1324: igc_cbc_po_grp.valid_cbc_acct_date(
1325: p_api_version => 1.0,
1326: p_init_msg_list => FND_API.G_FALSE,
1327: p_commit => FND_API.G_FALSE,
1328: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1329: x_return_status => l_return_status,
1330: x_msg_count => x_msg_count,

Line 1327: p_commit => FND_API.G_FALSE,

1323: -- Validate this accounting Date
1324: igc_cbc_po_grp.valid_cbc_acct_date(
1325: p_api_version => 1.0,
1326: p_init_msg_list => FND_API.G_FALSE,
1327: p_commit => FND_API.G_FALSE,
1328: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1329: x_return_status => l_return_status,
1330: x_msg_count => x_msg_count,
1331: x_msg_data => x_msg_data,

Line 1328: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1324: igc_cbc_po_grp.valid_cbc_acct_date(
1325: p_api_version => 1.0,
1326: p_init_msg_list => FND_API.G_FALSE,
1327: p_commit => FND_API.G_FALSE,
1328: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1329: x_return_status => l_return_status,
1330: x_msg_count => x_msg_count,
1331: x_msg_data => x_msg_data,
1332: p_document_id => p_document_id,

Line 1338: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

1334: p_document_sub_type => p_document_sub_type,
1335: p_cbc_acct_date => l_accounting_date
1336: ) ;
1337:
1338: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1339: THEN
1340: -- Accounting Date not found, try using system date
1341: l_accounting_date := TRUNC(sysdate) ;
1342: igc_cbc_po_grp.valid_cbc_acct_date(

Line 1344: p_init_msg_list => FND_API.G_FALSE,

1340: -- Accounting Date not found, try using system date
1341: l_accounting_date := TRUNC(sysdate) ;
1342: igc_cbc_po_grp.valid_cbc_acct_date(
1343: p_api_version => 1.0,
1344: p_init_msg_list => FND_API.G_FALSE,
1345: p_commit => FND_API.G_FALSE,
1346: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1347: x_return_status => l_return_status,
1348: x_msg_count => x_msg_count,

Line 1345: p_commit => FND_API.G_FALSE,

1341: l_accounting_date := TRUNC(sysdate) ;
1342: igc_cbc_po_grp.valid_cbc_acct_date(
1343: p_api_version => 1.0,
1344: p_init_msg_list => FND_API.G_FALSE,
1345: p_commit => FND_API.G_FALSE,
1346: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1347: x_return_status => l_return_status,
1348: x_msg_count => x_msg_count,
1349: x_msg_data => x_msg_data,

Line 1346: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1342: igc_cbc_po_grp.valid_cbc_acct_date(
1343: p_api_version => 1.0,
1344: p_init_msg_list => FND_API.G_FALSE,
1345: p_commit => FND_API.G_FALSE,
1346: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1347: x_return_status => l_return_status,
1348: x_msg_count => x_msg_count,
1349: x_msg_data => x_msg_data,
1350: p_document_id => p_document_id,

Line 1356: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

1352: p_document_sub_type => p_document_sub_type,
1353: p_cbc_acct_date => l_accounting_date
1354: ) ;
1355:
1356: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1357: THEN
1358: -- Sysdate is not valid, so get the first date of next open period
1359: OPEN c_next_period_date(l_sob_id) ;
1360: FETCH c_next_period_date INTO l_accounting_date ;

Line 1365: p_init_msg_list => FND_API.G_FALSE,

1361: IF c_next_period_date%FOUND
1362: THEN
1363: igc_cbc_po_grp.valid_cbc_acct_date(
1364: p_api_version => 1.0,
1365: p_init_msg_list => FND_API.G_FALSE,
1366: p_commit => FND_API.G_FALSE,
1367: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1368: x_return_status => l_return_status,
1369: x_msg_count => x_msg_count,

Line 1366: p_commit => FND_API.G_FALSE,

1362: THEN
1363: igc_cbc_po_grp.valid_cbc_acct_date(
1364: p_api_version => 1.0,
1365: p_init_msg_list => FND_API.G_FALSE,
1366: p_commit => FND_API.G_FALSE,
1367: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1368: x_return_status => l_return_status,
1369: x_msg_count => x_msg_count,
1370: x_msg_data => x_msg_data,

Line 1367: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1363: igc_cbc_po_grp.valid_cbc_acct_date(
1364: p_api_version => 1.0,
1365: p_init_msg_list => FND_API.G_FALSE,
1366: p_commit => FND_API.G_FALSE,
1367: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1368: x_return_status => l_return_status,
1369: x_msg_count => x_msg_count,
1370: x_msg_data => x_msg_data,
1371: p_document_id => p_document_id,

Line 1383: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1379: END IF ; -- requisition date return status <> Success
1380: END IF ; -- cbc accounting date return status <> Success
1381: END IF ; -- p_default = 'Y'
1382:
1383: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1384: x_cbc_acct_date := NULL ;
1385: ELSE
1386: x_cbc_acct_date := l_accounting_date ;
1387: END IF ;

Line 1398: x_return_status := FND_API.G_RET_STS_ERROR ;

1394:
1395:
1396: EXCEPTION
1397: WHEN e_igc_doc_not_found THEN
1398: x_return_status := FND_API.G_RET_STS_ERROR ;
1399: FND_MESSAGE.SET_NAME('IGC','IGC_DOCUMENT_NOT_FOUND') ;
1400: FND_MESSAGE.SET_TOKEN('DOC_ID',p_document_id);
1401: FND_MSG_PUB.ADD ;
1402: FND_MSG_PUB.COUNT_AND_GET(

Line 1408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1404: p_data => x_msg_data
1405: ) ;
1406:
1407: WHEN OTHERS THEN
1408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1409: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1410: THEN
1411: FND_MSG_PUB.ADD_EXC_MSG(
1412: G_PKG_NAME,

Line 1433: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1429:
1430: PROCEDURE UPDATE_cbc_acct_date
1431: (
1432: p_api_version IN NUMBER,
1433: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1434: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1435: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1436: x_return_status OUT NOCOPY VARCHAR2 ,
1437: x_msg_count OUT NOCOPY NUMBER ,

Line 1434: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1430: PROCEDURE UPDATE_cbc_acct_date
1431: (
1432: p_api_version IN NUMBER,
1433: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1434: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1435: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1436: x_return_status OUT NOCOPY VARCHAR2 ,
1437: x_msg_count OUT NOCOPY NUMBER ,
1438: x_msg_data OUT NOCOPY VARCHAR2 ,

Line 1435: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1431: (
1432: p_api_version IN NUMBER,
1433: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1434: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1435: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1436: x_return_status OUT NOCOPY VARCHAR2 ,
1437: x_msg_count OUT NOCOPY NUMBER ,
1438: x_msg_data OUT NOCOPY VARCHAR2 ,
1439: p_document_id IN NUMBER,

Line 1465: IF NOT FND_API.Compatible_API_Call(

1461:
1462: BEGIN
1463:
1464: -- Standard call to check for call compatibility.
1465: IF NOT FND_API.Compatible_API_Call(
1466: l_api_version,
1467: p_api_version,
1468: l_api_name,
1469: G_PKG_NAME

Line 1472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1468: l_api_name,
1469: G_PKG_NAME
1470: )
1471: THEN
1472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1473: END IF ;
1474:
1475: -- Check p_init_msg_list
1476: IF FND_API.To_Boolean(p_init_msg_list)

Line 1476: IF FND_API.To_Boolean(p_init_msg_list)

1472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1473: END IF ;
1474:
1475: -- Check p_init_msg_list
1476: IF FND_API.To_Boolean(p_init_msg_list)
1477: THEN
1478: FND_MSG_PUB.Initialize ;
1479: END IF ;
1480:

Line 1482: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1478: FND_MSG_PUB.Initialize ;
1479: END IF ;
1480:
1481: -- Initialize API return status to success
1482: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1483:
1484: OPEN c_fin_info ;
1485: FETCH c_fin_info INTO l_req_enc_flag,
1486: l_pur_enc_flag,

Line 1570: IF FND_API.To_Boolean(p_commit)

1566: END IF ;
1567: END IF ;
1568: END IF ;
1569:
1570: IF FND_API.To_Boolean(p_commit)
1571: THEN
1572: COMMIT WORK ;
1573: END IF ;
1574:

Line 1582: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1578: ) ;
1579:
1580: EXCEPTION
1581:
1582: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1584: FND_MSG_PUB.COUNT_AND_GET(
1585: p_count => x_msg_count,
1586: p_data => x_msg_data

Line 1583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1579:
1580: EXCEPTION
1581:
1582: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1584: FND_MSG_PUB.COUNT_AND_GET(
1585: p_count => x_msg_count,
1586: p_data => x_msg_data
1587: ) ;

Line 1590: x_return_status := FND_API.G_RET_STS_ERROR ;

1586: p_data => x_msg_data
1587: ) ;
1588:
1589: WHEN e_igc_doc_not_found THEN
1590: x_return_status := FND_API.G_RET_STS_ERROR ;
1591: FND_MESSAGE.SET_NAME('IGC','IGC_DOCUMENT_NOT_FOUND') ;
1592: FND_MSG_PUB.ADD ;
1593: FND_MSG_PUB.COUNT_AND_GET(
1594: p_count => x_msg_count,

Line 1599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1595: p_data => x_msg_data
1596: ) ;
1597:
1598: WHEN OTHERS THEN
1599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1600: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1601: THEN
1602: FND_MSG_PUB.ADD_EXC_MSG(
1603: G_PKG_NAME,

Line 1627: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1623:
1624: PROCEDURE gl_date_roll_forward
1625: (
1626: p_api_version IN NUMBER,
1627: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1628: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1629: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1630: x_return_status OUT NOCOPY VARCHAR2 ,
1631: x_msg_count OUT NOCOPY NUMBER ,

Line 1628: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1624: PROCEDURE gl_date_roll_forward
1625: (
1626: p_api_version IN NUMBER,
1627: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1628: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1629: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1630: x_return_status OUT NOCOPY VARCHAR2 ,
1631: x_msg_count OUT NOCOPY NUMBER ,
1632: x_msg_data OUT NOCOPY VARCHAR2 ,

Line 1629: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1625: (
1626: p_api_version IN NUMBER,
1627: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1628: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1629: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1630: x_return_status OUT NOCOPY VARCHAR2 ,
1631: x_msg_count OUT NOCOPY NUMBER ,
1632: x_msg_data OUT NOCOPY VARCHAR2 ,
1633: p_document_id IN VARCHAR2,

Line 1743: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1739: Begin
1740:
1741: --Standard Call to check for call compatibility
1742:
1743: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1744: p_api_version,
1745: l_api_name,
1746: G_PKG_NAME )
1747: THEN

Line 1748: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1744: p_api_version,
1745: l_api_name,
1746: G_PKG_NAME )
1747: THEN
1748: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1749: END IF;
1750:
1751: --Check p_init_msg_list
1752:

Line 1753: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

1749: END IF;
1750:
1751: --Check p_init_msg_list
1752:
1753: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1754: FND_MSG_PUB.initialize;
1755: END IF;
1756:
1757: --Initialize API return status to success

Line 1759: x_return_status := FND_API.G_RET_STS_SUCCESS;

1755: END IF;
1756:
1757: --Initialize API return status to success
1758:
1759: x_return_status := FND_API.G_RET_STS_SUCCESS;
1760:
1761: --Check if Requisitions are being cancelled, if not then carry on processing
1762:
1763: /*

Line 1996: IF FND_API.To_Boolean(p_commit)

1992: END IF; --p_document_subtype = 'BLANKET'
1993:
1994: END IF; --p_document_type = 'REL'
1995:
1996: IF FND_API.To_Boolean(p_commit)
1997: THEN
1998: COMMIT WORK ;
1999: END IF ;
2000:

Line 2009: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2005: p_data => x_msg_data
2006: );
2007:
2008: EXCEPTION
2009: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2010: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2011: FND_MSG_PUB.Count_And_Get
2012: ( p_count => x_msg_count,
2013: p_data => x_msg_data

Line 2010: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2006: );
2007:
2008: EXCEPTION
2009: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2010: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2011: FND_MSG_PUB.Count_And_Get
2012: ( p_count => x_msg_count,
2013: p_data => x_msg_data
2014: );

Line 2017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2013: p_data => x_msg_data
2014: );
2015:
2016: WHEN OTHERS THEN
2017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2018:
2019: IF FND_MSG_PUB.Check_Msg_Level
2020: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2021: THEN