⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 sj_jshzd.dfm

📁 省级集邮品管理ERP
💻 DFM
📖 第 1 页 / 共 2 页
字号:
    txp_Sql.Strings = (
      'SELECT 1 ORD, F.RKDH DH, G.DWJC, G.PXM, R.RCKXZMC,'
      '  sum(J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100) JSJE,'
      '  DECODE(F.JZY, NULL, '#39'否'#39', '#39'是'#39') FH, F.KDRQ, F.RKRQ RCKRQ'
      '  FROM TKS_TXRKPP J, TKS_TXRKD F, TGS_GXDWSJB G, TGS_JRCKXZDM R'
      
        '  WHERE J.RKDH = F.RKDH AND F.LYDW = G.DWDM AND F.RKXZ = R.RCKXZ' +
        'DM(+)'
      '    %TJ'
      
        '  Group by 1, F.RKDH, G.DWJC, G.PXM, R.RCKXZMC, DECODE(F.JZY, NU' +
        'LL, '#39'否'#39', '#39'是'#39'), F.KDRQ, F.RKRQ'
      '  ORDER BY 4,2,1'
      ' ')
    yp_Sql.Strings = (
      'SELECT 1 ORD, F.RKDH DH, G.DWJC, G.PXM, R.RCKXZMC, '
      '  sum(J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100) JSJE, '
      '  DECODE(F.JZY, NULL, '#39'否'#39', '#39'是'#39') FH, F.KDRQ, F.RKRQ RCKRQ'
      '  FROM TKS_YPRKPP J, TKS_YPRKD F, TGS_GXDWSJB G, TGS_JRCKXZDM R'
      
        '  WHERE J.RKDH = F.RKDH AND F.LYDW = G.DWDM AND F.RKXZ = R.RCKXZ' +
        'DM(+)'
      '    %TJ'
      
        '  Group by 1, F.RKDH, G.DWJC, G.PXM, R.RCKXZMC, DECODE(F.JZY, NU' +
        'LL, '#39'否'#39', '#39'是'#39'), F.KDRQ, F.RKRQ'
      '  ORDER BY 4,2,1')
    grp_Sql.Strings = (
      'SELECT 1 ORD, F.RKDH DH, G.DWJC, G.PXM, R.RCKXZMC, '
      '  sum(J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100) JSJE, '
      '  DECODE(F.JZY, NULL, '#39'否'#39', '#39'是'#39') FH, F.KDRQ, F.RKRQ RCKRQ'
      
        '  FROM TKS_GRPRKPP J, TKS_GRPRKD F, TGS_GXDWSJB G, TGS_JRCKXZDM ' +
        'R'
      
        '  WHERE J.RKDH = F.RKDH AND F.LYDW = G.DWDM AND F.RKXZ = R.RCKXZ' +
        'DM(+)'
      '    %TJ'
      
        '  Group by 1, F.RKDH, G.DWJC, G.PXM, R.RCKXZMC, DECODE(F.JZY, NU' +
        'LL, '#39'否'#39', '#39'是'#39'), F.KDRQ, F.RKRQ'
      '  ORDER BY 4,2,1')
    Left = 34
    Top = 153
  end
  object DS_dw: TDataSource
    DataSet = Qry_dw
    Left = 180
    Top = 57
  end
  object Qry_dw: TRxQuery
    DatabaseName = 'yzpp'
    SQL.Strings = (
      'select -1,'#39' '#39' DWDM, '#39'全部'#39' DWMC from dual '
      'union'
      'select PXM,DWDM, DWJC DWMC from TGS_GXDWSJB '
      ' where BJ <> '#39'1'#39' and %TJ or zjsj='#39'1'#39' or sjfh='#39'1'#39
      'order by 1,2')
    Macros = <
      item
        DataType = ftString
        Name = 'TJ'
        ParamType = ptInput
        Value = '0=0'
      end>
    Left = 152
    Top = 57
  end
  object SqlS_hzC: TSqlStrings
    jyp_Sql.Strings = (
      'select 2 ORD, F.FHDH DH, G.DWJC, G.PXM, R.RCKXZMC, '
      '  sum(J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100) JSJE, '
      
        '  DECODE(F.HDR, NULL, '#39'否'#39', '#39'是'#39') FH, F.KDRQ, F.CKRQ RCKRQ, deco' +
        'de(F.JSZT, '#39'0'#39','#39'正常'#39','#39'1'#39','#39'被撤消'#39', '#39'2'#39','#39'被冲正'#39','#39'冲正'#39') zt'
      '  FROM TKS_JYCKPP J, TKS_JYFHD F, TGS_GXDWSJB G, TGS_JRCKXZDM R'
      
        '  WHERE J.FHDH = F.FHDH AND F.QXDW = G.DWDM AND F.CKXZ = R.RCKXZ' +
        'DM(+)'
      '    %TJ'
      
        '  Group by 2, F.FHDH, G.DWJC, G.PXM, R.RCKXZMC, F.HDR, F.KDRQ, F' +
        '.CKRQ, F.JSZT'
      '  ORDER BY 4,2,1')
    txp_Sql.Strings = (
      'select 2 ORD, F.FHDH DH, G.DWJC, G.PXM, R.RCKXZMC,'
      '  sum(J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100) JSJE,'
      
        '  DECODE(F.HDR, NULL, '#39'否'#39', '#39'是'#39') FH, F.KDRQ, F.CKRQ RCKRQ, deco' +
        'de(F.JSZT, '#39'0'#39','#39'正常'#39','#39'1'#39','#39'被撤消'#39', '#39'2'#39','#39'被冲正'#39','#39'冲正'#39') zt'
      '  FROM TKS_TXCKPP J, TKS_TXFHD F, TGS_GXDWSJB G, TGS_JRCKXZDM R'
      
        '  WHERE J.FHDH = F.FHDH AND F.QXDW = G.DWDM AND F.CKXZ = R.RCKXZ' +
        'DM(+)'
      '    %TJ'
      
        '  Group by 2, F.FHDH, G.DWJC, G.PXM, R.RCKXZMC, F.HDR, F.KDRQ, F' +
        '.CKRQ, F.JSZT'
      '  ORDER BY 4,2,1')
    yp_Sql.Strings = (
      'select 2 ORD, F.FHDH DH, G.DWJC, G.PXM, R.RCKXZMC, '
      '  sum(J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100) JSJE, '
      
        '  DECODE(F.HDR, NULL, '#39'否'#39', '#39'是'#39') FH, F.KDRQ, F.CKRQ RCKRQ, deco' +
        'de(F.JSZT, '#39'0'#39','#39'正常'#39','#39'1'#39','#39'被撤消'#39', '#39'2'#39','#39'被冲正'#39','#39'冲正'#39') zt'
      '  FROM TKS_YPCKPP J, TKS_YPFHD F, TGS_GXDWSJB G, TGS_JRCKXZDM R'
      
        '  WHERE J.FHDH = F.FHDH AND F.QXDW = G.DWDM AND F.CKXZ = R.RCKXZ' +
        'DM(+)'
      '    %TJ    '
      
        '  Group by 2, F.FHDH, G.DWJC, G.PXM, R.RCKXZMC, F.HDR, F.KDRQ, F' +
        '.CKRQ, F.JSZT'
      '  ORDER BY 4,2,1')
    grp_Sql.Strings = (
      'select 2 ORD, F.FHDH DH, G.DWJC, G.PXM, R.RCKXZMC, '
      '  sum(J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100) JSJE, '
      
        '  DECODE(F.HDR, NULL, '#39'否'#39', '#39'是'#39') FH, F.KDRQ, F.CKRQ RCKRQ, deco' +
        'de(F.JSZT, '#39'0'#39','#39'正常'#39','#39'1'#39','#39'被撤消'#39', '#39'2'#39','#39'被冲正'#39','#39'冲正'#39') zt'
      
        '  FROM TKS_GRPCKPP J, TKS_GRPFHD F, TGS_GXDWSJB G, TGS_JRCKXZDM ' +
        'R'
      
        '  WHERE J.FHDH = F.FHDH AND F.QXDW = G.DWDM AND F.CKXZ = R.RCKXZ' +
        'DM(+)'
      '    %TJ'
      
        '  Group by 2, F.FHDH, G.DWJC, G.PXM, R.RCKXZMC, F.HDR, F.KDRQ, F' +
        '.CKRQ, F.JSZT'
      '  ORDER BY 4,2,1')
    Left = 34
    Top = 181
  end
  object SqlS_mxR: TSqlStrings
    jyp_Sql.Strings = (
      
        'SELECT 2 ORD, J.RKDH DH, '#39#39' DH1, '#39#39' DWMC, G.PXM, '#39'  ('#39'||Y.ZH||'#39')' +
        #39'||Y.TMC PPDM,'
      '  '#39'  '#39'||TO_CHAR(KDRQ,'#39'YYYY-MM-DD'#39') KDRQ,'
      '  TO_CHAR(RKRQ,'#39'YYYY-MM-DD'#39') RCKRQ,'
      '  J.JJ/100 JJ, J.XJ/100 XJ, J.SL, J.ZK, JSJ/100 JSJ,'
      '  J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100 JSJE'
      
        '  FROM TKS_JYRKPP J, TB_YZPPTXXB Y, TKS_JYRKD F, TGS_GXDWSJB G, ' +
        'TGS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.RKDH = F.RKDH AND F.LYDW = G.DWDM A' +
        'ND F.RKXZ = R.RCKXZDM(+) %TJ'
      'union'
      
        'SELECT 1 ORD, J.RKDH DH, J.RKDH DH1, G.dwJc DWMC, G.PXM, R.RCKXZ' +
        'MC RCKXZMC,  DECODE(JZY, NULL, '#39'否'#39', '#39'是'#39') FH, '#39#39' RKRQ,'
      
        '  0 JJ, 0 XJ, sum(J.SL) SL, 0 ZK, 0 JSJ, sum(J.SL*(nvl(J.JSJ,0)+' +
        'J.XJ*nvl(J.ZK,0)/100)/100) JSJE'
      
        '  FROM TKS_JYRKPP J, TB_YZPPTXXB Y, TKS_JYRKD F, TGS_GXDWSJB G, ' +
        'TGS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.RKDH = F.RKDH AND F.LYDW = G.DWDM A' +
        'ND F.RKXZ = R.RCKXZDM(+) %TJ'
      '  GROUP BY J.RKDH, g.dwJc, G.PXM, R.RCKXZMC, F.JZY'
      'ORDER BY 5,2,1')
    txp_Sql.Strings = (
      
        'SELECT 2 ORD, J.RKDH DH, '#39#39' DH1, '#39#39' DWMC, G.PXM, '#39'  ('#39'||Y.ZH||'#39')' +
        #39'||Y.TMC PPDM,'
      '  '#39'  '#39'||TO_CHAR(KDRQ,'#39'YYYY-MM-DD'#39') KDRQ,'
      '  TO_CHAR(RKRQ,'#39'YYYY-MM-DD'#39') RCKRQ,'
      '  J.JJ/100 JJ, J.XJ/100 XJ, J.SL, J.ZK, JSJ/100 JSJ,'
      '  J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100 JSJE'
      
        '  FROM TKS_TXRKPP J, TB_YZPPXXB Y, TKS_TXRKD F, TGS_GXDWSJB G, T' +
        'GS_JRCKXZDM R'
      
        '  WHERE J.TUDM = Y.TDM AND J.RKDH = F.RKDH AND F.LYDW = G.DWDM A' +
        'ND F.RKXZ = R.RCKXZDM(+) %TJ'
      'union'
      
        'SELECT 1 ORD, J.RKDH DH, J.RKDH DH1, G.dwJc DWMC, G.PXM, R.RCKXZ' +
        'MC RCKXZMC,  DECODE(JZY, NULL, '#39'否'#39', '#39'是'#39') FH, '#39#39' RKRQ,'
      
        '  0 JJ, 0 XJ, sum(J.SL) SL, 0 ZK, 0 JSJ, sum(J.SL*(nvl(J.JSJ,0)+' +
        'J.XJ*nvl(J.ZK,0)/100)/100) JSJE'
      
        '  FROM TKS_TXRKPP J, TB_YZPPXXB Y, TKS_TXRKD F, TGS_GXDWSJB G, T' +
        'GS_JRCKXZDM R'
      
        '  WHERE J.TUDM = Y.TDM AND J.RKDH = F.RKDH AND F.LYDW = G.DWDM A' +
        'ND F.RKXZ = R.RCKXZDM(+) %TJ'
      '  GROUP BY J.RKDH, g.dwJc, G.PXM, R.RCKXZMC, F.JZY'
      'ORDER BY 5,2,1'
      ' ')
    yp_Sql.Strings = (
      
        'SELECT 2 ORD, J.RKDH DH, '#39#39' DH1, '#39#39' DWMC, G.PXM, '#39'  ('#39'||Y.ZH||'#39')' +
        #39'||Y.MC PPDM,'
      '  '#39'  '#39'||TO_CHAR(KDRQ,'#39'YYYY-MM-DD'#39') KDRQ,'
      '  TO_CHAR(RKRQ,'#39'YYYY-MM-DD'#39') RCKRQ,'
      '  J.JJ/100 JJ, J.XJ/100 XJ, J.SL, J.ZK, JSJ/100 JSJ,'
      '  J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100 JSJE'
      
        '  FROM TKS_YPRKPP J, TB_JYPTXXB Y, TKS_YPRKD F, TGS_GXDWSJB G, T' +
        'GS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.RKDH = F.RKDH AND F.LYDW = G.DWDM A' +
        'ND F.RKXZ = R.RCKXZDM(+) %TJ'
      'union'
      
        'SELECT 1 ORD, J.RKDH DH, J.RKDH DH1, G.dwJc DWMC, G.PXM, R.RCKXZ' +
        'MC RCKXZMC,  DECODE(JZY, NULL, '#39'否'#39', '#39'是'#39') FH, '#39#39' RKRQ,'
      
        '  0 JJ, 0 XJ, sum(J.SL) SL, 0 ZK, 0 JSJ, sum(J.SL*(nvl(J.JSJ,0)+' +
        'J.XJ*nvl(J.ZK,0)/100)/100) JSJE'
      
        '  FROM TKS_YPRKPP J, TB_JYPTXXB Y, TKS_YPRKD F, TGS_GXDWSJB G, T' +
        'GS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.RKDH = F.RKDH AND F.LYDW = G.DWDM A' +
        'ND F.RKXZ = R.RCKXZDM(+) %TJ'
      '  GROUP BY J.RKDH, g.dwJc, G.PXM, R.RCKXZMC, F.JZY'
      'ORDER BY 5,2,1')
    grp_Sql.Strings = (
      
        'SELECT 2 ORD, J.RKDH DH, '#39#39' DH1, '#39#39' DWMC, G.PXM, '#39'  ('#39'||Y.ZH||'#39')' +
        #39'||Y.TMC PPDM,'
      '  '#39'  '#39'||TO_CHAR(KDRQ,'#39'YYYY-MM-DD'#39') KDRQ,'
      '  TO_CHAR(RKRQ,'#39'YYYY-MM-DD'#39') RCKRQ,'
      '  J.JJ/100 JJ, J.XJ/100 XJ, J.SL, J.ZK, JSJ/100 JSJ,'
      '  J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100 JSJE'
      
        '  FROM TKS_GRPRKPP J, TB_YZPPXXB Y, TKS_GRPRKD F, TGS_GXDWSJB G,' +
        ' TGS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.RKDH = F.RKDH AND F.LYDW = G.DWDM A' +
        'ND F.RKXZ = R.RCKXZDM(+) %TJ'
      'union'
      
        'SELECT 1 ORD, J.RKDH DH, J.RKDH DH1, G.dwJc DWMC, G.PXM, R.RCKXZ' +
        'MC RCKXZMC,  DECODE(JZY, NULL, '#39'否'#39', '#39'是'#39') FH, '#39#39' RKRQ,'
      
        '  0 JJ, 0 XJ, sum(J.SL) SL, 0 ZK, 0 JSJ, sum(J.SL*(nvl(J.JSJ,0)+' +
        'J.XJ*nvl(J.ZK,0)/100)/100) JSJE'
      
        '  FROM TKS_GRPRKPP J, TB_YZPPXXB Y, TKS_GRPRKD F, TGS_GXDWSJB G,' +
        ' TGS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.RKDH = F.RKDH AND F.LYDW = G.DWDM A' +
        'ND F.RKXZ = R.RCKXZDM(+) %TJ'
      '  GROUP BY J.RKDH, g.dwJc, G.PXM, R.RCKXZMC, F.JZY'
      'ORDER BY 5,2,1')
    Left = 38
    Top = 361
  end
  object SqlS_mxC: TSqlStrings
    jyp_Sql.Strings = (
      
        'SELECT 2 ORD, J.FHDH DH, '#39#39' DH1, G.PXM, G.DWDM, '#39#39' DWMC, '#39'  ('#39'||' +
        'Y.ZH||'#39')'#39'||Y.TMC PPDM,  '
      '  '#39'  '#39'||TO_CHAR(F.KDRQ,'#39'YYYY-MM-DD'#39') KDRQ,'
      '  TO_CHAR(F.CKRQ,'#39'YYYY-MM-DD'#39') RCKRQ,'
      '  J.JJ/100 JJ, J.XJ/100 XJ, J.SL, J.ZK, JSJ/100 JSJ,'
      '  J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100 JSJE, '#39#39' zt'
      
        '  FROM TKS_JYCKPP J, TB_YZPPTXXB Y, TKS_JYFHD F, TGS_GXDWSJB G, ' +
        'TGS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.FHDH = F.FHDH AND F.QXDW = G.DWDM A' +
        'ND F.CKXZ = R.RCKXZDM(+) %TJ'
      'union'
      
        'SELECT 1 ORD, J.FHDH DH, J.FHDH DH1, G.PXM, G.DWDM, G.DWJC DWMC,' +
        ' R.RCKXZMC RCKXZMC,  DECODE(HDR, NULL, '#39'否'#39', '#39'是'#39') FH, '#39#39' RKRQ,'
      
        '  0 JJ, 0 XJ, sum(J.SL) SL, 0 ZK, 0 JSJ, sum(J.SL*(nvl(J.JSJ,0)+' +
        'J.XJ*nvl(J.ZK,0)/100)/100) JSJE, decode(F.JSZT, '#39'0'#39','#39'正常'#39','#39'1'#39','#39 +
        '被撤消'#39', '#39'2'#39','#39'被冲正'#39','#39'冲正'#39') zt'
      
        '  FROM TKS_JYCKPP J, TB_YZPPTXXB Y, TKS_JYFHD F, TGS_GXDWSJB G, ' +
        'TGS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.FHDH = F.FHDH AND F.QXDW = G.DWDM A' +
        'ND F.CKXZ = R.RCKXZDM(+) %TJ'
      
        '  GROUP BY J.FHDH, g.dwJc, G.PXM, G.DWDM, R.RCKXZMC, F.HDR, F.JS' +
        'ZT'
      'ORDER BY 4,2,1')
    txp_Sql.Strings = (
      
        'SELECT 2 ORD, J.FHDH DH, '#39#39' DH1, G.PXM, G.DWDM, '#39#39' DWMC, '#39'  ('#39'||' +
        'Y.ZH||'#39')'#39'||Y.TMC PPDM,'
      '  '#39'  '#39'||TO_CHAR(F.KDRQ,'#39'YYYY-MM-DD'#39') KDRQ,'
      '  TO_CHAR(F.CKRQ,'#39'YYYY-MM-DD'#39') RCKRQ,'
      '  J.JJ/100 JJ, J.XJ/100 XJ, J.SL, J.ZK, JSJ/100 JSJ,'
      '  J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100 JSJE, '#39#39' zt'
      
        '  FROM TKS_TXCKPP J, TB_YZPPXXB Y, TKS_TXFHD F, TGS_GXDWSJB G, T' +
        'GS_JRCKXZDM R'
      
        '  WHERE J.TUDM = Y.TDM AND J.FHDH = F.FHDH AND F.QXDW = G.DWDM A' +
        'ND F.CKXZ = R.RCKXZDM(+) %TJ'
      'union'
      
        'SELECT 1 ORD, J.FHDH DH, J.FHDH DH1, G.PXM, G.DWDM, G.DWJC DWMC,' +
        ' R.RCKXZMC RCKXZMC,  DECODE(HDR, NULL, '#39'否'#39', '#39'是'#39') FH, '#39#39' RKRQ,'
      
        '  0 JJ, 0 XJ, sum(J.SL) SL, 0 ZK, 0 JSJ, sum(J.SL*(nvl(J.JSJ,0)+' +
        'J.XJ*nvl(J.ZK,0)/100)/100) JSJE, decode(F.JSZT, '#39'0'#39','#39'正常'#39','#39'1'#39','#39 +
        '被撤消'#39', '#39'2'#39','#39'被冲正'#39','#39'冲正'#39') zt'
      
        '  FROM TKS_TXCKPP J, TB_YZPPXXB Y, TKS_TXFHD F, TGS_GXDWSJB G, T' +
        'GS_JRCKXZDM R'
      
        '  WHERE J.TUDM = Y.TDM AND J.FHDH = F.FHDH AND F.QXDW = G.DWDM A' +
        'ND F.CKXZ = R.RCKXZDM(+) %TJ'
      
        '  GROUP BY J.FHDH, g.dwJc, G.PXM, G.DWDM, R.RCKXZMC, F.HDR, F.JS' +
        'ZT'
      'ORDER BY 4,2,1'
      ' ')
    yp_Sql.Strings = (
      
        'SELECT 2 ORD, J.FHDH DH, '#39#39' DH1, G.PXM, G.DWDM, '#39#39' DWMC, '#39'  ('#39'||' +
        'Y.ZH||'#39')'#39'||Y.MC PPDM,  '
      '  '#39'  '#39'||TO_CHAR(F.KDRQ,'#39'YYYY-MM-DD'#39') KDRQ,'
      '  TO_CHAR(F.CKRQ,'#39'YYYY-MM-DD'#39') RCKRQ,'
      '  J.JJ/100 JJ, J.XJ/100 XJ, J.SL, J.ZK, JSJ/100 JSJ,'
      '  J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100 JSJE, '#39#39' zt'
      
        '  FROM TKS_YPCKPP J, TB_JYPTXXB Y, TKS_YPFHD F, TGS_GXDWSJB G, T' +
        'GS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.FHDH = F.FHDH AND F.QXDW = G.DWDM A' +
        'ND F.CKXZ = R.RCKXZDM(+) %TJ'
      'union'
      
        'SELECT 1 ORD, J.FHDH DH, J.FHDH DH1, G.PXM, G.DWDM, G.DWJC DWMC,' +
        ' R.RCKXZMC RCKXZMC,  DECODE(HDR, NULL, '#39'否'#39', '#39'是'#39') FH, '#39#39' RKRQ,'
      
        '  0 JJ, 0 XJ, sum(J.SL) SL, 0 ZK, 0 JSJ, sum(J.SL*(nvl(J.JSJ,0)+' +
        'J.XJ*nvl(J.ZK,0)/100)/100) JSJE, decode(F.JSZT, '#39'0'#39','#39'正常'#39','#39'1'#39','#39 +
        '被撤消'#39', '#39'2'#39','#39'被冲正'#39','#39'冲正'#39') zt'
      
        '  FROM TKS_YPCKPP J, TB_JYPTXXB Y, TKS_YPFHD F, TGS_GXDWSJB G, T' +
        'GS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.FHDH = F.FHDH AND F.QXDW = G.DWDM A' +
        'ND F.CKXZ = R.RCKXZDM(+) %TJ'
      
        '  GROUP BY J.FHDH, g.dwJc, G.PXM, G.DWDM, R.RCKXZMC, F.HDR, F.JS' +
        'ZT'
      'ORDER BY 4,2,1')
    grp_Sql.Strings = (
      
        'SELECT 2 ORD, J.FHDH DH, '#39#39' DH1, G.PXM, G.DWDM, '#39#39' DWMC, '#39'  ('#39'||' +
        'Y.ZH||'#39')'#39'||Y.TMC PPDM,  '
      '  '#39'  '#39'||TO_CHAR(F.KDRQ,'#39'YYYY-MM-DD'#39') KDRQ,'
      '  TO_CHAR(F.CKRQ,'#39'YYYY-MM-DD'#39') RCKRQ,'
      '  J.JJ/100 JJ, J.XJ/100 XJ, J.SL, J.ZK, JSJ/100 JSJ,'
      '  J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100 JSJE, '#39#39' zt'
      
        '  FROM TKS_GRPCKPP J, TB_YZPPXXB Y, TKS_GRPFHD F, TGS_GXDWSJB G,' +
        ' TGS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.FHDH = F.FHDH AND F.QXDW = G.DWDM A' +
        'ND F.CKXZ = R.RCKXZDM(+) %TJ'
      'union'
      
        'SELECT 1 ORD, J.FHDH DH, J.FHDH DH1, G.PXM, G.DWDM, G.DWJC DWMC,' +
        ' R.RCKXZMC RCKXZMC,  DECODE(HDR, NULL, '#39'否'#39', '#39'是'#39') FH, '#39#39' RKRQ,'
      
        '  0 JJ, 0 XJ, sum(J.SL) SL, 0 ZK, 0 JSJ, sum(J.SL*(nvl(J.JSJ,0)+' +
        'J.XJ*nvl(J.ZK,0)/100)/100) JSJE, decode(F.JSZT, '#39'0'#39','#39'正常'#39','#39'1'#39','#39 +
        '被撤消'#39', '#39'2'#39','#39'被冲正'#39','#39'冲正'#39') zt'
      
        '  FROM TKS_GRPCKPP J, TB_YZPPXXB Y, TKS_GRPFHD F, TGS_GXDWSJB G,' +
        ' TGS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.FHDH = F.FHDH AND F.QXDW = G.DWDM A' +
        'ND F.CKXZ = R.RCKXZDM(+) %TJ'
      
        '  GROUP BY J.FHDH, g.dwJc, g.dwdm, G.PXM, R.RCKXZMC, F.HDR, F.JS' +
        'ZT'
      'ORDER BY 4,2,1')
    Left = 38
    Top = 389
  end
  object Qry_mx: TRxQuery
    AfterOpen = Qry_mxAfterOpen
    DatabaseName = 'YZPP'
    SQL.Strings = (
      
        'SELECT 2 ORD, J.RKDH DH, '#39#39' DH1, '#39#39' DWMC, '#39'  ('#39'||Y.ZH||'#39')'#39'||Y.MC' +
        ' PPDM,'
      '  '#39'  '#39'||TO_CHAR(KDRQ,'#39'YYYY-MM-DD'#39') KDRQ,'
      '  TO_CHAR(RKRQ,'#39'YYYY-MM-DD'#39') RCKRQ,'
      
        '  J.JJ/100 JJ, J.YJ/100 YJ, J.XJ/100 XJ, J.SL, J.ZK, JSJ/100 JSJ' +
        ','
      '  J.SL*(nvl(J.JSJ,0)+J.XJ*nvl(J.ZK,0)/100)/100 JSJE'
      
        '  FROM TKS_YPRKPP J, TB_JYPTXXB Y, TKS_YPRKD F, TGS_GXDWSJB G, T' +
        'GS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.RKDH = F.RKDH AND F.LYDW = G.DWDM A' +
        'ND F.RKXZ = R.RCKXZDM(+) '
      'union'
      
        'SELECT 1 ORD, J.RKDH DH, J.RKDH DH1, G.dwmc DWMC, R.RCKXZMC RCKX' +
        'ZMC,  DECODE(JZY, NULL, '#39'否'#39', '#39'是'#39') FH, '#39#39' RKRQ,'
      
        '  0 JJ, 0 YJ, 0 XJ, sum(J.SL) SL, 0 ZK, 0 JSJ, sum(J.SL*(nvl(J.J' +
        'SJ,0)+J.XJ*nvl(J.ZK,0)/100)/100) JSJE'
      
        '  FROM TKS_YPRKPP J, TB_JYPTXXB Y, TKS_YPRKD F, TGS_GXDWSJB G, T' +
        'GS_JRCKXZDM R'
      
        '  WHERE J.PPDM = Y.TDM AND J.RKDH = F.RKDH AND F.LYDW = G.DWDM A' +
        'ND F.RKXZ = R.RCKXZDM(+) '
      '  GROUP BY J.RKDH, g.dwmc, R.RCKXZMC, F.JZY'
      'ORDER BY 2,1'
      '')
    Macros = <>
    Left = 66
    Top = 361
  end
  object DS_mx: TDataSource
    DataSet = Qry_mx
    Left = 94
    Top = 361
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -