APPS.GMS_PA_API dependencies on GMS_PA_API

Line 1: PACKAGE BODY GMS_PA_API AS

1: PACKAGE BODY GMS_PA_API AS
2: /* $Header: gmspax1b.pls 120.10.12020000.2 2012/10/16 13:46:17 navemish ship $ */
3:
4:
5: -- Assing value "NVL(FND_PROFILE.value('GMS_ENABLE_DEBUG_MODE'), 'N') " to L_DEBUG

Line 26: -- This function returns the error x_error set by the GMS_PA_API.VERT_TRANSFER

22: G_trx_source pa_transaction_sources.transaction_source%TYPE ;
23: G_GL_accted_flag varchar2(1) ;
24:
25: -- ----------------------------------------------------------------------------
26: -- This function returns the error x_error set by the GMS_PA_API.VERT_TRANSFER
27: -- ----------------------------------------------------------------------------
28:
29: G_EXPENDITURE_ITEM_ID PA_EXPENDITURE_ITEMS_ALL.EXPENDITURE_ITEM_ID%TYPE := NULL; /* 5490120 */
30: G_AWARD_NUMBER GMS_AWARDS_ALL.AWARD_NUMBER%TYPE := NULL; /* 5490120 */

Line 67: pa_cc_utils.log_message('GMS_PA_API.get_award_id : Unexpected error : '||SQLERRM,1);

63: WHEN OTHERS THEN
64: IF C_get_award_id%ISOPEN THEN
65: close C_get_award_id ;
66: END IF ;
67: pa_cc_utils.log_message('GMS_PA_API.get_award_id : Unexpected error : '||SQLERRM,1);
68: return 0;
69: END get_award_id ;
70:
71: -- ========================================================================================================

Line 1695: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - START' ,1);

1691: BEGIN
1692:
1693: L_DEBUG := NVL(FND_PROFILE.value('GMS_ENABLE_DEBUG_MODE'), 'N');
1694:
1695: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - START' ,1);
1696: IF X_status is not NULL then
1697: RETURN ;
1698: END IF ;
1699: -- -------------------------------------------------

Line 1850: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - calling get_valid_awards') ;

1846: -- Bug 5237650
1847: -- R12.PJ:XB4:DEV:APL:EXP ITEM DATE VALIDATIONS FOR SUPPLIER COST.
1848: --
1849: IF l_award_id is not null then
1850: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - calling get_valid_awards') ;
1851:
1852: open get_valid_awards ;
1853: fetch get_valid_awards into c_award_rec ;
1854: close get_valid_awards ;

Line 1856: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - EI Date validations') ;

1852: open get_valid_awards ;
1853: fetch get_valid_awards into c_award_rec ;
1854: close get_valid_awards ;
1855:
1856: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - EI Date validations') ;
1857: IF txn_rec.expenditure_item_date < TRUNC(c_award_rec.preaward_date) THEN
1858: x_status := 'GMS_EXP_ITEM_DT_BEFORE_AWD_ST' ;
1859: ELSIF txn_rec.expenditure_item_date > TRUNC(c_award_rec.end_date) THEN
1860: x_status := 'GMS_EXP_ITEM_DT_AFTER_AWD_END' ;

Line 1864: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - EI Date validations :'||x_status) ;

1860: x_status := 'GMS_EXP_ITEM_DT_AFTER_AWD_END' ;
1861: ELSIF c_award_rec.close_date < TRUNC(SYSDATE) THEN
1862: x_status := 'GMS_AWARD_IS_CLOSED' ;
1863: END IF ;
1864: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - EI Date validations :'||x_status) ;
1865: END IF ;
1866: --
1867: -- Bug 5237650
1868: -- R12.PJ:XB4:DEV:APL:EXP ITEM DATE VALIDATIONS FOR SUPPLIER COST.

Line 1879: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - After calling get_award_id , value of award_id'

1875: x_status := 'GMS_AWARD_REQUIRED' ;
1876: ELSE
1877: txn_rec.award_id := get_award_id (txn_rec.award_id,txn_rec.award_number);
1878: l_award_id := txn_rec.award_id;
1879: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - After calling get_award_id , value of award_id'
1880: ||txn_rec.award_id ,1);
1881: IF NVL(txn_rec.award_id,0) = 0 then
1882: x_status := 'GMS_INVALID_AWARD';
1883: END IF;

Line 2389: -- 2995239 gms_pa_api3 main line code related changes.

2385: -- We don't want PA to process anything for award specific
2386: -- transactions.
2387: -- PA_COST_PLUS do not process task level overrides when GMS hooks
2388: -- returns 0.
2389: -- 2995239 gms_pa_api3 main line code related changes.
2390: -- =============================================================
2391: x_status := 0 ;
2392: end if;
2393:

Line 2584: END GMS_PA_API;

2580: --For Bug 4581880
2581: when OTHERS then
2582: x_default_dist_award_id := NULL;
2583:
2584: END GMS_PA_API;