home *** CD-ROM | disk | FTP | other *** search
/ 95.86.62.111 / 95.86.62.111.tar / 95.86.62.111 / 85 / APT5 / PregledArkaKartKpm.sql < prev    next >
Text (UTF-16)  |  2009-02-09  |  4KB  |  55 lines

  1. SET QUOTED_IDENTIFIER OFF 
  2. GO
  3. SET ANSI_NULLS ON 
  4. GO
  5.  
  6.  
  7.  
  8.  
  9. ALTER     PROCEDURE rk_PregledArkaKartKpm
  10.  
  11.     @Sifra_Oe        smallint = Null,
  12.     @Sifra_Kor_Od        varchar(20) = Null,
  13.     @Sifra_Kor_Do        varchar(20) = Null,
  14.     @Datum_Ska_Od    smalldatetime = Null,
  15.     @Datum_Ska_Do    smalldatetime = Null,
  16.     @BrKasa        smallint = Null,
  17.     @Grp_Kasa        smallint = Null,
  18.     @Sifra_TipKartKor smallint= null
  19. AS
  20.     Declare @SSQL as varchar(8000)
  21.  
  22.     Set @SSQL = ' SELECT A.Sifra_Oe, A.Grp_Kasa, A.BrKasa, A.Broj_Ska, A.Sifra_Kor, K.ImeKor,K.Sifra_TipKartKor, A.Sifra_Nac, A.cDatumSka, 
  23.                 A.Datum_Ska, A.Dolzi, A.Pobaruva, A.FraUpl, A.VnsOnLine, A.Sifra_Kup, A.KlubDolzi, A.Rasknizen 
  24.             FROM ArkaKartKpm A
  25.             Left Outer Join ArkaKartKor K ON K.Sifra_Kor = A.Sifra_Kor
  26.             Where 1=1 '
  27.     If @Sifra_Oe Is Not Null 
  28.         Set @SSQL = @SSQL + ' And A.Sifra_Oe = ' + Cast(@Sifra_Oe as varchar(6)) + ' '
  29.     If @Sifra_Kor_Od Is Not Null 
  30.         Set @SSQL = @SSQL + ' And A.Sifra_Kor >= ''' + @Sifra_Kor_Od + ''' '
  31.     If @Sifra_Kor_Do Is Not Null 
  32.         Set @SSQL = @SSQL + ' And A.Sifra_Kor <= ''' + @Sifra_Kor_Do + ''' '
  33.     If @Datum_Ska_Od Is Not Null 
  34.         Set @SSQL = @SSQL + ' And A.Datum_Ska >= ''' + Cast(@Datum_Ska_Od as varchar(30)) + ''' '
  35.     If @Datum_Ska_Do Is Not Null 
  36.         Set @SSQL = @SSQL + ' And A.Datum_Ska <= ''' + Cast(@Datum_Ska_Do as varchar(30)) + ''' '
  37.     If @BrKasa Is Not Null 
  38.         Set @SSQL = @SSQL + ' And A.BrKasa = ' + Cast(@BrKasa as varchar(6)) + ' '
  39.     If @Grp_Kasa Is Not Null 
  40.         Set @SSQL = @SSQL + ' And A.Grp_Kasa = ' + Cast(@Grp_Kasa as varchar(6)) + ' '
  41. If @Sifra_TipKartKor Is Not Null 
  42.         Set @SSQL = @SSQL + ' And K.Sifra_TipKartKor = ' + Cast(@Sifra_TipKartKor as varchar(6)) + ' '
  43.     Exec(@SSQL)
  44.  
  45.  
  46.  
  47.  
  48.  
  49. GO
  50. SET QUOTED_IDENTIFIER OFF 
  51. GO
  52. SET ANSI_NULLS ON 
  53. GO
  54.  
  55.