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