存储过程
Posted Dota_小川
tags:
篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了存储过程相关的知识，希望对你有一定的参考价值。
create or replace PROCEDURE "UPDATE_TRAIN_CARRIAGE" ( carriage_1_ IN NUMBER, carriage_2_ IN NUMBER, carriage_3_ IN NUMBER, carriage_4_ IN NUMBER, carriage_5_ IN NUMBER, carriage_6_ IN NUMBER, carriage_7_ IN NUMBER, carriage_8_ IN NUMBER, carriage_9_ IN NUMBER, carriage_10_ IN NUMBER, carriage_11_ IN NUMBER, carriage_12_ IN NUMBER, carriage_13_ IN NUMBER, carriage_14_ IN NUMBER, carriage_15_ IN NUMBER, carriage_16_ IN NUMBER, carriage_17_ IN NUMBER, carriage_18_ IN NUMBER, carriage_19_ IN NUMBER, carriage_20_ IN NUMBER, carriage_21_ IN NUMBER, carriage_22_ IN NUMBER, carriage_23_ IN NUMBER, carriage_24_ IN NUMBER, carriage_25_ IN NUMBER, carriage_26_ IN NUMBER, carriage_27_ IN NUMBER, carriage_28_ IN NUMBER, carriage_29_ IN NUMBER, carriage_30_ IN NUMBER, carriage_31_ IN NUMBER, carriage_32_ IN NUMBER, carriage_33_ IN NUMBER, carriage_34_ IN NUMBER, carriage_35_ IN NUMBER, carriage_36_ IN NUMBER, carriage_37_ IN NUMBER, carriage_38_ IN NUMBER, carriage_39_ IN NUMBER, carriage_40_ IN NUMBER, carriage_41_ IN NUMBER, carriage_42_ IN NUMBER, carriage_43_ IN NUMBER, carriage_44_ IN NUMBER, carriage_45_ IN NUMBER, carriage_46_ IN NUMBER, carriage_47_ IN NUMBER, carriage_48_ IN NUMBER, carriage_49_ IN NUMBER, carriage_50_ IN NUMBER, carriage_51_ IN NUMBER, carriage_52_ IN NUMBER, carriage_53_ IN NUMBER, carriage_54_ IN NUMBER, carriage_55_ IN NUMBER, carriage_56_ IN NUMBER, carriage_57_ IN NUMBER, carriage_58_ IN NUMBER, carriage_59_ IN NUMBER, carriage_60_ IN NUMBER, carriage_61_ IN NUMBER, carriage_62_ IN NUMBER, carriage_63_ IN NUMBER, carriage_64_ IN NUMBER, carriage_65_ IN NUMBER, carriage_66_ IN NUMBER, carriage_67_ IN NUMBER, carriage_68_ IN NUMBER, carriage_69_ IN NUMBER, carriage_70_ IN NUMBER, carriage_71_ IN NUMBER, carriage_72_ IN NUMBER, carriage_73_ IN NUMBER, carriage_74_ IN NUMBER, carriage_75_ IN NUMBER, carriage_76_ IN NUMBER, carriage_77_ IN NUMBER, carriage_78_ IN NUMBER, carriage_79_ IN NUMBER, carriage_80_ IN NUMBER, carriage_81_ IN NUMBER, carriage_82_ IN NUMBER, carriage_83_ IN NUMBER, carriage_84_ IN NUMBER, carriage_85_ IN NUMBER, carriage_86_ IN NUMBER, carriage_87_ IN NUMBER, carriage_88_ IN NUMBER, carriage_89_ IN NUMBER, carriage_90_ IN NUMBER, carriage_91_ IN NUMBER, carriage_92_ IN NUMBER, carriage_93_ IN NUMBER, carriage_94_ IN NUMBER, carriage_95_ IN NUMBER, carriage_96_ IN NUMBER, carriage_97_ IN NUMBER, carriage_98_ IN NUMBER, carriage_99_ IN NUMBER, carriage_100_ IN NUMBER) IS BEGIN DECLARE start_id NUMBER; BEGIN select max(id) into start_id from hhc_plc_train_start; update hhc_plc_train_carriage set carriage_1=carriage_1_, carriage_2=carriage_2_, carriage_3=carriage_3_, carriage_4=carriage_4_, carriage_5=carriage_5_, carriage_6=carriage_6_, carriage_7=carriage_7_, carriage_8=carriage_8_, carriage_9=carriage_9_, carriage_10=carriage_10_, carriage_11=carriage_11_, carriage_12=carriage_12_, carriage_13=carriage_13_, carriage_14=carriage_14_, carriage_15=carriage_15_, carriage_16=carriage_16_, carriage_17=carriage_17_, carriage_18=carriage_18_, carriage_19=carriage_19_, carriage_20=carriage_20_, carriage_21=carriage_21_, carriage_22=carriage_22_, carriage_23=carriage_23_, carriage_24=carriage_24_, carriage_25=carriage_25_, carriage_26=carriage_26_, carriage_27=carriage_27_, carriage_28=carriage_28_, carriage_29=carriage_29_, carriage_30=carriage_30_, carriage_31=carriage_31_, carriage_32=carriage_32_, carriage_33=carriage_33_, carriage_34=carriage_34_, carriage_35=carriage_35_, carriage_36=carriage_36_, carriage_37=carriage_37_, carriage_38=carriage_38_, carriage_39=carriage_39_, carriage_40=carriage_40_, carriage_41=carriage_41_, carriage_42=carriage_42_, carriage_43=carriage_43_, carriage_44=carriage_44_, carriage_45=carriage_45_, carriage_46=carriage_46_, carriage_47=carriage_47_, carriage_48=carriage_48_, carriage_49=carriage_49_, carriage_50=carriage_50_, carriage_51=carriage_51_, carriage_52=carriage_52_, carriage_53=carriage_53_, carriage_54=carriage_54_, carriage_55=carriage_55_, carriage_56=carriage_56_, carriage_57=carriage_57_, carriage_58=carriage_58_, carriage_59=carriage_59_, carriage_60=carriage_60_, carriage_61=carriage_61_, carriage_62=carriage_62_, carriage_63=carriage_63_, carriage_64=carriage_64_, carriage_65=carriage_65_, carriage_66=carriage_66_, carriage_67=carriage_67_, carriage_68=carriage_68_, carriage_69=carriage_69_, carriage_70=carriage_70_, carriage_71=carriage_71_, carriage_72=carriage_72_, carriage_73=carriage_73_, carriage_74=carriage_74_, carriage_75=carriage_75_, carriage_76=carriage_76_, carriage_77=carriage_77_, carriage_78=carriage_78_, carriage_79=carriage_79_, carriage_80=carriage_80_, carriage_81=carriage_81_, carriage_82=carriage_82_, carriage_83=carriage_83_, carriage_84=carriage_84_, carriage_85=carriage_85_, carriage_86=carriage_86_, carriage_87=carriage_87_, carriage_88=carriage_88_, carriage_89=carriage_89_, carriage_90=carriage_90_, carriage_91=carriage_91_, carriage_92=carriage_92_, carriage_93=carriage_93_, carriage_94=carriage_94_, carriage_95=carriage_95_, carriage_96=carriage_96_, carriage_97=carriage_97_, carriage_98=carriage_98_, carriage_99=carriage_99_, carriage_100=carriage_100_ where fk_start_id=start_id and insert_state=1; END; END;
create or replace PROCEDURE "PRO_SU_STOP" /* 记录处理卸船机停时 ttype:(3,故障:对应调度系统停时的设备类型 5,待机:对应调度系统停时的待机类型) STATE:(状态由0变1时新增记录 1变0时更新) */ ( SU_ID NUMBER, STATE NUMBER, TTYPE VARCHAR2) IS FK_SO_BOAT_NOTE_ID NUMBER(15); BERTH NUMBER(15); FK_CLASS_TYPE_ID NUMBER(15); IS_DAY NUMBER(15); BEGIN IF STATE=1 THEN SELECT T.FK_SO_BOAT_NOTE_ID,F.BERTH INTO FK_SO_BOAT_NOTE_ID,BERTH FROM (SELECT * FROM UNLOAD_BOAT_FLOW_DATA T WHERE T.UNLOAD_BOAT_ID=SU_ID ORDER BY T.PERBKTIME DESC ) T LEFT JOIN SO_BOAT_NOTE N ON N.ID=T.FK_SO_BOAT_NOTE_ID LEFT JOIN SO_BOAT_FORE F ON F.ID=N.FK_BOAT_FORE_ID WHERE ROWNUM=1; SELECT T.FK_CLASS_TYPE_ID,T.IS_DAY INTO FK_CLASS_TYPE_ID,IS_DAY FROM PMIS_ATTCHIEF_LOG T WHERE SYSDATE BETWEEN T.BEGIN_TIME AND T.END_TIME AND ROWNUM=1; INSERT INTO PMIS_MACHINE_STOP_LOG (PMIS_MACHINE_STOP_LOG.EAM_ID, PMIS_MACHINE_STOP_LOG.END_TIME, PMIS_MACHINE_STOP_LOG.TYPE, PMIS_MACHINE_STOP_LOG.SYS_TYPE, PMIS_MACHINE_STOP_LOG.FK_SO_BOAT_NOTE_ID, PMIS_MACHINE_STOP_LOG.BERTH, PMIS_MACHINE_STOP_LOG.FK_CLASS_TYPE_ID, PMIS_MACHINE_STOP_LOG.IS_DAY, PMIS_MACHINE_STOP_LOG.CAUSE) VALUES (SU_ID, SYSDATE, TTYPE,1,FK_SO_BOAT_NOTE_ID,BERTH,FK_CLASS_TYPE_ID,IS_DAY,chr(10)||chr(13)||‘系统自动采集‘); ELSIF STATE=0 THEN UPDATE PMIS_MACHINE_STOP_LOG SET PMIS_MACHINE_STOP_LOG.START_TIME = SYSDATE, PMIS_MACHINE_STOP_LOG.MINUTE = ROUND((SYSDATE-PMIS_MACHINE_STOP_LOG.END_TIME)*24*60,0) WHERE PMIS_MACHINE_STOP_LOG.EAM_ID = SU_ID AND PMIS_MACHINE_STOP_LOG.START_TIME IS NULL AND PMIS_MACHINE_STOP_LOG.SYS_TYPE = 1; END IF; END;
create or replace PROCEDURE "PRO_SEQ_RESET" (v_seqname varchar2) as n number(10); tsql varchar2(100); begin execute immediate ‘select ‘||v_seqname||‘.nextval from dual‘ into n; n:=-(n); tsql:=‘alter sequence ‘||v_seqname||‘ increment by ‘|| n; execute immediate tsql; execute immediate ‘select ‘||v_seqname||‘.nextval from dual‘ into n; tsql:=‘alter sequence ‘||v_seqname||‘ increment by 1‘; --设置序列增量为1 execute immediate tsql; end pro_seq_reset;
以上是关于存储过程的主要内容，如果未能解决你的问题，请参考以下文章