Executing a procedure in package

Question

Hi,
How to execute a procedure in a package? Below is the package
CREATE OR REPLACE PACKAGE BODY POPULATE_GLTD_TABLES
IS
-- LOCAL VARIABLES
val1 VARCHAR2(10);
-- Create some job objects:
v_job1_str VARCHAR2(4000) ;
v_job1 XXMCK.XXMCK_JOB_OT;
PROCEDURE populate_gltd_tabs1
IS
BEGIN
dbms_output.put_line('Get_status=> v_job1: ');
val1:= F_CHECK_GLTD_RECORD_EXISTS('MCK_GLTD_1');
IF val1 != 'S' THEN
-- Include message details value - TRUE if yes and FALSE if no
xxmck.mck_write_log_msg.set_msg_tail(TRUE);
xxmck.mck_write_log_msg.purge('GLTD-TASK1');
-- set context will define the source as well as inserts data into cont exit table
xxmck.mck_write_log_msg.set_context(v_parent_program,v_prog_desc,'GLTD-TASK1');
xxmck.mck_write_log_msg.log(v_parent_program,'Entering in LOAD_GLTD_TABLES.populate_gltd_tabs1 ','prg','GLTD-TASK1',1);
xxmck.mck_write_log_msg.log_tail(v_parent_program,'Entering in LOAD_GLTD_TABLES.populate_gltd_tabs1 ','prg','GLTD-TASK1');
v_job1_str := 'XXCOGNOS.LOAD_GLTD_TABLES.populate_gltd_tabs1;';
v_job1 := NEW XXMCK.XXMCK_JOB_OT('GLTD-TASK1', v_job1_str, 'Background job test: LOAD_GLTD_TABLES.populate_gltd_tabs1', INTERVAL '60' SECOND);
v_job1.PRINT(); -- Display basic info about the job
v_job1.SUBMIT(); -- Submit in background
v_job1.WAIT();
v_job1.PRINT();
v_job1.get_status(v_code, v_message);
dbms_output.put_line('Get_status=> v_job1: ' || v_code || ':' || v_message);
-- SELECT DECODE(cont_exit, 'cont', 'cont', 'err', 'err', 'cont') INTO v_result from MCK_LOG_CONT_EXIT_CHK WHERE source = 'GLTD-TASK1';
--IF v_result = 'err' THEN
-- raise_application_error(-20000,'Program Aborted');
--END IF;
END IF;
EXCEPTION
WHEN OTHERS THEN NULL;
END populate_gltd_tabs1;
PROCEDURE mainproc
IS
BEGIN
populate_gltd_tabs1; -- CALL TO POPULATE mck_gltd_1 TABLE
-- Mailing
xxmck.mck_write_log_msg.send_mail( p_source_prg => v_parent_program
,p_source => 'GLTD-TASK1'
,p_msg_type => 'prg'
,p_from => '[email protected]'
,p_to => '[email protected]'
,p_server => 'mailhub.mckinsey.com'
EXCEPTION
WHEN OTHERS THEN NULL;
END mainproc;
END POPULATE_GLTD_TABLES;
And below is my anonymous block to execute above package
BEGIN
POPULATE_MCK_GLTDFILE.mainproc;
EXCEPTION -- exception handler begin
WHEN OTHERS THEN NULL;
END;
I am trying to run above code in toad. But i am getting error as: identifier 'POPULATE_MCK_GLTDFILE.mainproc' must be declared.
There are no parameters to be passed.
The package is compiled successfully.
I think this must be simplest question any one can I ask, but I cant figure out the solution.
Please help,
Aditya

Answer 1

First remove the horrible exception handler(s) which are hiding all errors;
ie the
when others
then
null;
end;Then remember the main syntax is
begin
packagename.procedurename;
end;
/But also remember that procedure name must be declared in the package header if you want to call it. (This is called a public procedure). A private procedure does not have to be declared in the package header and can only be called from within the same package body.
I always use sqlplus for verification as that is delivered with oracle. You know if it works with sqlplus it will work with any othere client and if it does not, it's usually a client issue.
from what you have posted, There is nothing obvious as to why it won't work.