59: l_attr:=l_attr||' 1';
60: g_record.PAYMENT_TYPE_CODE := ONT_D1025_PAYMENT_TYPE_CODE.Get_Default_Value(g_record);
61: l_attr:=l_attr||' 2';
62: -- For UPDATE operations, check security if new defaulted value is not equal to old value
63: IF g_record.operation = OE_GLOBALS.G_OPR_UPDATE THEN
64: l_attr:=l_attr||' 3';
65: IF NOT OE_GLOBALS.Equal(g_record.payment_type_code, p_in_old_rec.payment_type_code) THEN
66: IF OE_LINE_PAYMENT_SECURITY.PAYMENT_TYPE_CODE(p_record => g_record, x_on_operation_action => l_action) = OE_PC_GLOBALS.YES THEN
67: -- Raise error if security returns YES, operation IS CONSTRAINED
61: l_attr:=l_attr||' 2';
62: -- For UPDATE operations, check security if new defaulted value is not equal to old value
63: IF g_record.operation = OE_GLOBALS.G_OPR_UPDATE THEN
64: l_attr:=l_attr||' 3';
65: IF NOT OE_GLOBALS.Equal(g_record.payment_type_code, p_in_old_rec.payment_type_code) THEN
66: IF OE_LINE_PAYMENT_SECURITY.PAYMENT_TYPE_CODE(p_record => g_record, x_on_operation_action => l_action) = OE_PC_GLOBALS.YES THEN
67: -- Raise error if security returns YES, operation IS CONSTRAINED
68: RAISE FND_API.G_EXC_ERROR;
69: END IF;
66: IF OE_LINE_PAYMENT_SECURITY.PAYMENT_TYPE_CODE(p_record => g_record, x_on_operation_action => l_action) = OE_PC_GLOBALS.YES THEN
67: -- Raise error if security returns YES, operation IS CONSTRAINED
68: RAISE FND_API.G_EXC_ERROR;
69: END IF;
70: OE_GLOBALS.G_ATTR_UPDATED_BY_DEF := 'Y';
71: END IF;
72: END IF;
73: IF g_record.PAYMENT_TYPE_CODE IS NOT NULL THEN
74: l_attr:=l_attr||' 4';
377: l_attr:=l_attr||' 1';
378: g_record.RECEIPT_METHOD_ID := ONT_D1025_RECEIPT_METHOD_ID.Get_Default_Value(g_record);
379: l_attr:=l_attr||' 2';
380: -- For UPDATE operations, check security if new defaulted value is not equal to old value
381: IF g_record.operation = OE_GLOBALS.G_OPR_UPDATE THEN
382: l_attr:=l_attr||' 3';
383: IF NOT OE_GLOBALS.Equal(g_record.receipt_method_id, p_in_old_rec.receipt_method_id) THEN
384: IF OE_LINE_PAYMENT_SECURITY.RECEIPT_METHOD(p_record => g_record, x_on_operation_action => l_action) = OE_PC_GLOBALS.YES THEN
385: -- Raise error if security returns YES, operation IS CONSTRAINED
379: l_attr:=l_attr||' 2';
380: -- For UPDATE operations, check security if new defaulted value is not equal to old value
381: IF g_record.operation = OE_GLOBALS.G_OPR_UPDATE THEN
382: l_attr:=l_attr||' 3';
383: IF NOT OE_GLOBALS.Equal(g_record.receipt_method_id, p_in_old_rec.receipt_method_id) THEN
384: IF OE_LINE_PAYMENT_SECURITY.RECEIPT_METHOD(p_record => g_record, x_on_operation_action => l_action) = OE_PC_GLOBALS.YES THEN
385: -- Raise error if security returns YES, operation IS CONSTRAINED
386: RAISE FND_API.G_EXC_ERROR;
387: END IF;
384: IF OE_LINE_PAYMENT_SECURITY.RECEIPT_METHOD(p_record => g_record, x_on_operation_action => l_action) = OE_PC_GLOBALS.YES THEN
385: -- Raise error if security returns YES, operation IS CONSTRAINED
386: RAISE FND_API.G_EXC_ERROR;
387: END IF;
388: OE_GLOBALS.G_ATTR_UPDATED_BY_DEF := 'Y';
389: END IF;
390: END IF;
391: IF g_record.RECEIPT_METHOD_ID IS NOT NULL THEN
392: l_attr:=l_attr||' 4';