• SP--report存储过程


    USE [edison_prc]
    GO
    
    
    SET ANSI_NULLS ON
    GO
    
    SET QUOTED_IDENTIFIER ON
    GO
    
    
    
    ALTER PROCEDURE [dbo].[SP_Load_alert_Rpt] (@loadtype varchar(50),@officecode char(10),@consigneestr varchar(300),@movement varchar(10),@containertypelist varchar(500),@day1 int,@day2 int)
    AS
    BEGIN
    declare @database_name varchar(100),@sql varchar(6000),@current_db varchar(100),@p int,@q int,@tm_len int,@etd_sql varchar(200),
    @movement_sql varchar(100),@rpt_sql varchar(2000),@cbm_sql varchar(1000),@min_cbm varchar(10),@max_kgs varchar(10),@typelist varchar(500)
    
    create table #t_Loadalert_report ([ID] [int] IDENTITY(1,1) NOT NULL,officecode varchar(10),sono varchar(20),
    so_seq int,po_no varchar(50),ref_no varchar(50),[Item Reference] varchar(100),shippername char(50),
    actshippername char(50),bookingdate varchar(19),cargoreadydate varchar(10),CY_ClosingDate varchar(10),lportname char(50),
    dportname char(50),Movement char(7),linercode char(10),Vesselname varchar(50),Voyage char(20),etd varchar(10),
    eta varchar(10),QTY int,unitcode char(2),CBM decimal(12,3),KGS decimal(18,2),
    [No.of 20GP] int,[No.of 20HC] int,[No.of 40GP] int,[No.of 40HC] int,
    CONSTRAINT [PK_t_Loadalert_report] PRIMARY KEY CLUSTERED 
    (
        [ID] ASC
    )WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
    ) ON [PRIMARY]
    
    create table #consignee(companycode varchar(10) COLLATE SQL_Latin1_General_CP1_CI_AS )
     select @p=1,@q=1,@tm_len = len(ltrim(rtrim(@consigneestr)))
          while @p<=@tm_len
         begin
          if substring(@consigneestr,@p,1)='/' 
            begin
              insert into #consignee values(substring(@consigneestr,@q,@p - @q))
              select @q = @p + 1
            end
            select @p = @p + 1
          end
          if @tm_len>=6
          begin
             insert into #consignee values(substring(@consigneestr,@q ,@p - @q))
          end
    
    if(charindex('/',@containertypelist)=0)
        select @typelist='[NO.of '+@containertypelist+']'
    else
      begin
        select @typelist=',[NO.of '+substring(@containertypelist,1,charindex('/',@containertypelist)-1)+']'
        select @containertypelist=substring(@containertypelist,charindex('/',@containertypelist)+1,len(@containertypelist)-charindex('/',@containertypelist))
        while charindex('/',@containertypelist)>0
          begin
            select @typelist=@typelist+',[NO.of '+substring(@containertypelist,1,charindex('/',@containertypelist)-1)+']'
            select @containertypelist=substring(@containertypelist,charindex('/',@containertypelist)+1,len(@containertypelist)-charindex('/',@containertypelist))
        end 
        select @typelist=@typelist+(',[NO.of '+@containertypelist+']')
        select @typelist=substring(@typelist,2,len(@typelist))
      end
    
    SET @rpt_sql = 'select [ID],officecode,sono,so_seq,po_no,ref_no,[Item Reference],shippername,actshippername,
    bookingdate,cargoreadydate,CY_ClosingDate,lportname,dportname,Movement,linercode,Vesselname,Voyage,etd,eta,
    QTY,unitcode,CBM,KGS,'+@typelist+'
    from #t_Loadalert_report'
    
    if @movement is null
        select @movement_sql=''
    else 
        begin
            if @movement='CY/CY'
                select @movement_sql=' and a.movement=''CY/CY'''
            else if @movement='CFS/CY'
                select @movement_sql=' and a.movement=''CFS/CY'''
            else
                select @movement_sql=' '
        end
    
    if @day1 is null and @day2 is null
        select @etd_sql=' '
    else
        begin
            if @day1 is null
            select @etd_sql=' and a.createdate<=convert(char(10),getdate() + '+convert(varchar(3),@day2)+',121)'
        else
            if @day2 is null
                select @etd_sql=' and a.createdate>=convert(char(10),getdate() + '+convert(varchar(3),@day1)+',121)'
            else
                select @etd_sql=' and a.createdate>=convert(char(10),getdate() + '+convert(varchar(3),@day1)+',121) and a.createdate<=convert(char(10),getdate()+ '+convert(varchar(3),@day2)+',121)'
        end
    
    if @loadtype='MIN_CBM'
        begin
            if @movement='CY/CY'
                begin
                    select @max_kgs='si'
                    select @cbm_sql='join (select d.sono,d.so_seq,d.seq  from 
                    (select s.sono,s.so_seq,min(si.itemseq) seq,sum(si.cbm) si_cbm
                    from so_header s,so_item si
                    where s.sono=si.sono and s.so_seq=si.so_seq
                    and s.consigneecode in (select companycode from #consignee)
                    group by s.sono,s.so_seq) d,
                    (select s.sono,s.so_seq,sum(bc.qty*cast(isnull(spec_char,''0'') as int)) bc_cbm
                    from so_header s,bookingcontainer bc,edispecialchecking ec
                    where  s.sono=bc.bookingno and s.so_seq=bc.bookingseq and ec.checktype=''SO_CNTR_TYPE''
                    and ec.checkvalue=s.consigneecode and bc.containertype=ec.checkvalue_2
                    and s.consigneecode in (select companycode from #consignee)
                    group by s.sono,s.so_seq) b
                    where d.sono=b.sono and d.so_seq=b.so_seq
                    and d.si_cbm<b.bc_cbm) c on a.sono=c.sono and a.so_seq=c.so_seq'
                end
            else 
                begin
                    select @max_kgs='ld'
                    select @cbm_sql='join lp_detail ld (nolock) on  a.sono=ld.sono and a.so_seq=ld.so_seq 
                    join (select d.sono,d.so_seq,d.seq  from 
                    (select s.sono,s.so_seq,min(itemseq) seq,sum(ld.cbm) ld_cbm
                    from so_header s,lp_detail ld
                    where s.sono=ld.sono and s.so_seq=ld.so_seq
                    and s.consigneecode in (select companycode from #consignee)
                    group by s.sono,s.so_seq) d,
                    (select lh.lp_no,bs.max_cbm bs_cbm
                    from lp_header lh,base bs,edispecialchecking ec
                    where  lh.containertype=bs.basecode  and ec.checktype=''SO_CNTR_TYPE''
                    and ec.checkvalue=lh.consigneecode and bs.basecode=ec.checkvalue_2
                    and lh.consigneecode in (select companycode from #consignee)) b
                    where  d.ld_cbm<b.bs_cbm) c on a.sono=c.sono and a.so_seq=c.so_seq'
                end
        end
    else if @loadtype='MAX_KGS'
        begin
            if @movement='CY/CY'
                begin
                    select @max_kgs='si'
                    select @cbm_sql='join (select d.sono,d.so_seq,d.seq  from 
                    (select s.sono,s.so_seq,min(si.itemseq) seq,sum(si.kgs) si_kgs
                    from so_header s,so_item si
                    where s.sono=si.sono and s.so_seq=si.so_seq
                    and s.consigneecode in (select companycode from #consignee)
                    group by s.sono,s.so_seq) d,
                    (select s.sono,s.so_seq,sum(bc.qty*cast(isnull(spec_char2,''0'') as int)) bc_kgs
                    from so_header s,bookingcontainer bc,edispecialchecking ec
                    where  s.sono=bc.bookingno and s.so_seq=bc.bookingseq and ec.checktype=''SO_CNTR_TYPE''
                    and ec.checkvalue=s.consigneecode and bc.containertype=ec.checkvalue_2
                    and s.consigneecode in (select companycode from #consignee)
                    group by s.sono,s.so_seq) b
                    where d.sono=b.sono and d.so_seq=b.so_seq
                    and d.si_kgs>b.bc_kgs) c on a.sono=c.sono and a.so_seq=c.so_seq'
                end
            else
                begin
                    select @max_kgs='ld'
                    select @cbm_sql='join lp_detail ld (nolock) on  a.sono=ld.sono and a.so_seq=ld.so_seq 
                    join (select d.sono,d.so_seq,d.seq  from 
                    (select s.sono,s.so_seq,min(itemseq) seq,sum(ld.kgs) ld_kgs
                    from so_header s,lp_detail ld
                    where s.sono=ld.sono and s.so_seq=ld.so_seq
                    and s.consigneecode in (select companycode from #consignee)
                    group by s.sono,s.so_seq) d,
                    (select lh.lp_no,bs.max_kgs bs_kgs
                    from lp_header lh,base bs,edispecialchecking ec
                    where  lh.containertype=bs.basecode  and ec.checktype=''SO_CNTR_TYPE''
                    and ec.checkvalue=lh.consigneecode and bs.basecode=ec.checkvalue_2
                    and lh.consigneecode in (select companycode from #consignee)) b
                    where  d.ld_kgs<b.bs_kgs) c on a.sono=c.sono and a.so_seq=c.so_seq'
                end
        end
    else
        begin
            select @max_kgs='si'
            select @cbm_sql='join (select d.sono,d.so_seq,d.seq  from 
                    (select s.sono,s.so_seq,min(si.itemseq) seq,sum(si.cbm) si_cbm
                    from so_header s,so_item si
                    where s.sono=si.sono and s.so_seq=si.so_seq
                    and s.consigneecode in (select companycode from #consignee)
                    group by s.sono,s.so_seq) d,
                    (select s.sono,s.so_seq,sum(bc.qty*cast(isnull(spec_char,''0'') as int)) bc_cbm
                    from so_header s,bookingcontainer bc,edispecialchecking ec
                    where  s.sono=bc.bookingno and s.so_seq=bc.bookingseq and ec.checktype=''SO_CNTR_TYPE_2''
                    and ec.checkvalue=s.consigneecode and bc.containertype=ec.checkvalue_2
                    and s.consigneecode in (select companycode from #consignee)
                    group by s.sono,s.so_seq) b
                    where d.sono=b.sono and d.so_seq=b.so_seq
                    and d.si_cbm=b.bc_cbm) c on a.sono=c.sono and a.so_seq=c.so_seq'
        end
    
    
    set @current_db = db_name()
    if @officecode=''
        declare database_cur cursor for 
        select  db_name,officecode from systeminfo where linerflag<>'Y' and linercode='nvocc' 
        and status='Y' and officecode not in ('ASH','SGP','STO')
       
        and db_name not like '%test%' and db_name not like '%imp%'
    
    
    else
        declare database_cur cursor for 
        select  db_name,officecode from systeminfo where linerflag<>'Y' and linercode='nvocc' 
        and status='Y' and officecode=@officecode
        and db_name not like '%test%' and db_name not like '%imp%'
    
    --select db_name,officecode from systeminfo where db_name='edison_prc_hkg_nvo_test2'
    
        open database_cur 
        fetch database_cur into @database_name,@officecode
        while @@fetch_status=0 begin 
        set @sql='insert into #t_Loadalert_report' + ' select ''' + @officecode + ''',a.sono,
            a.so_seq,
            si.po_no,
            si.ref_no,
            (case when (select itemremarks from companyvalidpo (nolock) where si.po_no=companyvalidpo.pono and si.ref_no=companyvalidpo.itemno
                and si.shipmentno=companyvalidpo.shipmentno and a.consigneecode=companyvalidpo.companycode and si.destcode=companyvalidpo.destcode
                and companyvalidpo.companytype =''C'')='''' then '''' else (select itemremarks from companyvalidpo (nolock) where si.po_no=companyvalidpo.pono and si.ref_no=companyvalidpo.itemno
                and si.shipmentno=companyvalidpo.shipmentno and a.consigneecode=companyvalidpo.companycode and si.destcode=companyvalidpo.destcode
                and companyvalidpo.companytype =''C'') end) as [Item Reference],
            company.companyname,
            company_c.companyname,
            convert(varchar(19),a.bookingdate,120),
            convert(varchar(10),a.cargoreadydate,120),
            convert(varchar(10),vv.CY_ClosingDate,120),
            a.lportname,
            a.dportname,
            a.Movement,
            vv.linercode,
            ve.Vesselname,
            vv.Voyage,
            convert(varchar(10),vv.etd_date,120),
            convert(varchar(10),vv.eta_datedport,120),
            '+@max_kgs+'.QTY,
            '+@max_kgs+'.unitcode,
            '+@max_kgs+'.CBM,
            '+@max_kgs+'.KGS,
            (select qty from bookingcontainer where bookingno=a.sono and bookingseq=a.so_seq and '+@max_kgs+'.itemseq=c.seq and containertype=''20GP'') as [No.of20GP],
            (select qty from bookingcontainer where bookingno=a.sono and bookingseq=a.so_seq and '+@max_kgs+'.itemseq=c.seq and containertype=''20HC'') as [No.of20HC],
            (select qty from bookingcontainer where bookingno=a.sono and bookingseq=a.so_seq and '+@max_kgs+'.itemseq=c.seq and containertype=''40GP'') as [No.of40GP],
            (select qty from bookingcontainer where bookingno=a.sono and bookingseq=a.so_seq and '+@max_kgs+'.itemseq=c.seq and containertype=''40HC'') as [No.of40HC]
            from so_header a
            join so_item si (nolock) on
                a.sono=si.sono and a.so_seq=si.so_seq 
            join vesvoyforwarder vv (nolock) on vv.vesvoyno=a.vesvoyno 
            join vessel ve (nolock) on  ve.vesselcode=vv.vesselcode
            join companyheader company (nolock) on a.shippercode=company.companycode
            join companyheader company_c (nolock) on a.act_shippercode=company_c.companycode
            '+@cbm_sql+' where  a.consigneecode in (select companycode from #consignee) '+ @etd_sql + @movement_sql
        exec( 'USE ' + @database_name + ' ' + @sql)
        fetch database_cur into @database_name ,@officecode
        end 
        close database_cur 
        deallocate database_cur 
    
    
    
    Exec(@rpt_sql)
    
    drop table #t_Loadalert_report
    drop table #consignee
    end
    
    
    
    GO
    奋斗
  • 相关阅读:
    TensorFlow 官方文档中文版 --技术文档
    借助离散数学解决“哈弗大学智商测试”一题 --编程算法
    Python3文件操作1 --Python3
    ThinkPHP5.0完全开发手册 --技术文档
    JSON和Serialize数据格式的对比
    JSON格式简介
    Github的简易操作
    Python3之JSON数据解析实例:新闻头条 --Python3
    MySql常用函数 --MySql
    Git简易教程
  • 原文地址:https://www.cnblogs.com/aimerh/p/8408834.html
Copyright © 2020-2023  润新知