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 2007/02/06 09:51:09 rshaik 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 1682: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - START' ,1);

1678: BEGIN
1679:
1680: L_DEBUG := NVL(FND_PROFILE.value('GMS_ENABLE_DEBUG_MODE'), 'N');
1681:
1682: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - START' ,1);
1683: IF X_status is not NULL then
1684: RETURN ;
1685: END IF ;
1686: -- -------------------------------------------------

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

1833: -- Bug 5237650
1834: -- R12.PJ:XB4:DEV:APL:EXP ITEM DATE VALIDATIONS FOR SUPPLIER COST.
1835: --
1836: IF l_award_id is not null then
1837: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - calling get_valid_awards') ;
1838:
1839: open get_valid_awards ;
1840: fetch get_valid_awards into c_award_rec ;
1841: close get_valid_awards ;

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

1839: open get_valid_awards ;
1840: fetch get_valid_awards into c_award_rec ;
1841: close get_valid_awards ;
1842:
1843: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - EI Date validations') ;
1844: IF txn_rec.expenditure_item_date < TRUNC(c_award_rec.preaward_date) THEN
1845: x_status := 'GMS_EXP_ITEM_DT_BEFORE_AWD_ST' ;
1846: ELSIF txn_rec.expenditure_item_date > TRUNC(c_award_rec.end_date) THEN
1847: x_status := 'GMS_EXP_ITEM_DT_AFTER_AWD_END' ;

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

1847: x_status := 'GMS_EXP_ITEM_DT_AFTER_AWD_END' ;
1848: ELSIF c_award_rec.close_date < TRUNC(SYSDATE) THEN
1849: x_status := 'GMS_AWARD_IS_CLOSED' ;
1850: END IF ;
1851: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - EI Date validations :'||x_status) ;
1852: END IF ;
1853: --
1854: -- Bug 5237650
1855: -- R12.PJ:XB4:DEV:APL:EXP ITEM DATE VALIDATIONS FOR SUPPLIER COST.

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

1862: x_status := 'GMS_AWARD_REQUIRED' ;
1863: ELSE
1864: txn_rec.award_id := get_award_id (txn_rec.award_id,txn_rec.award_number);
1865: l_award_id := txn_rec.award_id;
1866: pa_cc_utils.log_message( 'GMS_PA_API.VERT_APP_VALIDATE - After calling get_award_id , value of award_id'
1867: ||txn_rec.award_id ,1);
1868: IF NVL(txn_rec.award_id,0) = 0 then
1869: x_status := 'GMS_INVALID_AWARD';
1870: END IF;

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

2334: -- We don't want PA to process anything for award specific
2335: -- transactions.
2336: -- PA_COST_PLUS do not process task level overrides when GMS hooks
2337: -- returns 0.
2338: -- 2995239 gms_pa_api3 main line code related changes.
2339: -- =============================================================
2340: x_status := 0 ;
2341: end if;
2342:

Line 2533: END GMS_PA_API;

2529: --For Bug 4581880
2530: when OTHERS then
2531: x_default_dist_award_id := NULL;
2532:
2533: END GMS_PA_API;