[Home] [Help]
1: PACKAGE BODY GR_LABELS_B_PKG AS
2: /*$Header: GRHILABB.pls 120.3 2010/11/19 15:07:47 plowe ship $*/
3: PROCEDURE Insert_Row
4: (p_commit IN VARCHAR2,
5: p_called_by_form IN VARCHAR2,
162: /*B1319565 Added for Technical Parameters */
163: /*B1979042 Added column rollup_disclosure code*/
164:
165:
166: INSERT INTO gr_labels_b
167: (label_code,
168: safety_category_code,
169: label_class_code,
170: data_position_indicator,
500: RAISE Foreign_Key_Error;
501: ELSE
502: /*B1319565 Added for Technical Parameters */
503: /*B1979042 Added column p_rollup_disclosure code*/
504: UPDATE gr_labels_b
505: SET label_code = p_label_code,
506: safety_category_code = p_safety_category_code,
507: label_class_code = p_label_class_code,
508: data_position_indicator = p_data_position_indicator,
696:
697: CURSOR c_lock_label
698: IS
699: SELECT *
700: FROM gr_labels_b
701: WHERE rowid = p_rowid
702: FOR UPDATE NOWAIT;
703: LockLabelRcd c_lock_label%ROWTYPE;
704:
917: IF l_return_status <> 'S' THEN
918: RAISE Check_Integrity_Error;
919: END IF;
920:
921: DELETE FROM gr_labels_b
922: WHERE rowid = p_rowid;
923:
924: /* Check the commit flag and if set, then commit the work. */
925:
1502:
1503: CURSOR c_get_label_rowid
1504: IS
1505: SELECT lab.rowid
1506: FROM gr_labels_b lab
1507: WHERE lab.label_code = p_label_code;
1508: LabelRecord c_get_label_rowid%ROWTYPE;
1509:
1510: BEGIN
1537: END IF;
1538:
1539: END Check_Primary_Key;
1540:
1541: END GR_LABELS_B_PKG;