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.IGC_CBC_PO_GRP dependencies on IGC_CBC_PO_GRP

Line 1: PACKAGE BODY igc_cbc_po_grp AS

1: PACKAGE BODY igc_cbc_po_grp AS
2: -- $Header: IGCBCPOB.pls 120.25.12000000.2 2007/09/07 11:24:39 smannava ship $
3: --
4: -- Global Variables
5: g_org_id NUMBER := to_number(fnd_profile.value('ORG_ID'));

Line 6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'IGC_CBC_PO_GRP';

2: -- $Header: IGCBCPOB.pls 120.25.12000000.2 2007/09/07 11:24:39 smannava ship $
3: --
4: -- Global Variables
5: g_org_id NUMBER := to_number(fnd_profile.value('ORG_ID'));
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'IGC_CBC_PO_GRP';
7: --
8:
9: -- Some Common Cursors
10: -- cursor to return max and min gl dates for PO distributions

Line 167: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';

163:
164: BEGIN
165:
166: -- Initialize package variable
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

Line 199: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';

195:
196: IF NVL(l_cbc_enable,'N')= 'N' THEN
197: x_cbc_enabled := 'N';
198: -- Also set the database package variable
199: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';
200: ELSE
201: x_cbc_enabled := 'Y';
202: igc_cbc_po_grp.g_is_cbc_po_enabled := 'Y';
203: END IF;

Line 202: igc_cbc_po_grp.g_is_cbc_po_enabled := 'Y';

198: -- Also set the database package variable
199: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';
200: ELSE
201: x_cbc_enabled := 'Y';
202: igc_cbc_po_grp.g_is_cbc_po_enabled := 'Y';
203: END IF;
204:
205: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
206: p_data => x_msg_data);

Line 211: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';

207:
208: EXCEPTION
209: WHEN NO_DATA_FOUND THEN
210: x_cbc_enabled := 'N';
211: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';
212: IF c_is_cbc_on%ISOPEN
213: THEN
214: CLOSE c_is_cbc_on;
215: END IF;

Line 223: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';

219: THEN
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:

Line 237: igc_cbc_po_grp.g_is_cbc_po_enabled := 'N';

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
240: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name);
241: END IF;

Line 257: RETURN Nvl(igc_cbc_po_grp.g_is_cbc_po_enabled,'N');

253: RETURN VARCHAR2
254: IS
255:
256: BEGIN
257: RETURN Nvl(igc_cbc_po_grp.g_is_cbc_po_enabled,'N');
258:
259: END;
260:
261: -- *************************************************************************

Line 269: igc_cbc_po_grp.g_fundchk_cancel_flag := p_value;

265: PROCEDURE set_fundchk_cancel_flag (p_value IN VARCHAR2)
266: IS
267: BEGIN
268:
269: igc_cbc_po_grp.g_fundchk_cancel_flag := p_value;
270:
271: END set_fundchk_cancel_flag;
272:
273:

Line 284: RETURN Nvl(igc_cbc_po_grp.g_fundchk_cancel_flag,'N');

280: RETURN VARCHAR2
281: IS
282:
283: BEGIN
284: RETURN Nvl(igc_cbc_po_grp.g_fundchk_cancel_flag,'N');
285:
286: END;
287:
288: -- *************************************************************************

Line 392: igc_cbc_po_grp.get_fiscal_year(l_max_gl_date,l_sob_id);

388:
389: -- Get the fiscal year for the min and max gl dates
390:
391: l_max_fiscal_year :=
392: igc_cbc_po_grp.get_fiscal_year(l_max_gl_date,l_sob_id);
393: l_min_fiscal_year :=
394: igc_cbc_po_grp.get_fiscal_year(l_min_gl_date,l_sob_id);
395:
396:

Line 394: igc_cbc_po_grp.get_fiscal_year(l_min_gl_date,l_sob_id);

390:
391: l_max_fiscal_year :=
392: igc_cbc_po_grp.get_fiscal_year(l_max_gl_date,l_sob_id);
393: l_min_fiscal_year :=
394: igc_cbc_po_grp.get_fiscal_year(l_min_gl_date,l_sob_id);
395:
396:
397: -- The fiscal years are not the same then return error.
398: IF (l_max_fiscal_year <> l_min_fiscal_year) THEN

Line 600: l_fiscal_year := IGC_CBC_PO_GRP.GET_FISCAL_YEAR(p_cbc_acct_date, l_sob_id);

596: END IF;
597:
598: -- Get the Fiscal year for the entered accounting date
599:
600: l_fiscal_year := IGC_CBC_PO_GRP.GET_FISCAL_YEAR(p_cbc_acct_date, l_sob_id);
601:
602: -- Check Fiscal year is not null
603:
604: IF l_fiscal_year is NULL THEN

Line 689: l_prev_fiscal_year := igc_cbc_po_grp.get_fiscal_year( l_prev_cbc_acct_date, l_sob_id);

685: END IF;
686:
687: -- Get the previous accounting date fiscal year
688:
689: l_prev_fiscal_year := igc_cbc_po_grp.get_fiscal_year( l_prev_cbc_acct_date, l_sob_id);
690:
691: -- The fiscal year must be the same as the previous accounting date fiscal year
692:
693: IF (l_prev_fiscal_year <> l_fiscal_year) THEN

Line 745: l_dist_max_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_max_gl_date,

741: CLOSE c_bpa_dates;
742:
743: END IF;
744:
745: l_dist_max_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_max_gl_date,
746: l_sob_id);
747:
748: l_dist_min_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_min_gl_date,
749: l_sob_id);

Line 748: l_dist_min_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_min_gl_date,

744:
745: l_dist_max_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_max_gl_date,
746: l_sob_id);
747:
748: l_dist_min_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_min_gl_date,
749: l_sob_id);
750:
751: -- If the accounting date fiscal year does not match the fiscal year
752: -- on the distributions then raise error.

Line 835: l_max_req_fiscal_year := igc_cbc_po_grp.get_fiscal_year(

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(
836: l_max_cbc_acc_date, l_sob_id);
837: l_min_req_fiscal_year := igc_cbc_po_grp.get_fiscal_year(
838: l_min_cbc_acc_date, l_sob_id);
839:

Line 837: l_min_req_fiscal_year := igc_cbc_po_grp.get_fiscal_year(

833: END IF;
834:
835: l_max_req_fiscal_year := igc_cbc_po_grp.get_fiscal_year(
836: l_max_cbc_acc_date, l_sob_id);
837: l_min_req_fiscal_year := igc_cbc_po_grp.get_fiscal_year(
838: l_min_cbc_acc_date, l_sob_id);
839:
840: -- Check if the fiscal year is the same for the accounting date on
841: -- the associated documents.

Line 874: IF l_fiscal_year <> igc_cbc_po_grp.get_fiscal_year(

870:
871: END IF;
872:
873: -- ssmales 05-Feb-2003 bug 2784922 start
874: IF l_fiscal_year <> igc_cbc_po_grp.get_fiscal_year(
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;

Line 945: l_max_bpa_fiscal_year := igc_cbc_po_grp.get_fiscal_year

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);
947: l_min_bpa_fiscal_year := igc_cbc_po_grp.get_fiscal_year
948: ( l_min_bpa_accounting_date, l_sob_id);
949:

Line 947: l_min_bpa_fiscal_year := igc_cbc_po_grp.get_fiscal_year

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);
947: l_min_bpa_fiscal_year := igc_cbc_po_grp.get_fiscal_year
948: ( l_min_bpa_accounting_date, l_sob_id);
949:
950: IF (l_fiscal_year <> l_max_bpa_fiscal_year)
951: OR (l_fiscal_year <> l_min_bpa_fiscal_year)

Line 1237: igc_cbc_po_grp.valid_cbc_acct_date(

1233:
1234: -- If we need to provide a default accounting date, then try and get a valid accounting date
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,

Line 1324: igc_cbc_po_grp.valid_cbc_acct_date(

1320: END IF;
1321: END IF ;
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,

Line 1342: igc_cbc_po_grp.valid_cbc_acct_date(

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(
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,

Line 1363: igc_cbc_po_grp.valid_cbc_acct_date(

1359: OPEN c_next_period_date(l_sob_id) ;
1360: FETCH c_next_period_date INTO l_accounting_date ;
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,

Line 1780: l_fiscal_year := igc_cbc_po_grp.get_fiscal_year(sysdate, l_sob_id);

1776:
1777:
1778: --Determine current fiscal year based on sysdate
1779:
1780: l_fiscal_year := igc_cbc_po_grp.get_fiscal_year(sysdate, l_sob_id);
1781:
1782: -- Determine fiscal year of action date.
1783: -- If same as current year then continue processing
1784:

Line 1785: l_action_fiscal_year := igc_cbc_po_grp.get_fiscal_year(p_action_date, l_sob_id);

1781:
1782: -- Determine fiscal year of action date.
1783: -- If same as current year then continue processing
1784:
1785: l_action_fiscal_year := igc_cbc_po_grp.get_fiscal_year(p_action_date, l_sob_id);
1786:
1787: IF l_fiscal_year <> l_action_fiscal_year THEN
1788: Return;
1789: END IF;

Line 1811: l_po_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_po_dists_po.po_gl_date, l_po_dists_po.sob_id);

1807:
1808: -- Determine fiscal year of GL Date of PO Distribution.
1809: -- If different, from current year then do not proceed
1810:
1811: l_po_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_po_dists_po.po_gl_date, l_po_dists_po.sob_id);
1812:
1813: -- If the GL Date is not in the current fiscal year then do not process.
1814: IF l_fiscal_year <> l_po_gl_fiscal_year THEN
1815: l_passed_validation := FALSE;

Line 1826: l_req_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_linked_req.gl_encumbered_date, l_po_dists_po.sob_id);

1822: Open c_linked_req_dists(l_po_dists_po.req_distribution_id);
1823: Fetch c_linked_req_dists into l_linked_req;
1824:
1825: IF c_linked_req_dists%found THEN
1826: l_req_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_linked_req.gl_encumbered_date, l_po_dists_po.sob_id);
1827:
1828: -- If the requisition GL date is already in the current year then
1829: -- do not update the requisition
1830: IF l_req_gl_fiscal_year >= l_fiscal_year THEN

Line 1849: l_req_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_req_gl_date, l_po_dists_po.sob_id);

1845:
1846: Open c_req_dists(l_po_dists_po.req_distribution_id);
1847: Fetch c_req_dists into l_req_gl_date;
1848: Close c_req_dists;
1849: l_req_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_req_gl_date, l_po_dists_po.sob_id);
1850: IF l_req_gl_fiscal_year >= l_fiscal_year THEN
1851: l_passed_validation := FALSE;
1852: END IF;
1853:

Line 1887: l_rel_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_po_dists_sch_rel.rel_gl_date, l_po_dists_sch_rel.sob_id);

1883: l_passed_validation := TRUE;
1884:
1885: --Determine Fiscal Year of GL Date of Release Distribution
1886:
1887: l_rel_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_po_dists_sch_rel.rel_gl_date, l_po_dists_sch_rel.sob_id);
1888:
1889: IF l_fiscal_year <> l_rel_gl_fiscal_year THEN
1890: l_passed_validation := FALSE;
1891: END IF;

Line 1902: l_po_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_po_gl_date, l_po_dists_sch_rel.sob_id);

1898: Open c_po_dists(l_po_dists_sch_rel.source_distribution_id);
1899: Fetch c_po_dists into l_po_gl_date;
1900: Close c_po_dists;
1901:
1902: l_po_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_po_gl_date, l_po_dists_sch_rel.sob_id);
1903:
1904: IF l_po_gl_fiscal_year >= l_fiscal_year THEN
1905: l_passed_validation := FALSE;
1906: END IF;

Line 1933: l_rel_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_po_dists_bla_rel.rel_gl_date, l_po_dists_bla_rel.sob_id);

1929:
1930: --Determine Fiscal Year of GL Date of Release Distributions. If different then fail
1931: --validation.
1932:
1933: l_rel_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_po_dists_bla_rel.rel_gl_date, l_po_dists_bla_rel.sob_id);
1934:
1935: IF l_fiscal_year <> l_rel_gl_fiscal_year THEN
1936: l_passed_validation := FALSE;
1937: END IF;

Line 1948: l_req_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_linked_req.gl_encumbered_date, l_po_dists_bla_rel.sob_id);

1944: Fetch c_linked_req_dists into l_linked_req;
1945:
1946: IF c_linked_req_dists%found THEN
1947:
1948: l_req_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_linked_req.gl_encumbered_date, l_po_dists_bla_rel.sob_id);
1949:
1950: IF l_req_gl_fiscal_year >= l_fiscal_year THEN
1951: l_passed_validation := FALSE;
1952: END IF;

Line 1973: l_req_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_req_gl_date, l_po_dists_bla_rel.sob_id);

1969: Open c_req_dists(l_po_dists_bla_rel.req_distribution_id);
1970: Fetch c_req_dists into l_req_gl_date;
1971: Close c_req_dists;
1972:
1973: l_req_gl_fiscal_year := igc_cbc_po_grp.get_fiscal_year(l_req_gl_date, l_po_dists_bla_rel.sob_id);
1974:
1975: IF l_req_gl_fiscal_year >= l_fiscal_year THEN
1976: l_passed_validation := FALSE;
1977: END IF;

Line 2034: END igc_cbc_po_grp;

2030: );
2031:
2032: END gl_date_roll_forward ;
2033:
2034: END igc_cbc_po_grp;
2035: