Thema: Delphi ADO Guru gesucht

Einzelnen Beitrag anzeigen

Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
 
Delphi 12 Athens
 
#37

AW: ADO Guru gesucht

  Alt 14. Mär 2013, 10:27
Danke erst mal...

In den Tabellen gibt es eine Spalte die mit Defaultwert belegt wird. Beim Debuggen an einer ganz bestimmten Stelle für eine spezielle Tabelle habe ich aus dieser Tabelle den Defaultwert entfernt. (was ein Satz.. )

...es kracht mit der gleichen Meldung.

Das Script einer Tabelle (Namen geändert)
YYYY = Tabelle 1
XXXX = Tabelle 2
Delphi-Quellcode:
USE [YYYY]
GO
/****** Object: Table [dbo].[XXXX] Script Date: 03/14/2013 10:20:06 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_PADDING ON
GO
CREATE TABLE [dbo].[XXXX](
   [ID] [int] IDENTITY(1,1) NOT NULL,
   [x] [int] NULL,
   [x] [int] NULL,
   [x] [varchar](2) NULL,
   [x] [varchar](50) NULL,
   [x] [varchar](6) NULL,
   [x] [varchar](4) NULL,
   [x] [varchar](50) NULL,
   [x] [varchar](4000) NULL,
   [x] [int] NULL,
   [x] [datetime] NULL,
   [x] [int] NULL,
   [x] [datetime] NULL,
   [Sort] [int] NULL,
   [Storno] [bit] NULL,
   [x] [varchar](4) NULL,
   [x] [varchar](max) NULL,
   [x] [bit] NULL,
   [x] [varchar](20) NULL,
PRIMARY KEY CLUSTERED
(
   [ID] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY]
GO
SET ANSI_PADDING OFF
GO
/****** Object: Default [DF_Storno] Script Date: 03/14/2013 10:20:06 ******/
ALTER TABLE [dbo].[XXXX] ADD CONSTRAINT [DF_Storno] DEFAULT ((0)) FOR [Storno]
GO
  Mit Zitat antworten Zitat