set ANSI_NULLS ON set QUOTED_IDENTIFIER ON go ALTER PROCEDURE [dbo].[STPGetListAllRowsByDocForInvoicePrint] @serialNo int AS declare @Document int, @DocCode int SELECT @Document=DocDetailTbl.Fk_docSysCode, @DocCode=DocDetailTbl.Syscode FROM DocDetailTbl INNER JOIN InvoiceTbl ON DocDetailTbl.Syscode = InvoiceTbl.FK_DocsysCode WHERE (InvoiceTbl.InvoiceSerialNo = @serialNo) declare @Title nvarchar(100),@AmountIn money,@AmountOut money,@Comment nvarchar(1000),@TitleComment nvarchar(1000) declare @T table (Title1 nvarchar(100),AmountIn1 money,AmountOut1 money,Comment1 nvarchar(1000),TitleComment1 nvarchar(1000),Title2 nvarchar(100),AmountIn2 money,AmountOut2 money,Comment2 nvarchar(1000),TitleComment2 nvarchar(1000),Title3 nvarchar(100),AmountIn3 money,AmountOut3 money,Comment3 nvarchar(1000),TitleComment3 nvarchar(1000)) declare CurCursor cursor for SELECT VWCompleteCode.Title, VWDocumentDetail_DocHeader.AmmountIN, VWDocumentDetail_DocHeader.AmmountOUT, VWDocumentDetail_DocHeader.Comment, (CASE VWCompleteCode.code0 WHEN 1 THEN VWCompleteCode.Title + N' به حساب ' WHEN 5 THEN N' وجه نقد ' ELSE VWCompleteCode.Title END) AS TitleComment FROM VWDocumentDetail_DocHeader INNER JOIN VWCompleteCode ON VWDocumentDetail_DocHeader.Fk_AccountSyscode = VWCompleteCode.AccountSysCode WHERE (VWDocumentDetail_DocHeader.Fk_docSysCode = @Document) AND (VWDocumentDetail_DocHeader.DetailCode <> @DocCode) open CurCursor FETCH NEXT FROM CurCursor into @Title , @AmountIn , @AmountOut , @Comment , @TitleComment if @@FETCH_STATUS=0 insert into @t ( Title1 , AmountIn1 , AmountOut1 , Comment1 , TitleComment1) values ( @Title , @AmountIn , @AmountOut , @Comment , @TitleComment) else goto SelectLbl FETCH NEXT FROM CurCursor into @Title , @AmountIn , @AmountOut , @Comment , @TitleComment if @@FETCH_STATUS=0 update @t set Title2=@Title , AmountIn2=@AmountIn , AmountOut2=@AmountOut , Comment2=@Comment , TitleComment2=@TitleComment else goto SelectLbl FETCH NEXT FROM CurCursor into @Title , @AmountIn , @AmountOut , @Comment , @TitleComment if @@FETCH_STATUS=0 update @t set Title3=@Title , AmountIn3=@AmountIn , AmountOut3=@AmountOut , Comment3=@Comment , TitleComment3=@TitleComment else goto SelectLbl SelectLbl: CLOSE CurCursor DEALLOCATE CurCursor select * from @t