CREATE OR REPLACE procedure NGZBGZ.MES_SEGMENT as
SEQID number:=0;
COUNTSIZE number:=0;
SEQNOID varchar2(20);
begin
select SEQ_NUM into SEQID from (select SEQ_NUM from NGZBGZ.PDI where HEAD_LENGTH IS NULL order by SEQ_NUM desc) where rownum=1;
dbms_output.put_line(SEQID);
IF SEQID != 1 THEN
select SEQ_NO into SEQNOID from (select SEQ_NO from NGZBGZ.PDI where HEAD_LENGTH IS NULL order by SEQ_NUM desc) where rownum=1;
dbms_output.put_line(SEQNOID);
SELECT COUNT(*) INTO COUNTSIZE FROM NGMES.SEGMENT_INFO@DB_SEGMENT WHERE CHILD_ID LIKE '%'||SEQNOID||'%';
dbms_output.put_line(COUNTSIZE);
IF COUNTSIZE != 0 THEN
update NGZBGZ.PDI set LEN=(select LEN from NGMES.SEGMENT_INFO@DB_SEGMENT where CHILD_ID LIKE '%'||SEQNOID||'%' AND ROWNUM < 2),SAMP_LEN=(select SAMP_LEN from NGMES.SEGMENT_INFO@DB_SEGMENT where CHILD_ID LIKE '%'||SEQNOID||'%' AND ROWNUM < 2),HEAD_LENGTH=(select HEAD_LENGTH from NGMES.SEGMENT_INFO@DB_SEGMENT where CHILD_ID LIKE '%'||SEQNOID||'%' AND ROWNUM < 2),TAIL_LENGTH=(select TAIL_LENGTH from NGMES.SEGMENT_INFO@DB_SEGMENT where CHILD_ID LIKE '%'||SEQNOID||'%' AND ROWNUM < 2)
where exists (select 1 from NGMES.SEGMENT_INFO@DB_SEGMENT where NGZBGZ.PDI.SEQ_NO LIKE '%'||SEQNOID||'%');
END IF;
END IF;
commit;
end;
/
存储过程编写
于 2023-03-13 15:03:26 首次发布