Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.412 Beiträge
 
Delphi 11 Alexandria
 
#7
  Alt 17. Jul 2002, 21:42
Jetzt auch noch für alle bei Delphi-PRAXiS.
[code:1:e9b55a6387]
CREATE PROCEDURE Preisliste AS
SET NOCOUNT ON

/* Deklaration der Variablen für Statements */
declare @ColName nvarchar(100)
declare @Query nvarchar(1000)

/* Deklaration der Variablen für CURSOR */
declare @adressart_id int
declare @artikel_id int
declare @artikel_name varchar(50)
declare @artikel_artikelnummer varchar(15)
declare @artikel_warengruppe int
declare @artikel_artikelgruppe int
declare @artikel_vk_id int
declare @artikel_vk_preis float
declare @artikel_vk_prozent float
declare @artikel_vk_rabat float

/* Löschen der Temporären Tabelle TEMPPREISLISTE falls diese existiert */
if exists (select * from sysobjects where id =
object_id(N'[dbo].[TempPreisliste]')
and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[TempPreisliste]

/* Erstellen der Temporären Tabelle TEMPPREISLISTE */
CREATE TABLE [dbo].[TempPreisliste] (
[preis_id] [int] IDENTITY (1, 1) NOT NULL ,
[artikel_id] [int] NULL ,
[Name1] [varchar] (50) NULL ,
[Artikelnummer] [varchar] (15) NULL ,
[Warengruppe] [int] NULL ,
[Artikelgruppe] [int] NULL
)

/* CURSOR für Artikeltabelle */
DECLARE artikel_cursor CURSOR FOR
Daniel W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat