查询代理领货后没有退货没有销售的手机.sql

手机进销存系统Delphi源码,管理手机的进货还有销售方面的功能

declare @gtid char(4)
declare @act int
declare @Val char(16)

if @act=3 
SELECT a.*, gl.fid AS fglid, gt.fid AS fgtid, gt.fna AS fgtna, gt.ftel AS fgttel,gl.fdate as fgtlhdate,gl.fmemo as fglmemo,gl.fmon as fglmon,gt.fper as fgtuser
FROM dbo.vAllSj a INNER JOIN
      dbo.tgtlh gl ON a.fid = gl.fhrxx INNER JOIN
      dbo.tgt gt ON gl.fgt = gt.fid
WHERE (gl.fhrxx NOT IN
          (SELECT fcode
         FROM thxc)) AND (gl.fid NOT IN
          (SELECT fgl
         FROM tgtth)) and gt.fid=@gtid

if @act=1--按型号查找
SELECT a.*, gl.fid AS fglid, gt.fid AS fgtid, gt.fna AS fgtna, gt.ftel AS fgttel,gl.fdate as fgtlhdate,gl.fmemo as fglmemo,gl.fmon as fglmon,gt.fper as fgtuser
FROM dbo.vAllSj a INNER JOIN
      dbo.tgtlh gl ON a.fid = gl.fhrxx INNER JOIN
      dbo.tgt gt ON gl.fgt = gt.fid
WHERE (gl.fhrxx NOT IN
          (SELECT fcode
         FROM thxc)) AND (gl.fid NOT IN
          (SELECT fgl
         FROM tgtth)) and gt.fid=@gtid and a.fsjxhid=@val

if @act=2--按串号查找
SELECT a.*, gl.fid AS fglid, gt.fid AS fgtid, gt.fna AS fgtna, gt.ftel AS fgttel,gl.fdate as fgtlhdate,gl.fmemo as fglmemo,gl.fmon as fglmon,gt.fper as fgtuser
FROM dbo.vAllSj a INNER JOIN
      dbo.tgtlh gl ON a.fid = gl.fhrxx INNER JOIN
      dbo.tgt gt ON gl.fgt = gt.fid
WHERE (gl.fhrxx NOT IN
          (SELECT fcode
         FROM thxc)) AND (gl.fid NOT IN
          (SELECT fgl
         FROM tgtth)) and gt.fid=@gtid and a.fno=@val