nokdata_new.sql

linux下c 编写的 某项目代理服务端部分的代码。其中包括网络通信

create or replace procedure nokdata_new
(
        v_consec_nbr    IN char,
        v_int_id        IN char,
        v_alarm_status  IN char,
   	v_alarm_time    IN char,
        v_cancel_time   IN char,
   	v_alarm_number  IN char,
   	v_severity      IN char,
   	v_name          IN char,
        site_no         OUT char 
)as
   	vsite_count      NUMBER(10);
   	vcount           NUMBER(10);
        vno               number(10);
BEGIN
        site_no:='1234';
        select count(alarm_site_no) into vsite_count
        	from para_alarm_site_no where name=ltrim(rtrim(v_name));
        if vsite_count=0 then
                select seq_alarm_site_no.nextval into vno from dual;
                	insert into para_alarm_site_no (alarm_site_no,name,city_no,agency_no,bound)
              		values(vno,ltrim(rtrim(v_name)),'51','01',60);
        else 
                select alarm_site_no into vno
                from para_alarm_site_no
                where name=ltrim(rtrim(v_name));
        end if;
        site_no:=ltrim(rtrim(to_char(vno)));
        commit;

       	select count(id_no) into vcount from alarm_env
       	where alarm_name_no=ltrim(rtrim(v_alarm_number))
       	and alarm_site_no=vno
       	and alarm_time=to_date(ltrim(rtrim(v_alarm_time)),'yyyymmddhh24miss');
       	if vcount=0 then
       		if  v_CANCEL_TIME<>'0' then
               		insert into alarm_env
                    	(id_no,city_no,agency_no,alarm_site_no,alarm_csn,
                    	alarm_sort_no,alarm_level_no,alarm_status_no,alarm_name_no,
                    	alarm_time,cancel_time,in_time)
                    	values(alarm_id_no.nextval,'51','01',vno,ltrim(rtrim(v_CONSEC_NBR)),
                   	 '1',ltrim(rtrim(v_severity)),v_ALARM_STATUS,ltrim(rtrim(v_ALARM_NUMBER)),
                    	to_date(ltrim(rtrim(v_ALARM_TIME)),'yyyymmddhh24miss'),
                        to_date(ltrim(rtrim(v_CANCEL_TIME)),'yyyymmddhh24miss'),sysdate);
              	else
                 	insert into alarm_env
                   	(id_no,city_no,agency_no,alarm_site_no,alarm_csn,
                   	alarm_sort_no,alarm_level_no,alarm_status_no,alarm_name_no,
                  	alarm_time,cancel_time,in_time)
                   	values(alarm_id_no.nextval,'51','01',vno,ltrim(rtrim(v_CONSEC_NBR)),
                  	'1',ltrim(rtrim(v_severity)),v_ALARM_STATUS,ltrim(rtrim(v_ALARM_NUMBER)),
                   	to_date(ltrim(rtrim(v_ALARM_TIME)),'yyyymmddhh24miss'),null,sysdate);

                        select count(id_no) into vcount from alarm_env
                   	where alarm_name_no=ltrim(rtrim(v_alarm_number))
                   	and alarm_site_no=vno;
                   	if vcount<>0 then
                        	delete from alarm where alarm_name_no=ltrim(rtrim(v_alarm_number))
                        	and alarm_site_no=vno;
                 	end if;
                 	insert into alarm
                 	(city_no,agency_no,alarm_site_no,alarm_csn,
                  	alarm_level_no,alarm_status_no,alarm_name_no,
                  	alarm_time,in_time)
                  	values('51','01',vno,ltrim(rtrim(v_CONSEC_NBR)),
                  	ltrim(rtrim(v_severity)),v_ALARM_STATUS,ltrim(rtrim(v_ALARM_NUMBER)),
                  	to_date(ltrim(rtrim(v_ALARM_TIME)),'yyyymmddhh24miss'),sysdate);
        	end if;
        	commit;
        end if;
END;