[Home] [Help]
146: riskcode c_get_risk_phrase_code%ROWTYPE;
147:
148: CURSOR c_get_item_safety_phrase IS
149: SELECT safety_phrase_code
150: FROM gr_inv_item_safety_phrases
151: WHERE safety_phrase_code = l_phrase_code
152: and organization_id = l_organization_id
153: and inventory_item_id = l_inventory_item_id;
154: item_safetycode c_get_item_safety_phrase%ROWTYPE;
627: END IF;
628: close c_val_fname;
629:
630: -- If the field name is associated to a field name class using the Safety Phrases form block
631: -- validate that the record does not already exist, and insert the record into the GR_INV_ITEM_SAFETY_PHRASES table
632: -- An error message will be written to the log file if the record already exists
633: IF l_form_block = 'SAFETY_PHRASES' THEN
634:
635: dummy:= 0;
662: END IF;
663: CLOSE c_get_item_safety_phrase;
664:
665:
666: INSERT INTO GR_INV_ITEM_SAFETY_PHRASES
667: (organization_id,
668: inventory_item_id,
669: safety_phrase_code,
670: created_by,
839: close c_val_fname;
840:
841:
842: -- If the field name is associated to a field name class using the Safety Phrases form block, validate that
843: -- the record exists, and delete the record from the GR_INV_ITEM_SAFETY_PHRASES table
844: -- An error message will be written to the log file if the record does not exist
845:
846: IF l_form_block = 'SAFETY_PHRASES' THEN
847:
856: RAISE loop_exception;
857: END IF;
858: CLOSE c_get_item_safety_phrase;
859:
860: DELETE from GR_INV_ITEM_SAFETY_PHRASES
861: WHERE organization_id = l_organization_id and
862: inventory_item_id = l_inventory_item_id
863: and safety_phrase_code = l_phrase_code;
864: IF SQL%NOTFOUND THEN