APPS.GMS_AWARDS_PKG dependencies on GMS_AWARDS

Line 1: package body GMS_AWARDS_PKG as

1: package body GMS_AWARDS_PKG as
2: /* $Header: gmsawawb.pls 120.2.12010000.2 2008/10/30 09:09:17 rrambati ship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out NOCOPY VARCHAR2,
5: X_AWARD_ID in NUMBER,

Line 82: cursor C is select ROWID from GMS_AWARDS

78: X_INVOICE_LIMIT_FLAG in VARCHAR2 , /*Bug 6642901 */
79: X_PROPOSAL_ID IN NUMBER DEFAULT NULL,
80: X_BUDGET_WF_ENABLED_FLAG in VARCHAR2
81: ) is
82: cursor C is select ROWID from GMS_AWARDS
83: where AWARD_ID = X_AWARD_ID;
84: X_LAST_UPDATE_DATE DATE;
85: X_LAST_UPDATED_BY NUMBER;
86: X_LAST_UPDATE_LOGIN NUMBER;

Line 112: insert into GMS_AWARDS (

108: else
109: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
110: app_exception.raise_exception;
111: end if;
112: insert into GMS_AWARDS (
113: AWARD_ID,
114: AWARD_NUMBER,
115: AWARD_SHORT_NAME,
116: AWARD_FULL_NAME,

Line 435: from GMS_AWARDS

431: LOC_SHIP_TO_ADDRESS_ID,
432: AWARD_ORGANIZATION_ID,
433: HARD_LIMIT_FLAG,
434: INVOICE_LIMIT_FLAG /*Bug6642901 */
435: from GMS_AWARDS
436: where AWARD_ID = X_AWARD_ID
437: for update of AWARD_ID nowait;
438: tlinfo c1%rowtype;
439:

Line 767: update GMS_AWARDS set

763: else
764: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
765: app_exception.raise_exception;
766: end if;
767: update GMS_AWARDS set
768: AWARD_NUMBER = X_AWARD_NUMBER,
769: AWARD_SHORT_NAME = X_AWARD_SHORT_NAME,
770: AWARD_FULL_NAME = X_AWARD_FULL_NAME,
771: FUNDING_SOURCE_ID = X_FUNDING_SOURCE_ID,

Line 876: delete from GMS_AWARDS

872: IF RETCODE <>'S' THEN
873: RETURN;
874: END IF;
875:
876: delete from GMS_AWARDS
877: where AWARD_ID = X_AWARD_ID;
878: if (sql%notfound) then
879: raise no_data_found;
880: end if;

Line 888: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_AWARDS_PKG: DELETE_ROW');

884: --'S' for success, 'E' form exception for , and 'U' for Undefine Exception
885: retcode :='U';
886: errbuff := 'Error :'||substr(sqlerrm,1,200);
887: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
888: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_AWARDS_PKG: DELETE_ROW');
889: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
890: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
891: FND_MSG_PUB.add;
892: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

Line 912: end GMS_AWARDS_PKG;

908: set project_status_code = nvl(X_Status,'CLOSED')
909: where project_id = X_award_project_id;
910: end UPDATE_AWARD_PROJECT_STATUS;
911:
912: end GMS_AWARDS_PKG;