pls-00103

显示全部楼层 · 2007-8-9 15:46:04

错得一头雾水!
create or replace procedure P_insertEvent(
v_relateid in varchar2(13), --就在这里报,后面的逻辑都是通过了测试
v_relate_type in integer,--再写成存储过程的
v_alarm_time in date,
v_alarm_way in varchar2(8),
v_callerid in varchar2(64),
v_callername in varchar2(32),
v_contactway invarchar2(64),
v_evetime in date,
v_eveplace in varchar2(64),
v_evetype in varchar2(16),
v_evelevel in varhcar2(8),
v_callid in number(10),
v_evereason in varchar2(32),
v_istest in char(1),
v_eveDescription in varchar2(128),
v_evestate in varchar2(8),
v_finishflag in number(1),
v_finishtime in time ,
v_putonrecordflag in number(1),
v_archiveflag in number(1),
v_dutyid in varchar2(16),
v_eveidout varchar2(13)) is
eid varchar2(13);
begin
select to_char(sysdate, 'yyyymmdd') ||
substr('00000' || to_char(nextID),

length('00000' || to_char(nextID)) - 4,

length('00000' || to_char(nextID)))

as eveNextID into eid from

(select to_number(nvl(max(substr(eventid,

length(eventid - 4),

length(eventid))),

'0')) + 1 as nextID

from event

where instr(eventid,

to_char(sysdate,

'yyyymmdd')) > 0);
insert into event values(eid,v_relating_eveid,v_relate_type,v_alarm_time,

v_alarm_way,v_callerid,v_callername,v_contactway,

v_evetime,v_eveplace,v_evetype,v_evelevel,

v_callid,v_evereason,v_istest,v_eveDescription,

v_evestate,v_finishflag,v_finishtime,v_putonrecordflag,

v_archiveflag,v_dutyid);
v_eveid :=eid;

commit;
exception
when others then
rollback;
end P_insertEvent;

千问 · 2007-8-9 15:46:04

Compilation errors for PROCEDURE HBCERSZZB.P_INSERTEVENT
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 2
Text: v_relateid in varchar2(13),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 5
Text: v_alarm_way in varchar2(8),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 6
Text: v_callerid in varchar2(64),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 7
Text: v_callername in varchar2(32),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 8
Text: v_contactway invarchar2(64),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 10
Text: v_eveplace in varchar2(64),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 11
Text: v_evetype in varchar2(16),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 12
Text: v_evelevel in varhcar2(8),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 13
Text: v_callid in number(10),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 14
Text: v_evereason in varchar2(32),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=),defaultvaryingcharacter

large
符号 ":=" 被替换为 "(" 后继续。
Line: 15
Text: v_istest in char(1),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 16
Text: v_eveDescription in varchar2(128),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 17
Text: v_evestate in varchar2(8),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 18
Text: v_finishflag in number(1),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 20
Text: v_putonrecordflag in number(1),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 21
Text: v_archiveflag in number(1),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 22
Text: v_dutyid in varchar2(16),
Error: PLS-00103: 出现符号 "("在需要下列之一时：
:=.),@%defaultcharacter
符号 ":=" 被替换为 "(" 后继续。
Line: 23
Text: v_eveidout varchar2(13)) is

千问 · 2007-8-9 15:46:04

[PHP]

create or replace procedure P_insertEvent(v_relateidin varchar2,

v_relate_type in integer,

v_alarm_timein date,

v_alarm_way in varchar2,

v_calleridin varchar2,

v_callernamein varchar2,

v_contactwayin varchar2,

v_evetime in date,

v_eveplacein varchar2,

v_evetype in varchar2,

v_evelevelin varchar2,

v_callid
in number,

v_evereason in varchar2,

v_istest
in char,

v_eveDescriptionin varchar2,

v_evestatein varchar2,

v_finishflagin number,

v_finishtimein time,

v_putonrecordflag in number,

v_archiveflag in number,

v_dutyid
in varchar2,

v_eveid out varchar2)
is
eid varchar2(13);
begin
select to_char(sysdate, 'yyyymmdd') ||
substr('00000' || to_char(nextID),

length('00000' || to_char(nextID)) - 4,

length('00000' || to_char(nextID))) as eveNextID
into eid
from (select to_number(nvl(max(substr(eventid,

length(eventid - 4),

length(eventid))),

'0')) + 1 as nextID

from event
where instr(eventid, to_char(sysdate, 'yyyymmdd')) > 0);
insert into event
values
(eid,
v_relating_eveid,
v_relate_type,
v_alarm_time,
v_alarm_way,
v_callerid,
v_callername,
v_contactway,
v_evetime,
v_eveplace,
v_evetype,
v_evelevel,
v_callid,
v_evereason,
v_istest,
v_eveDescription,
v_evestate,
v_finishflag,
v_finishtime,
v_putonrecordflag,
v_archiveflag,
v_dutyid);
v_eveid := eid;
commit;
exception
when others then
rollback;
end P_insertEvent;

[/PHP]

千问 · 2007-8-9 15:46:04

呵呵,
为什么要
v_alarm_way in varchar2
这样呢,据说varchar2不写长度默认是30的呢,但是我有些传近来的值就100多的