The following lines contain the word 'select', 'insert', 'update' or 'delete':
-- This updates the G_msg_count after adding a message
-- to the message variable.
--
-- +++++++++++++
PROCEDURE add_message_to_stack( P_Label IN Varchar2,
P_token1 IN varchar2 default NULL,
P_val1 IN varchar2 default NULL,
P_token2 IN varchar2 default NULL,
P_val2 in varchar2 default NULL,
P_token3 IN varchar2 default NULL,
P_val3 in varchar2 default NULL ) is
BEGIN
gms_award_pvt.add_message_to_stack(P_Label, P_token1, P_val1, P_token2, P_val2, P_token3, P_val3 ) ;
P_LAST_UPDATE_DATE IN DATE,
P_LAST_UPDATED_BY IN NUMBER,
P_CREATED_BY IN NUMBER,
P_CREATION_DATE IN DATE,
P_LAST_UPDATE_LOGIN IN NUMBER,
P_AWARD_NUMBER IN VARCHAR2,
P_AWARD_SHORT_NAME IN VARCHAR2,
P_AWARD_FULL_NAME IN VARCHAR2,
P_AWARD_START_DATE IN DATE,
P_AWARD_END_DATE IN DATE,
P_AWARD_CLOSE_DATE IN DATE,
P_PREAWARD_DATE IN DATE,
P_AWARD_PURPOSE_CODE IN VARCHAR2,
P_AWARD_STATUS_CODE IN VARCHAR2,
P_AWARD_MANAGER_ID IN NUMBER,
P_AWARD_ORGANIZATION_ID IN NUMBER,
P_FUNDING_SOURCE_ID IN NUMBER,
P_FUNDING_SOURCE_AWARD_NUM IN VARCHAR2,
P_ALLOWABLE_SCHEDULE IN VARCHAR2,
P_INDIRECT_SCHEDULE IN VARCHAR2,
P_COST_IND_SCH_FIXED_DATE IN DATE,
P_REVENUE_DISTRIBUTION_RULE IN VARCHAR2,
P_BILLING_DISTRIBUTION_RULE IN VARCHAR2,
P_BILLING_FORMAT IN VARCHAR2,
P_BILLING_TERM_ID IN NUMBER,
P_AGENCY_FORM IN VARCHAR2,
P_BILL_TO_CUSTOMER_ID IN VARCHAR2,
P_LABOR_INVOICE_FORMAT_ID IN VARCHAR2,
P_NON_LABOR_INVOICE_FORMAT_ID IN VARCHAR2,
P_BILL_TO_ADDRESS_ID IN NUMBER,
P_SHIP_TO_ADDRESS_ID IN NUMBER,
P_LOC_BILL_TO_ADDRESS_ID IN NUMBER,
P_LOC_SHIP_TO_ADDRESS_ID IN NUMBER,
P_HARD_LIMIT_FLAG IN VARCHAR2,
P_INVOICE_LIMIT_FLAG IN VARCHAR2, /*Bug 6642901*/
P_BILLING_OFFSET IN NUMBER,
P_BILLING_CYCLE IN VARCHAR2,
P_TRANSACTION_NUM IN VARCHAR2,
P_AMOUNT_TYPE_CODE IN VARCHAR2,
P_BOUNDARY_CODE IN VARCHAR2,
P_FUNDS_CONTROL_AT_AWARD IN VARCHAR2,
P_FUNDS_CONTROL_AT_TASK IN VARCHAR2,
P_FUNDS_CONTROL_AT_RES_GROUP IN VARCHAR2,
P_FUNDS_CONTROL_AT_RES IN VARCHAR2,
P_ATTRIBUTE_CATEGORY IN VARCHAR2,
P_ATTRIBUTE1 IN VARCHAR2,
P_ATTRIBUTE2 IN VARCHAR2,
P_ATTRIBUTE3 IN VARCHAR2,
P_ATTRIBUTE4 IN VARCHAR2,
P_ATTRIBUTE5 IN VARCHAR2,
P_ATTRIBUTE6 IN VARCHAR2,
P_ATTRIBUTE7 IN VARCHAR2,
P_ATTRIBUTE8 IN VARCHAR2,
P_ATTRIBUTE9 IN VARCHAR2,
P_ATTRIBUTE10 IN VARCHAR2,
P_ATTRIBUTE11 IN VARCHAR2,
P_ATTRIBUTE12 IN VARCHAR2,
P_ATTRIBUTE13 IN VARCHAR2,
P_ATTRIBUTE14 IN VARCHAR2,
P_ATTRIBUTE15 IN VARCHAR2,
P_AGREEMENT_TYPE IN VARCHAR2,
P_ORG_ID IN NUMBER,
P_WF_ENABLED_FLAG IN VARCHAR2,
P_PROPOSAL_ID IN NUMBER ) IS
l_api_name varchar2(30) := 'GMS_AWARD_PUB.CREATE_AWARD';
SELECT billing_cycle_id
FROM pa_billing_cycles
WHERE trunc(sysdate) between start_date_active
and NVL( end_date_active, sysdate )
and billing_cycle_name = P_BILLING_CYCLE ;
SELECT allowability_schedule_id
FROM gms_allowability_schedules
WHERE allow_sch_name = P_ALLOWABLE_SCHEDULE ;
SELECT ind_rate_sch_id,
ind_rate_schedule_type
FROM pa_ind_rate_schedules
WHERE ind_rate_sch_name = P_INDIRECT_SCHEDULE ;
l_award_rec.last_updated_by := NVL(P_LAST_UPDATED_BY, fnd_global.user_id) ;
l_award_rec.last_update_date := NVL(P_LAST_UPDATE_DATE, SYSDATE) ;
l_award_rec.last_updated_by := NVL(P_LAST_UPDATED_BY, fnd_global.user_id) ;
l_award_rec.last_update_login := NVL(P_LAST_UPDATE_LOGIN, fnd_global.user_id ) ;
P_LAST_UPDATE_DATE IN DATE ,
P_LAST_UPDATED_BY IN NUMBER ,
P_CREATED_BY IN NUMBER ,
P_CREATION_DATE IN DATE ,
P_LAST_UPDATE_LOGIN IN NUMBER ,
P_AWARD_NUMBER IN VARCHAR2 ,
--P_INSTALLMENT_NUMBER IN NUMBER ,
P_INSTALLMENT_NUMBER IN VARCHAR2 , --Added for bug14319593
P_INSTALLMENT_TYPE_CODE IN VARCHAR2 ,
P_DESCRIPTION IN VARCHAR2 ,
P_ISSUE_DATE IN DATE ,
P_INSTALLMENT_START_DATE IN DATE ,
P_INSTALLMENT_END_DATE IN DATE ,
P_INSTALLMENT_CLOSE_DATE IN DATE ,
P_ACTIVE_FLAG IN VARCHAR2 ,
P_BILLABLE_FLAG IN VARCHAR2 ,
P_DIRECT_COST IN NUMBER ,
P_INDIRECT_COST IN NUMBER ,
P_ATTRIBUTE_CATEGORY IN VARCHAR2 ,
P_ATTRIBUTE1 IN VARCHAR2 ,
P_ATTRIBUTE2 IN VARCHAR2 ,
P_ATTRIBUTE3 IN VARCHAR2 ,
P_ATTRIBUTE4 IN VARCHAR2 ,
P_ATTRIBUTE5 IN VARCHAR2 ,
P_ATTRIBUTE6 IN VARCHAR2 ,
P_ATTRIBUTE7 IN VARCHAR2 ,
P_ATTRIBUTE8 IN VARCHAR2 ,
P_ATTRIBUTE9 IN VARCHAR2 ,
P_ATTRIBUTE10 IN VARCHAR2 ,
P_ATTRIBUTE11 IN VARCHAR2 ,
P_ATTRIBUTE12 IN VARCHAR2 ,
P_ATTRIBUTE13 IN VARCHAR2 ,
P_ATTRIBUTE14 IN VARCHAR2 ,
P_ATTRIBUTE15 IN VARCHAR2 ,
P_PROPOSAL_ID IN NUMBER
) IS
/* added below code for 12720195 */
l_api_name varchar2(50) := 'GMS_AWARD_PUB.CREATE_INSTALLMENT';
SELECT award_id
FROM gms_awards_all
WHERE award_number = P_AWARD_NUMBER;
l_installment_rec.last_updated_by := NVL(P_LAST_UPDATED_BY, fnd_global.user_id) ;
l_installment_rec.last_update_date := NVL(P_LAST_UPDATE_DATE, SYSDATE) ;
l_installment_rec.last_update_login := NVL(P_LAST_UPDATE_LOGIN, fnd_global.user_id ) ;
P_LAST_UPDATE_DATE IN DATE ,
P_LAST_UPDATED_BY IN NUMBER ,
P_CREATED_BY IN NUMBER ,
P_CREATION_DATE IN DATE ,
P_LAST_UPDATE_LOGIN IN NUMBER,
P_AWARD_NUMBER IN VARCHAR2 ,
P_AWARD_ROLE_CODE IN VARCHAR2 ,
P_PERSON_ID IN VARCHAR2 ,
P_START_DATE_ACTIVE IN DATE ,
P_END_DATE_ACTIVE IN DATE ,
P_REQUIRED_FLAG IN VARCHAR2
)IS
BEGIN
NULL ;
P_LAST_UPDATE_DATE IN DATE ,
P_LAST_UPDATED_BY IN NUMBER ,
P_CREATED_BY IN NUMBER ,
P_CREATION_DATE IN DATE ,
P_LAST_UPDATE_LOGIN IN NUMBER ,
P_AWARD_NUMBER IN VARCHAR2 ,
P_CATEGORY_NAME IN VARCHAR2 ,
P_TERM_ID IN NUMBER ,
P_OPERAND IN VARCHAR2 ,
P_VALUE IN NUMBER
) is
BEGIN
NULL ;
P_LAST_UPDATE_DATE IN DATE,
P_LAST_UPDATED_BY IN NUMBER ,
P_CREATED_BY IN NUMBER ,
P_CREATION_DATE IN DATE ,
P_LAST_UPDATE_LOGIN IN NUMBER ,
P_AWARD_NUMBER IN VARCHAR2 ,
P_REFERENCE_TYPE IN VARCHAR2 ,
P_REFERENCE_VALUE IN VARCHAR2 ,
P_REQUIRED_FLAG IN VARCHAR2
) is
BEGIN
NULL ;
P_LAST_UPDATE_DATE IN DATE,
P_LAST_UPDATED_BY IN NUMBER ,
P_CREATED_BY IN NUMBER ,
P_CREATION_DATE IN DATE ,
P_LAST_UPDATE_LOGIN IN NUMBER ,
P_AWARD_NUMBER IN VARCHAR2 ,
P_CONTACT_ID IN NUMBER ,
P_PRIMARY_FLAG IN VARCHAR2 ,
P_USAGE_CODE IN VARCHAR2
) IS
BEGIN
NULL ;
P_LAST_UPDATE_DATE IN DATE,
P_LAST_UPDATED_BY IN NUMBER ,
P_CREATED_BY IN NUMBER ,
P_CREATION_DATE IN DATE ,
P_LAST_UPDATE_LOGIN IN NUMBER ,
P_AWARD_NUMBER IN VARCHAR2 ,
P_REPORT_NAME IN VARCHAR2 ,
P_FREQUENCY_CODE IN VARCHAR2 ,
P_DUE_WITHIN_DAYS IN NUMBER ,
P_SITE_USE_ID IN NUMBER ,
P_NUMBER_OF_COPIES IN NUMBER
) IS
BEGIN
NULL ;