大家看看这段触发器有甚莫问题!!!

htp_htp 2003-10-21 09:48:29
DECLARE
CURSOR c1 (pc VARCHAR2, ps VARCHAR2) IS
SELECT pham_std_code FROM comm.pham_basic_info
WHERE pham_code=:pc AND pham_spec=:ps;
v_pham_std_code VARCHAR2(14);
cn NUMBER;
v_ordered_by_dept VARCHAR2(8);
v_patient_id VARCHAR2(10);
v_name VARCHAR2(8);
v_name_phonetic VARCHAR2(16);
v_identity VARCHAR2(10);
v_charge_type VARCHAR2(8);
v_unit_in_contract VARCHAR2(11);
v_visit_date DATE;
v_operator_no VARCHAR2(4);
v_entered_by VARCHAR2(8);
v_pntered_by VARCHAR2(8);
v_pham_batch_number VARCHAR2(20);
v_pham_factory_code VARCHAR2(40);
v_sex varchar2(4);
v_age number;
BEGIN
SELECT count(*) INTO cn FROM outp_presc_master_temp WHERE
presc_no= :new.performed_by||:new.rcpt_no;
IF cn=0 THEN
SELECT ordered_by_dept, ordered_by_doctor INTO v_ordered_by_dept, v_pntered_by
FROM outp_order_desc
WHERE visit_date=:new.visit_date and visit_no=:new.visit_no;
SELECT patient_id,name,name_phonetic,identity,charge_type,unit_in_contract,visit_date,
operator_no,sex,age
INTO v_patient_id,v_name,v_name_phonetic,v_identity,v_charge_type,v_unit_in_contract,
v_visit_date,v_operator_no,v_sex,v_age FROM outp_rcpt_master
WHERE rcpt_no=:new.rcpt_no;
SELECT user_name INTO v_entered_by FROM users
WHERE users.user_id=v_operator_no;
INSERT INTO OUTP_PRESC_MASTER_TEMP
(presc_no,patient_id,name,name_phonetic,identity,charge_type,unit_in_contract,
visit_date,presc_type,presc_source,repetition,performed_by,ordered_by,
prescriber,entered_by,dispensing_provider,charge_indicator,qualified_indicator,
dispense_indicator,rcpt_no,age,sex)
VALUES
(:new.performed_by||:new.rcpt_no, v_patient_id,
v_name,v_name_phonetic,v_identity,v_charge_type,v_unit_in_contract,v_visit_date,0,0,
1,:new.performed_by,v_ordered_by_dept, v_pntered_by,v_entered_by,null,1,1,0,:new.rcpt_no,v_age,v_sex);
END IF;
OPEN c1 (:new.item_code,:new.item_spec);
FETCH c1 INTO v_pham_std_code;
INSERT INTO OUTP_PRESC_DETAIL_TEMP
(presc_no,presc_sno,class_on_rcpt,pham_std_code,pham_code,pham_name,
pham_spec,number_per_package,package_units,number_of_packages,costs,payments,
pham_batch_number,pham_factory_code,sell_price,purchase_price,valid_period,pack_spec,pack_unit)
VALUES
(:new.performed_by||:new.rcpt_no,:new.item_no,
:new.class_on_rcpt,v_pham_std_code,:new.item_code,:new.item_name,
:new.item_spec, :new.package_amount, :new.package_units, :new.amount,
:new.costs,:new.charges,:new.pham_batch_number,:new.pham_factory_code,:new.price,:new.purchase_price,:new.valid_period,:new.pack_spec_1,:new.package_units_1);
CLOSE c1;
END;

pl/sql developer 中显示的错误代码如下

TRIGGER OUTPBILL.OUTP_BILL_ITEMS 编译错误

错误: PLS-00201: identifier 'COMM.PHAM_BASIC_INFO' must be declared
行: 4
文本: SELECT pham_std_code FROM PHAM_BASIC_INFO

错误: PL/SQL: SQL Statement ignored
行: 4
文本: SELECT pham_std_code FROM PHAM_BASIC_INFO

错误: PLS-00201: identifier 'COMM.USERS' must be declared
行: 35
文本: SELECT user_name INTO v_entered_by FROM USERS

错误: PL/SQL: SQL Statement ignored
行: 35
文本: SELECT user_name INTO v_entered_by FROM USERS

错误: PLS-00320: the declaration of the type of this expression is incomplete or malformed
行: 4
文本: SELECT pham_std_code FROM PHAM_BASIC_INFO

错误: PL/SQL: SQL Statement ignored
行: 48
文本: FETCH c1 INTO v_pham_std_code;


大家帮我看看是神莫原因造成的 我也建同义词了,权限也足够!!
...全文
77 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
zlovelan 2003-10-21
  • 打赏
  • 举报
回复
如何解决的?
htp_htp 2003-10-21
  • 打赏
  • 举报
回复
问题解决了

这分怎么办

dlibo98 2003-10-21
  • 打赏
  • 举报
回复
该睡午觉了,一会儿在给你解决!!!!

17,078

社区成员

发帖
与我相关
我的任务
社区描述
Oracle开发相关技术讨论
社区管理员
  • 开发
  • Lucifer三思而后行
  • 卖水果的net
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧