一个存储过程[insert into ... select * from ...]执行报错误

sql 代码

1. create or replace procedure GETREMAIN_JSZX1(   
2. P_SETID IN NUMBER,                --帐套   
3. P_YEAR IN NUMBER,                 --年度   
4. P_MONTH IN NUMBER,                --月份   
5. P_UNITID IN VARCHAR2,             --乡镇编号   
6. P_EID IN Varchar2,                --单位   
7. P_SID IN Varchar2)                --会计科目   
8.   
9. Is  
10.   
11. PA_YEAR NUMBER;   
12.   
13. Begin  
14.   
15. PA_YEAR := P_YEAR+1;   
16.   
17. If P_SID='1' Then  
18.   
19. INSERT INTO REMAIN (   
20.   
21. SELECT SETID,PA_YEAR AS YEAR,UNITID,   
22. SEQ_REMAIN_ID.NEXTVAL AS ID,   
23. SID,P_EID AS EID,'' AS BID,   
24. '' AS IID,BAL00,0 AS ISPLAN,'' AS ENAME,'' AS BNAME,'' AS INAME   
25. From  
26. (   
27. SELECT SETID,YEAR,UNITID,   
28. PID,SID,NAME AS SNAME,DEBCRE,ISLEAF,NVL(BAL00+(DEBMONEY_TOT-CREMONEY_TOT)*DEBCRE,0) AS BAL00   
29. FROM(   
30. SELECT SETID,YEAR,UNITID,SID,NAME  
31. ,(CASE WHEN DEBCRE='1' THEN 1 ELSE -1 END) AS DEBCRE   
32. ,ISLEAF,PID   
33. ,NVL(COUNTLEDGER('1','2','1',P_UNITID,P_SETID,P_YEAR,P_MONTH,TRIM(SID),TRIM(P_EID),TRIM(''),TRIM('')),0) AS DEBMONEY_TOT   
34. ,NVL(COUNTLEDGER('1','2','2',P_UNITID,P_SETID,P_YEAR,P_MONTH,TRIM(SID),TRIM(P_EID),TRIM(''),TRIM('')),0) AS CREMONEY_TOT   
35. ,NVL(COUNTREMAIN(P_UNITID,P_SETID,P_YEAR,TRIM(SID),P_EID,TRIM(''),TRIM('')),0) AS BAL00   
36. FROM  
37. (   
38. SELECT SETID,YEAR,UNITID,SID,NAME,DEBCRE,ISLEAF,PID   
39. FROM ACCOUNTSECTIONS   
40. WHERE  
41. SID<>'0.' AND  UNITID=P_UNITID AND SETID=P_SETID AND YEAR=P_YEAR   
42. And SID Like '1%'   
43. AND ISLEAF=1 AND ENABLED=1   
44. ORDER BY ID1,ID2,ID3,ID4,ID5,ID6   
45. )   
46. )   
47. ) where BAL00<>0   
48. );   
49.   
50. Elsif P_SID = '1,2' Then    
51.   
52. INSERT INTO REMAIN (   
53.   
54. SELECT SETID,PA_YEAR AS YEAR,UNITID,   
55. SEQ_REMAIN_ID.NEXTVAL AS ID,   
56. SID,P_EID AS EID,'' AS BID,   
57. '' AS IID,BAL00,0 AS ISPLAN,'' AS ENAME,'' AS BNAME,'' AS INAME   
58. From  
59. (   
60. SELECT SETID,YEAR,UNITID,   
61. PID,SID,NAME AS SNAME,DEBCRE,ISLEAF,NVL(BAL00+(DEBMONEY_TOT-CREMONEY_TOT)*DEBCRE,0) AS BAL00   
62. FROM(   
63. SELECT SETID,YEAR,UNITID,SID,NAME  
64. ,(CASE WHEN DEBCRE='1' THEN 1 ELSE -1 END) AS DEBCRE   
65. ,ISLEAF,PID   
66. ,NVL(COUNTLEDGER('1','2','1',P_UNITID,P_SETID,P_YEAR,P_MONTH,TRIM(SID),TRIM(P_EID),TRIM(''),TRIM('')),0) AS DEBMONEY_TOT   
67. ,NVL(COUNTLEDGER('1','2','2',P_UNITID,P_SETID,P_YEAR,P_MONTH,TRIM(SID),TRIM(P_EID),TRIM(''),TRIM('')),0) AS CREMONEY_TOT   
68. ,NVL(COUNTREMAIN(P_UNITID,P_SETID,P_YEAR,TRIM(SID),P_EID,TRIM(''),TRIM('')),0) AS BAL00   
69. FROM  
70. (   
71. SELECT SETID,YEAR,UNITID,SID,NAME,DEBCRE,ISLEAF,PID   
72. FROM ACCOUNTSECTIONS   
73. WHERE  
74. SID<>'0.' AND  UNITID=P_UNITID AND SETID=P_SETID AND YEAR=P_YEAR   
75. And (SID Like '1%' OR SID LIKE '2%')   
76. AND ISLEAF=1 AND ENABLED=1   
77. ORDER BY ID1,ID2,ID3,ID4,ID5,ID6   
78. )   
79. )   
80. ) where BAL00<>0   
81. );   
82.   
83. Elsif P_SID = '1,2,3' Then  
84.   
85. INSERT INTO REMAIN   
86.   
87. (SETID,Year,UNITID,ID,SID,EID,BID,IID,BAL00,ISPLAN,ENAME,BNAME,INAME)   
88.     
89.  (   
90.   
91. SELECT SETID,PA_YEAR AS YEAR,UNITID,   
92. SEQ_REMAIN_ID.NEXTVAL AS ID,   
93. SID,P_EID AS EID,'' AS BID,   
94. '' AS IID,BAL00,0 AS ISPLAN,'' AS ENAME,'' AS BNAME,'' AS INAME   
95. From  
96. (   
97. SELECT SETID,YEAR,UNITID,   
98. PID,SID,NAME AS SNAME,DEBCRE,ISLEAF,NVL(BAL00+(DEBMONEY_TOT-CREMONEY_TOT)*DEBCRE,0) AS BAL00   
99. FROM(   
100. SELECT SETID,YEAR,UNITID,SID,NAME  
101. ,(CASE WHEN DEBCRE='1' THEN 1 ELSE -1 END) AS DEBCRE   
102. ,ISLEAF,PID   
103. ,NVL(COUNTLEDGER('1','2','1',P_UNITID,P_SETID,P_YEAR,P_MONTH,TRIM(SID),TRIM(P_EID),TRIM(''),TRIM('')),0) AS DEBMONEY_TOT   
104. ,NVL(COUNTLEDGER('1','2','2',P_UNITID,P_SETID,P_YEAR,P_MONTH,TRIM(SID),TRIM(P_EID),TRIM(''),TRIM('')),0) AS CREMONEY_TOT   
105. ,NVL(COUNTREMAIN(P_UNITID,P_SETID,P_YEAR,TRIM(SID),P_EID,TRIM(''),TRIM('')),0) AS BAL00   
106. FROM  
107. (   
108. SELECT SETID,YEAR,UNITID,SID,NAME,DEBCRE,ISLEAF,PID   
109. FROM ACCOUNTSECTIONS   
110. WHERE  
111. SID<>'0.' AND  UNITID=P_UNITID AND SETID=P_SETID AND YEAR=P_YEAR   
112. And (SID Like '1%' OR SID LIKE '2%' OR SID LIKE '3%')   
113. AND ISLEAF=1 AND ENABLED=1   
114. ORDER BY ID1,ID2,ID3,ID4,ID5,ID6   
115. )   
116. )   
117. ) where BAL00<>0   
118. );   
119. commit;   
120.   
121. End If;   
122.   
123. end GETREMAIN_JSZX1;   

 

我在

exec Getremain_Jszx1(2,2007,12,'1004','100.','1,2,3');

报错误..

错误信息为:

sql 代码

1. ORA-04091: 表 XZKJ.REMAIN 发生了变化，触发器/函数不能读   
2. ORA-06512: 在"XZKJ.COUNTREMAIN", line 37   
3. ORA-06512: 在"XZKJ.GETREMAIN_JSZX1", line 85   
4. ORA-06512: 在line 1  

但是我把存储过程里面的sql语句拿出来将参数替换成值执行了一下.又可以正常运行..

是什么原因呢?