0

我有一个来自表(PRODUCTOS)的块，其中包含以下字段：(PRODUCTO_NO(id),DESCRIPCION,PRECIO_ACTUAL,STOCK_DISPONIBLE)

我需要在 producto_no 字段上编写代码，并在执行“ when-validate-item ”时使用正确的数据填充所有字段。

BEGIN
    SELECT producto_no, descripcion, precio_actual, stock_disponible
    INTO   :productos.producto_no, :productos.descripcion, :productos.precio_actual, :productos.stock_disponible
  FROM productos
  WHERE producto_no = :PRODUCTOS.PRODUCTO_NO;

EXCEPTION
    .......
END;

这很好用，但我想使用insert_record、delete_record、按钮，这不会“冲浪”数据库数据。有什么方法可以在 when-validate-item 上使用想要的记录？

另一种方式：在我的删除按钮（按下按钮）我有这个代码：

BEGIN
        DELETE FROM PRODUCTOS WHERE PRODUCTO_NO = :PRODUCTO_NO;
        COMMIT; --2 VECES SI FUNCIONA
EXCEPTION
    WHEN OTHERS THEN
    message('ESE REGISTRO AÚN NO EXIS EN LA BASE DE DATOS. NO SE PUEDE ELIMINAR.');
END;

这仅在我按两次按钮时才有效，第一次无效：S

对不起我的英语。非常感谢您的帮助！

4

1 回答 1

0

抱歉，如果我没有理解您的问题，但是如果您有一个基于表的块，并且您希望根据同一个表中条目的值填充项目，为什么不直接使用 ENTER_QUERY 和 EXECUTE_QUERY？

然后让您的 DELETE btn 简单地执行 DELETE_RECORD。

我很困惑。

于 2013-02-17T23:32:35.700 回答