Package is working but not passing parameter it is passing default value

Question

The problem now is that the argument (P_ATS_NO) is being pass as the default 0 instead of the number
I am passing in. Did I do something wrong with the argument?
I am using the following to call the package
declare
begin
MYTEST.A411APPROVALEMAIL_PKG.A411APPROVALEMAIL_async(:P_test);
end;
:P_test is being set to 1204 but I am getting 0
THE PACKAGE
create or replace PACKAGE BODY A411APPROVALEMAIL_PKG
AS
PROCEDURE A411APPROVALEMAIL_async (P_ATS_NO NUMBER)
AS
BEGIN
DBMS_SCHEDULER.define_program_argument (program_name => 'A411APPROVALEMAIL',
argument_position => 1,
argument_name          => 'P_ATS_NO',
argument_type          => 'NUMBER'
*,DEFAULT_VALUE => 0);*
DBMS_SCHEDULER.ENABLE (NAME => 'A411APPROVALEMAIL');
DBMS_SCHEDULER.create_job (job_name => 'EMAIL411'
|| P_ATS_NO,
program_name => 'A411APPROVALEMAIL',
enabled => TRUE,
comments => 'Comments'
EXCEPTION
     WHEN NO_DATA_FOUND THEN
     null;
END A411APPROVALEMAIL_async;
PROCEDURE "A411APPROVALEMAIL" (P_ATS_NO NUMBER)
as
strSubject varchar2(200) := ' NOTIFICATION';
strPtext varchar2(100) := ' ';
strEmail varchar2(100) :=’[email protected]';
strFromEmail varchar2(100) := 'MYTEST.AOL.COM'; --'' ; --
strBody varchar2(4000) := P_ATS_NO;
emailSentFlag varchar2(3) := 'NO';
strDistrict varchar2(240);
strAshManager varchar2(60);
myDocTypeID number;
lno varchar2(50);
begin
ash_email(strEmail,strFromEmail,'MY strSubject',' ',strBody,'170.208.17.13',25);
end A411APPROVALEMAIL;
end A411APPROVALEMAIL_PKG;
Howard

Answer 1

If I have define it using DBMS_SCHEDULER.define_program_argument
why do I have to do DBMS_SCHEDULER.SET_JOB_ARGUMENT_VALUE.
Using this:
DBMS_SCHEDULER.SET_JOB_ARGUMENT_VALUE (
job_name IN VARCHAR2,
argument_name IN VARCHAR2,
argument_value IN VARCHAR2);
I am getting
Error at line 13: PLS-00103: Encountered the symbol "VARCHAR2" when expecting one of the following:
The symbol "(" was substituted for "VARCHAR2" to continue.
1. create or replace PACKAGE BODY A411APPROVALEMAIL_PKG
2. AS
3. PROCEDURE A411APPROVALEMAIL_async (P_ATS_NO NUMBER)
Also when I do the following isnt this setting the value
declare
begin
MYTEST.A411APPROVALEMAIL_PKG.A411APPROVALEMAIL_async*(:P_test);*
end
Howard
Edited by: csphard on Feb 26, 2010 2:50 PM
Edited by: csphard on Feb 26, 2010 3:06 PM