Dear all,
Saya punya procedure seperti di bawah ini yang
melakukan collect data dari beberapa table dan
disimpan pada tabel tablerptkenjam.
Tetapi saya selalu mendapatkan error ORA-00942,
walaupun saya telah melakukan grant terhadap tabel
yang bermasalah tetap saja serror tersbut timbul.
Bagaimana cara penyelesaiannya untuk error ORA-00942.
Bagian yang error saya berikan tanda >>>>>> untuk
menunjukan table yang dikatakan error.
Tolong ya.....
Terima kasih
Bakry
-------------------------PROCEDURE
CREATE OR REPLACE PROCEDURE CON_FUC1( IDPROSES1
VARCHAR2, IDPROSES2 VARCHAR2, NOBL1 VARCHAR2, NOBL2
VARCHAR2 ) IS
v_idproses varchar2(20);
v_idproses2 varchar2(20);
v_nobl varchar2(20);
v_idprosesDO varchar2(20);
v_nocontainer varchar2(50);
v_partai1 varchar2(12);
v_partai2 varchar2(12);
v_pelayaran varchar2(50);
v_mtuang varchar2(11);
v_mtuang2 varchar2(11);
v_kursjaminan varchar2(16);
v_kursjaminan2 varchar2(16);
v_nilaijamin decimal(15,2);
v_nilaijamin2 decimal(15,2);
v_freedemurage date;
v_tglkblCON date;
v_SP2 date;
v_EIR date;
v_krgnilaijamrp decimal(15,2);
v_krgnilaijamus decimal(15,2);
v_kurskembali varchar2(10);
v_pengembalian varchar2(15);
v_banktunairp decimal(15,2);
v_banktunaius decimal(15,2);
v_bankgiro decimal(15,2);
v_nogiro varchar2(30);
v_idtranskeluar varchar2(15);
V_KET varchar2(50);
Q INTEGER;
v_SQLSTAT varchar2(5000);
v_TIDPORSES2 varchar2(20);
v_TNOBL1 varchar2(20);
v_TNOBL2 varchar2(20);
v_CARA varchar2(20);
BEGIN
--INSERT DATA
BEGIN
DECLARE
CURSOR c_inputKJ IS
select A.PPSI_IDProses, A.PPSI_NoBL,
B.DPK_NoPK, D.DBL_JML, D.DBL_UKURAN,
C.mst_namapersh, E.MP_MtUang,
E.MP_Kurs , E.MP_JmlPemb , F.PDO_TGLBATASFTD,
H.DEIR_RETURNDATE, H.DEIR_TGLRPT,
G.DSP2_TGLRPT, H.DEIR_CUSTAMOUNTRP,
H.DEIR_CUSTAMOUNTUS,
H.DEIR_KETERANGAN
from PPSI A,
DPETIKEMAS B,
MASTER C,
DBL D,
>>>>>> mstpengeluaran E,
PAMBILDO F,
DSP2 G,
DEIR H
where A.PPSI_IDProses = B.DPK_IDProses and
D.DBL_IDProses = A.PPSI_IDProses
and D.DBL_IDPelayaran = C.mst_id and
E.MP_IDProses = A.PPSI_IDProses
and F.PDO_IDPROSES = A.PPSI_IDProses
and A.PPSI_IDProses = G.DSP2_IDPROSES
and A.PPSI_IDProses = H.DEIR_IDPROSES
and E. MP_KDBIAYA = '000000000022'
and ( A.PPSI_IDPROSES between
IDPROSES1 and IDPROSES2 )
or ( A.PPSI_NOBL between NOBL1 and
NOBL2 ) ;
BEGIN
DELETE FROM tablerptkenjam ;
OPEN c_inputKJ;
LOOP
FETCH c_inputKJ INTO v_idproses, v_nobl,
v_nocontainer, v_partai1,
v_partai2, v_pelayaran, v_mtuang,
v_kursjaminan, v_nilaijamin, v_freedemurage,
v_tglkblCON, v_SP2, v_EIR,
v_krgnilaijamrp, v_krgnilaijamus,
v_ket ;
EXIT WHEN c_inputKJ%NOTFOUND;
INSERT INTO tablerptkenjam ( IDPROSES, NOBL,
NOCONTAINER, PARTAI1, PARTAI2,
PELAYARAN, MTUANG, KURSJAMINAN,
NILAIJAMIN, FREEDEMURAGE, TGLKBLCON,
SP2, EIR, KRGNILAIJAMRP,
KRGNILAIJAMUS, KET )
VALUES ( v_idproses, v_nobl,
v_nocontainer, v_partai1,
v_partai2, v_pelayaran, v_mtuang ,
v_kursjaminan, v_nilaijamin,
v_freedemurage, v_tglkblCON, v_SP2,
v_EIR, v_krgnilaijamrp,
v_krgnilaijamus, v_ket );
END LOOP;
CLOSE c_inputKJ;
COMMIT;
END ;
END;
--UPDATE DATA
BEGIN
DECLARE
CURSOR c_inputKJ2 IS
select A.PPSI_IDProses,E.MP_MtUang,
E.MP_Kurs , E.MP_JmlPemb,
E.MP_CARA, E.MP_NOGIRO
from PPSI A,
>>>>>>>> mstpengeluaran E,
tablerptkenjam B
where E.MP_IDProses = A.PPSI_IDProses and
A.PPSI_IDProses = B.IDPROSES
and E. MP_KDBIAYA = '000000000032' ;
BEGIN
OPEN c_inputKJ2;
LOOP
FETCH c_inputKJ2 INTO v_idproses,
v_mtuang, v_kursjaminan,
v_nilaijamin, v_CARA, v_NOGIRO ;
EXIT WHEN c_inputKJ2%NOTFOUND;
update tablerptkenjam set banktunairp =
v_nilaijamin
where IDPROSES =
rtrim(v_idproses) and rtrim(v_CARA) = 'Tunai' ;
update tablerptkenjam set kurskembali =
v_mtuang
where IDPROSES =
rtrim(v_idproses) and rtrim(v_CARA) = 'Tunai';
update tablerptkenjam set bankgiro =
v_nilaijamin
where IDPROSES =
rtrim(v_idproses) and rtrim(v_CARA) = 'Giro';
update tablerptkenjam set nogiro = v_NOGIRO
where IDPROSES =
rtrim(v_idproses) and rtrim(v_CARA) = 'Giro';
END LOOP;
CLOSE c_inputKJ2;
COMMIT;
END ;
END;
END ;
/
SHOW ERRORS;
--------------------ERROR
Errors for PROCEDURE CON_FUC1:
LINE/COL ERROR
--------
------------------------------------------------
47/12 PL/SQL: SQL Statement ignored
55/17 PL/SQL: ORA-00942: table or view does not
exist
100/17 PL/SQL: SQL Statement ignored
103/22 PL/SQL: ORA-00942: table or view does not
exist
----------------------GRANT
create public synonym mstpengeluaran for
judith.mstpengeluaran;
grant alter on mstpengeluaran to usrimp_role;
grant delete on mstpengeluaran to usrimp_role;
grant insert on mstpengeluaran to usrimp_role;
grant select on mstpengeluaran to usrimp_role;
grant update on mstpengeluaran to usrimp_role;
grant alter on mstpengeluaran to usrimp_role;
grant delete on mstpengeluaran to usrimp_role;
grant insert on mstpengeluaran to usrimp_role;
grant select on mstpengeluaran to usrimp_role;
grant update on mstpengeluaran to usrimp_role;
____________________________________________________
Start your day with Yahoo! - make it your home page
http://www.yahoo.com/r/hs
------------------------ Yahoo! Groups Sponsor --------------------~-->
<font face=arial size=-1><a
href="http://us.ard.yahoo.com/SIG=12h7svkuh/M=362131.6882499.7825260.1510227/D=groups/S=1705007183:TM/Y=YAHOO/EXP=1124167685/A=2889191/R=0/SIG=10r90krvo/*http://www.thebeehive.org
">Get Bzzzy! (real tools to help you find a job) Welcome to the Sweet Life
- brought to you by One Economy</a>.</font>
--------------------------------------------------------------------~->
--
-----------I.N.D.O - O.R.A.C.L.E---------------
Keluar: [EMAIL PROTECTED]
Website: http://indo-oracle.lizt.org (NEW)
-----------------------------------------------
Bergabung dengan Indonesia Thin Client User Groups,
Terminal Server, Citrix, New Moon Caneveral, di:
http://indo-thin.vze.com
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indo-oracle/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
