[Home] [Help]
1099: p_unit_price IN NUMBER,
1100: p_func_amount IN NUMBER,
1101: p_vendor_id IN NUMBER,
1102: p_source_type_code IN VARCHAR2,
1103: p_award_qty_obj OUT NOCOPY gms_obj_award,
1104: p_status OUT NOCOPY VARCHAR2,
1105: p_error_msg_label OUT NOCOPY VARCHAR2 )
1106: AS
1107: l_doc_header_id NUMBER;
1108: l_distribution_id NUMBER;
1109: l_document_source VARCHAR2(4);
1110: l_index INTEGER;
1111:
1112: l_award_qty_obj gms_obj_award;
1113: l_dist_status VARCHAR2(5);
1114: l_status VARCHAR2(1);
1115: l_msg_label VARCHAR2(2000);
1116: l_recs_processed NUMBER;
1133: AND awd.document_type = l_document_source
1134: AND awd.dist_status <>'FABA';
1135: BEGIN
1136: -- Initilaize the Object
1137: l_award_qty_obj :=GMS_OBJ_AWARD(GMS_TYPE_VARCHAR20(),GMS_TYPE_NUMBER(),GMS_TYPE_NUMBER());
1138:
1139: l_doc_header_id :=p_doc_header_id ;
1140: l_distribution_id :=p_distribution_id ;
1141: l_document_source :=p_document_source ;