291: X_progress := '610';
292:
293: SELECT count(1)
294: INTO X_number_of_inv_dest
295: FROM po_distributions pd
296: WHERE pd.line_location_id = X_line_location_id
297: AND pd.destination_type_code = 'INVENTORY';
298:
299: ELSE
1035: INTO v_delete_allowed
1036: FROM sys.dual
1037: WHERE NOT EXISTS (
1038: SELECT null
1039: FROM PO_DISTRIBUTIONS_ALL
1040: WHERE deliver_to_location_id = p_location_id
1041: );
1042:
1043: l_msg := 'PO_LOC_DISTRIBUTIONS_ARCHIVE';
1045: INTO v_delete_allowed
1046: FROM sys.dual
1047: WHERE NOT EXISTS (
1048: SELECT null
1049: FROM PO_DISTRIBUTIONS_ARCHIVE_ALL
1050: WHERE deliver_to_location_id = p_location_id
1051: );
1052:
1053: l_msg := 'PO_LOC_DISTRIBUTIONS_INTERFACE';
1055: INTO v_delete_allowed
1056: FROM sys.dual
1057: WHERE NOT EXISTS (
1058: SELECT null
1059: FROM PO_DISTRIBUTIONS_INTERFACE
1060: WHERE deliver_to_location_id = p_location_id
1061: );
1062:
1063: l_msg := 'PO_LOC_HEADERS_ALL';