boleh di modifikasi sedikit
PROCEDURE OUTBOUND_CALL(areacode VARCHAR2,Divre
VARCHAR2,SESSION_USERID VARCHAR2,Result OUT
cursor_type,OutJMDN1 OUT Number) AS
v_jMDN1 NUMBER(2);
v_jTUGAS NUMBER:=11;
BEGIN
-- jumlah daftar telepon yang harus
dikerjakan (B)
DBMS_OUTPUT.PUT_LINE('MULAI1');
SELECT count(DISTINCT A.MDN) INTO v_jMDN1
FROM OUTBOUND_CALL_LIST A,
X_DUMMY B
WHERE PETUGAS IS NULL
AND SUBSTR(MDN,1,LENGTH(areacode)) =
areacode
AND B.XS1 = 'AREACODE'
AND SUBSTR(B.xs4,3,1) = Divre
AND B.XS3 =
SUBSTR(MDN,1,LENGTH(areacode))
AND ROWNUM < v_jTUGAS;
exception
when others then
dbms_output.put_line(sqlerrm());
DBMS_OUTPUT.PUT_LINE('MULAI2 '||v_jMDN1);
OutJMDN1 := v_jMDN1;
END;
panggil dengan
declare
j outbound.Cursor_type;
nJMDN1 NUMBER;
begin
outbound.OUTBOUND_CALL('022','3','BONY',j,nJMDN1);
end;
apakah v_jMDN1 sama dengan nJMDN1 ?
thanks
--- BONY IRAWAN <[EMAIL PROTECTED]> wrote:
> haloooo rekan2, saya ada masalah yang bagi saya
> (yang awam) rada aneh
> yaitu ketika saya menjalankan query di SQL editor
> dan saya menjalankan query yang sama di dalam store
> procedure hasilnya berbeda.
> Store procedure-nya seperti ini :
>
> PROCEDURE OUTBOUND_CALL(areacode VARCHAR2,Divre
> VARCHAR2,SESSION_USERID VARCHAR2,Result OUT
> cursor_type) AS
> v_jMDN1 NUMBER(2);
> v_jTUGAS NUMBER:=11;
>
> BEGIN
> -- jumlah daftar telepon yang harus
> dikerjakan (B)
> DBMS_OUTPUT.PUT_LINE('MULAI1');
> SELECT count(DISTINCT A.MDN) INTO v_jMDN1
> FROM OUTBOUND_CALL_LIST A,
> X_DUMMY B
> WHERE PETUGAS IS NULL
> AND SUBSTR(MDN,1,LENGTH(areacode)) =
> areacode
> AND B.XS1 = 'AREACODE'
> AND SUBSTR(B.xs4,3,1) = Divre
> AND B.XS3 =
> SUBSTR(MDN,1,LENGTH(areacode))
> AND ROWNUM < v_jTUGAS;
> exception
> when others then
> dbms_output.put_line(sqlerrm());
> DBMS_OUTPUT.PUT_LINE('MULAI2 '||v_jMDN1);
> END;
>
> ketika query yg bercetak tebal saya running di SQL
> editor hasilnya 10.
>
> ketika saya jalankan procedure diatas (procedure
> di dalam package=OUTBOUND) dgn sintak spt ini :
>
> declare
> j outbound.Cursor_type;
> begin
> outbound.OUTBOUND_CALL('022','3','BONY',j);
> end;
>
> hasil pada variable v_jMDN1 = 0
>
> catatan: parameter yg digunakan sama persis
>
> terima kasih atas bantuannya
>
>
> BONY
>
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
--
-----------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/
