[Home] [Help]
154: item_safetycode c_get_item_safety_phrase%ROWTYPE;
155:
156: CURSOR c_get_item_risk_phrase IS
157: SELECT risk_phrase_code
158: FROM gr_inv_item_risk_phrases
159: WHERE risk_phrase_code = l_phrase_code
160: and organization_id = l_organization_id
161: and inventory_item_id = l_inventory_item_id;
162: item_riskcode c_get_item_risk_phrase%ROWTYPE;
697: END IF;
698: CLOSE c_get_risk_phrase_code;
699:
700: -- If the field name is associated to a field name class using the Risk Phrases form block,
701: -- validate that the record does not already exist, and insert the record into the GR_INV_ITEM_RISK_PHRASES table
702: -- An error message will be written to the log file if the record already exists
703:
704: OPEN c_get_item_risk_phrase;
705: FETCH c_get_item_risk_phrase INTO l_phrase_code2;
715: END IF;
716:
717: CLOSE c_get_item_risk_phrase;
718:
719: INSERT INTO GR_INV_ITEM_RISK_PHRASES
720: (organization_id,
721: inventory_item_id,
722: risk_phrase_code,
723: created_by,
875:
876: ELSIF l_form_block = 'RISK_PHRASES' THEN
877:
878: -- If the field name is associated to a field name class using the Risk Phrases form block,
879: -- validate that the record exists, and delete the record from the GR_INV_ITEM_RISK_PHRASES table
880: -- An error message will be written to the log file if the record does not exist
881:
882: OPEN c_get_item_risk_phrase;
883: FETCH c_get_item_risk_phrase INTO l_phrase_code2;
889: RAISE loop_exception;
890: END IF;
891: CLOSE c_get_item_risk_phrase;
892:
893: DELETE from GR_INV_ITEM_RISK_PHRASES
894: WHERE organization_id = l_organization_id and
895: inventory_item_id = l_inventory_item_id
896: and risk_phrase_code = l_phrase_code;
897: IF SQL%NOTFOUND THEN