919:
920: END IF;
921:
922: SELECT 'T' INTO x_exist_flag
923: FROM DUAL
924: WHERE EXISTS ( SELECT NULL
925: FROM pa_draft_revenues r
926: WHERE r.project_id = p_project_id
927: AND r.released_date IS NULL);
946:
947: END IF;
948:
949: SELECT 'T' INTO x_exist_flag
950: FROM DUAL
951: WHERE EXISTS ( SELECT NULL
952: FROM pa_draft_invoices i
953: WHERE i.project_id = p_project_id
954: and i.released_by_person_id IS NULL);
1015:
1016: END IF;
1017:
1018: SELECT 'T' INTO l_ExistFlag
1019: FROM DUAL
1020: WHERE EXISTS (SELECT NULL
1021: FROM pa_project_fundings
1022: WHERE project_id = p_project_id
1023: AND funding_category = 'REVALUATION'
6322:
6323: /* Check if the invoice has any retention lines. Only if it exists subsequent code will get processed */
6324:
6325: SELECT 'T' INTO l_RetnExistFlag
6326: FROM DUAL
6327: WHERE EXISTS (SELECT NULL
6328: FROM pa_draft_invoice_items dii
6329: WHERE dii.project_id = p_project_id
6330: AND dii.draft_invoice_num = p_draft_inv_num
9157: l_LogMsg VARCHAR2(250);
9158:
9159: CURSOR check_all_non_zero_amt(l_project_funding_id NUMBER) IS
9160: SELECT 'Y' non_zero_amt
9161: FROM DUAL
9162: WHERE EXISTS ( SELECT NULL
9163: FROM pa_project_fundings
9164: WHERE project_funding_id = l_project_funding_id
9165: AND ( projfunc_allocated_amount <> 0
9529: l_NonZeroExists VARCHAR2(1);
9530:
9531: CURSOR check_all_non_zero_amt(l_EventId NUMBER) IS
9532: SELECT 'Y' non_zero_amt
9533: FROM DUAL
9534: WHERE EXISTS ( SELECT NULL
9535: FROM pa_events
9536: WHERE event_id = l_EventId
9537: AND bill_trans_rev_amount <> 0