Welcome to Programmers Language v2

ID: 53
PlCodelang: T-SQL
PlGroup: Datum, Zeit
PlItemTitle: Erster und letzter Tag des Monats ermitteln
Code: DECLARE @Now SMALLDATETIME ,@FirstDayOfMonth SMALLDATETIME ,@Laufperiode CHAR(21) ,@LastDayOfMonth SMALLDATETIME -- SET @Now = GetDate() SET @Now = {d '2008-02-01'} SET @FirstDayOfMonth = CAST(year(@Now) * 10000 + MONTH(@Now) * 100 + 1 as CHAR(8)) SET @Laufperiode = CONVERT(CHAR(10), @FirstDayOfMonth, 104) + '-' + CONVERT(CHAR(10), DATEADD(mm, 1, @FirstDayOfMonth) - 1, 104) SET @LastDayOfMonth=DATEADD(mm, 1, @FirstDayOfMonth)-1 SELECT [@Laufperiode] = @Laufperiode ,[@FirstDayOfMonth] = @FirstDayOfMonth ,[@LastDayOfMonth] = @LastDayOfMonth

ID: 54
PlCodelang: T-SQL
PlGroup: Datenbank
PlItemTitle: Stored Function aufrufen
Code: SELECT schema.functionname(para1, para2)

ID: 55
PlCodelang: Delphi
PlGroup: GUI, Komponenten allgemein
PlItemTitle: Mit Return ein Ereignis im Textfeld auslösen
Code: procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if Key = #13 then begin Key := #0; ShowMessage('Auswerten ...'); end; end;

ID: 56
PlCodelang: T-SQL
PlGroup: Datum, Zeit
PlItemTitle: Aktuelles Datum/Uhrzeit
Code: SELECT GETDATE(); INSERT INTO table (datetime) VALUES (GETDATE());

ID: 57
PlCodelang: T-SQL
PlGroup: Datenbank
PlItemTitle: SQL-Cursor
Code: CREATE #myTempTable ( ID Int IDENTITY ,tempField1 Int ,tempField2 VarChar(30) ) DECLARE @field1 AS Int DECLARE @field2 AS VarChar(30) DECLARE myCursor CURSOR FOR SELECT myTableField1, myTableField2 FROM myTable OPEN myCursor FETCH NEXT FROM myCursor INTO @field1, @field2; WHILE @@FETCH_STATUS=0 BEGIN PRINT @field1 -- Prints value from column myTable.myTableField1 PRINT @field2 -- Prints value from column myTable.myTableField2 INSERT INTO #myTempTable (tempField1,tempField2) VALUES (@field1, @field2) -- do something else... FETCH NEXT FROM myCursor INTO @field1, @field2; -- next row END CLOSE myCursor DEALLOCATE myCursor DROP #myTempTable

ID: 58
PlCodelang: Java
PlGroup: Typenkonvertierung
PlItemTitle: Integer nach String konvertieren
Code: String numberAsString = ""; int number = 1; numberAsString = String.valueOf(number);

ID: 59
PlCodelang: T-SQL
PlGroup: Datenbank
PlItemTitle: Fortlaufende Nummer innerhalb eines ResultSets
Code: -- Beispiel: -- http://msdn.microsoft.com/de-de/library/ms186734.aspx SELECT FirstName, LastName, ROW_NUMBER() OVER(ORDER BY SalesYTD DESC) AS 'Row Number', SalesYTD, PostalCode FROM Sales.vSalesPerson

ID: 60
PlCodelang: T-SQL
PlGroup: Datenbank
PlItemTitle: Nach Inhalt in Functions/Stored Procedures suchen
Code: -- Durchsucht alle Functions, Stored Procedures, Views nach dem enthaltenen Begriff dbo.table1: DECLARE @suchbegriff VarChar(50) = '%dbo.table1%' SELECT * FROM ( SELECT ROUTINE_SCHEMA AS [Schema] , ROUTINE_NAME AS [Objectname] , ROUTINE_DEFINITION AS [Objectdefinition] , ROUTINE_TYPE AS [Objecttype] FROM INFORMATION_SCHEMA.ROUTINES WHERE ROUTINE_DEFINITION LIKE @suchbegriff AND (ROUTINE_TYPE='PROCEDURE' OR ROUTINE_TYPE='FUNCTION') UNION ALL SELECT TABLE_SCHEMA AS [Schema] , TABLE_NAME AS [Objectname] , VIEW_DEFINITION AS [Objectdefinition] , 'VIEW' AS [Objecttype] FROM INFORMATION_SCHEMA.VIEWS WHERE VIEW_DEFINITION LIKE @suchbegriff ) subQuery1 ORDER BY subQuery1.[Objectname] -- gefunden bei: http://www.mssqltips.com/tip.asp?tip=1419 -- erweitert um View-Definition

ID: 61
PlCodelang: VB.NET
PlGroup: Schleifen
PlItemTitle: For-Schleife
Code: For i As Integer = 0 To 10 Debug.WriteLine(i) ' 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 Next For i As Integer = 10 To 5 Step -1 Debug.WriteLine(i) ' 10, 9, 8, 7, 6, 5 Next

ID: 62
PlCodelang: VB.NET
PlGroup: Array
PlItemTitle: Array definieren
Code: Dim myStrArray(3) As String myStrArray(0)="First" myStrArray(1)="Second" myStrArray(2)="Third" myStrArray(3)="Fourth" ReDim strJahreszeiten(4) myStrArray(4)="Fifth" Dim my2DimStrArray(1,2) As String my2DimStrArray(0,0) = "This" my2DimStrArray(0,1) = "is" my2DimStrArray(0,2) = "a" my2DimStrArray(1,0) = "2" my2DimStrArray(1,1) = "dimensional" my2DimStrArray(1,2) = "matrix"