CREATE OR REPLACE TRIGGER
TR_ZY_BRXXB0_SXDX
 BEFORE
 UPDATE OF CYRQ00
 ON SD_ZY.ZY_BRXXB0
 REFERENCING OLD AS OLD NEW AS NEW
 FOR EACH ROW
declare
  LS_DXTSXX  varchar2(1000);
  LS_BRDH00  BM_BRXXB0.BRDH00%type;
  ls_COUNT0  number(5);
  ls_BRXM00  BM_BRXXB0.BRXM00%type;

  ls_cou  number(3);
begin
--XX您好：您已可以办理出院手续，请您于工作日期间携带以下资料（1、预交金回执单或自助缴费机的充值单据；2、本人身份证；3、如委托他人办理的需同时提供委托人身份证；4、外伤出院病人另需提供外伤性基本记录的报销审批单）到沙县总医院门诊一楼大厅收费处办理出院手续。祝您生活愉快！--沙县总医院
  if :new.CYRQ00 is not null then
    select nvl(a.BRDH00,a.BRLXDH),a.BRXM00 into ls_BRDH00,ls_BRXM00 from BM_BRXXB0 a where a.BRID00=:new.BRID00;
    if ls_BRDH00 is not null and length(ls_BRDH00)>10 then
      LS_DXTSXX:=ls_BRXM00||'您好：您的出院结算已顺利完成，请您于工作日期间携带以下资料（1、预交金回执单或自助缴费机的充值单据；2、本人身份证；3、如委托他人办理的需同时提供委托人身份证；4、外伤出院病人另需提供外伤性基本记录的报销审批单）到沙县总医院门诊一楼大厅收费处办理出院手续。祝您生活愉快！--沙县总医院';
      insert into DX_DXB000@wlpt(DXID00,DXLX00,DXZT00,DXNR00,FSHM00,JSHM00,FSXT00,BZ0000)
      values  (SQ_DX_DXB000_DXID00.nextval@WLPT,'0','0',LS_DXTSXX,'999999',LS_BRDH00,'ZYSF','住院收费系统');
    end if;
  end if;
end;