Oracle ORA-01438:大于此列允许的指定精度的值
下面是我的代码,我不明白我做错了什么。任何帮助都将不胜感激Oracle ORA-01438:大于此列允许的指定精度的值,oracle,plsql,ora-01438,Oracle,Plsql,Ora 01438,下面是我的代码,我不明白我做错了什么。任何帮助都将不胜感激 CREATE OR REPLACE PROCEDURE COMP_LATE_FEE(LATE_APT_FINE IN NUMBER, LATE_GRG_FINE IN NUMBER) AS DIFF NUMBER; TYPE MBCUR IS REF CURSOR RETURN MONTHLY_BILL%ROWTYPE; MONBILL MBCUR; MBREC MONTHLY_BILL%ROWTYPE; BEGIN --DIFF :=
CREATE OR REPLACE
PROCEDURE COMP_LATE_FEE(LATE_APT_FINE IN NUMBER, LATE_GRG_FINE IN NUMBER)
AS
DIFF NUMBER;
TYPE MBCUR IS REF CURSOR RETURN MONTHLY_BILL%ROWTYPE;
MONBILL MBCUR;
MBREC MONTHLY_BILL%ROWTYPE;
BEGIN
--DIFF := FLOOR(SYSDATE - (TRUNC(SYSDATE,'MM')));
--DBMS_OUTPUT.PUT_LINE(DIFF);
OPEN MONBILL FOR
-- checking the status of all last month's bills
SELECT * FROM MONTHLY_BILL
WHERE STATUS = 'PENDING' AND SYSDATE > ED_DT;
FETCH MONBILL INTO MBREC;
-- adding the late fee amount for any bills that are past the due date
-- due date = last day of the month
DIFF := FLOOR(ABS(MBREC.ED_DT - (TRUNC(SYSDATE,'MM'))));
UPDATE MONTHLY_BILL
SET LATE_FEE = DIFF * LATE_APT_FINE
WHERE BILL_NUM = MBREC.BILL_NUM;
-- if a garage is rented by the resident then the respective additional fee is included
IF (MBREC.GARAGE_RENT != 0) THEN
UPDATE MONTHLY_BILL
SET LATE_FEE = LATE_FEE + DIFF * LATE_GRG_FINE
WHERE BILL_NUM = MBREC.BILL_NUM;
END IF;
COMMIT;
CLOSE MONBILL;
END;
/
编译的过程没有任何错误。但是当我调用proc时,会出现以下错误
BEGIN
COMP_LATE_FEE(70,20);
END;
/
错误报告:
ORA-01438: value larger than specified precision allowed for this column
ORA-06512: at "LALLURI.COMP_LATE_FEE", line 19
ORA-06512: at line 2
01438. 00000 - "value larger than specified precision allowed for this column"
*Cause: When inserting or updating records, a numeric value was entered
that exceeded the precision defined for the column.
*Action: Enter a value that complies with the numeric column's precision,
or use the MODIFY option with the ALTER TABLE command to expand
the precision.
假设第19行的语句是
UPDATE MONTHLY_BILL
SET LATE_FEE = DIFF * LATE_APT_FINE
WHERE BILL_NUM = MBREC.BILL_NUM;
问题似乎是计算的结果对于
月账单
表中的滞纳金
列而言太大。我们知道,根据传入的参数值,late\u apt\u fine
为70。由于我们不知道发生错误时diff
变量的值,也不知道月账单中滞纳金
列的定义,很难知道问题在于是否需要更改滞纳金的定义,或者计算值是否比您预期的大,算法是否需要更改。某些中间计算的结果比var存储的结果更大。也许是这样:LATE\u FEE=LATE\u FEE+DIFF*LATE\u GRG\u FINE
。检查变量类型。谢谢你,凯夫先生。我现在明白为什么会出现这个问题了。谢谢你花时间解释。