写一段oracle代码，计算当A值与B值的比值小于1，切两值均为负数，标记结果为异常

以下是一段Oracle PL/SQL代码，可以实现您的需求：

DECLARE
    A NUMBER := -5;
    B NUMBER := -3;
    result VARCHAR2(10);
BEGIN
    IF A < 0 AND B < 0 AND A/B < 1 THEN
        result := '异常';
    ELSE
        result := '正常';
    END IF;
    DBMS_OUTPUT.PUT_LINE('A/B的结果为: ' || A/B || '，标记结果为: ' || result);
END;

在这个例子中，我们将A设置为-5，B设置为-3。如果A和B都是负数，且A/B的比值小于1，则将结果标记为“异常”。最后，我们使用DBMS_OUTPUT.PUT_LINE函数输出结果。

您可以根据需要修改变量A和B的值。