FETCH NEXT FROM PAGE INTO @PATH , @Filename, @PAGE WHILE @@FETCH_STATUS = 0 BEGIN IF @Filename COLLATE Latin1_General_CI_AI LIKE '%.TIF%' COLLATE Latin1_General_CI_AI BEGIN IF @PAGE = 1 BEGIN SET @Export_FileName = @Filename -- Currently G:\TCimages and F:\Images1 on client box SET @Merge_Script = 'c:\ImpactMD\Images\' + @PATH + @Filename + ',' END IF @PAGE <> 1 BEGIN SET @Merge_Script = @Merge_Script + 'c:\ImpactMD\Images\' + @PATH + @Filename + ',' FETCH NEXT FROM PAGE INTO @PATH , @Filename, @PAGE END FETCH NEXT FROM PAGE INTO @PATH , @Filename, @PAGE END ENDOtherwise it doesn't actually loop.
>SET NOCOUNT ON > >DECLARE > @poscode AS VARCHAR(10), > @posdesc AS VARCHAR(100), > @acctno AS VARCHAR(20), > @provcode AS VARCHAR(20), > @PatientID AS VARCHAR(25), > @ChartNumber AS VARCHAR(30), > @ChartID AS VARCHAR(30), > @Last_Name AS VARCHAR(30), > @First_Name AS VARCHAR(30), > @Middle_Initial AS VARCHAR(5), > @Sex AS CHAR(1), > @DOB AS CHAR(10), > @SSN AS CHAR(11), > @ID AS VARCHAR(20), > @LastName AS VARCHAR(30), > @FirstName AS VARCHAR(30), > @MiddleInitial AS VARCHAR(5), > @TITLE AS VARCHAR(10), > @Suffix AS VARCHAR(10), > @UPIN AS VARCHAR(20), > @NAME AS VARCHAR(100), > @LocID VARCHAR(20), > @DocDateTime AS VARCHAR(8), > @DocumentName AS VARCHAR(80), > @OldDocDateTime AS VARCHAR(22), > @OldSubject AS VARCHAR(80), > @Filename AS VARCHAR(50), > @PATH AS VARCHAR(50), > @PAGE AS VARCHAR(10), > @documentid AS VARCHAR(40), > @SQL AS VARCHAR(8000), > @COPYSCRIPT AS nvarchar(4000), > @CREATEDIRSCRIPT AS nvarchar(4000), > @DELETEDIRSCRIPT AS nvarchar(4000), > @Folder AS VARCHAR(100), > @Export_FileName AS VARCHAR(100), > @Merge_Script AS nvarchar(4000) > >USE ImpactMD > > >DECLARE >ChartID CURSOR >Forward_Only > FOR > SELECT DISTINCT (P.ChartID) > FROM IMPACTMD.dbo.Patients P > INNER JOIN IMPACTMD.dbo.Doc_Header H ON H.PatientID = P.PatientID > -- Testing Only! > WHERE ChartID = '286' > >OPEN ChartID > >FETCH NEXT > FROM ChartID > INTO @ChartID > >WHILE @@FETCH_STATUS = 0 > > BEGIN > > DECLARE Patient CURSOR > Forward_Only > Read_Only > FOR > SELECT DISTINCT > ISNULL(CONVERT(VARCHAR(8),H.DATE,112),'') AS DocumentDate, > ISNULL(H.DocumentName,'') , > ISNULL(H.documentid,'') , > ISNULL(FT.DESCRIPTION,'') > FROM IMPACTMD.dbo.Patients P > INNER JOIN IMPACTMD.dbo.Doc_Header H > ON H.PatientID = P.PatientID > INNER JOIN IMPACTMD.dbo.Folder_Template FT > ON H.FolderID = FT.FolderID > WHERE P.ChartID = @ChartID > > OPEN Patient > > FETCH NEXT > FROM Patient > INTO > @DocDateTime , > @DocumentName, > @documentid , > @Folder > > WHILE @@FETCH_STATUS = 0 > > BEGIN > > DECLARE PAGE CURSOR > Forward_Only > Read_Only > FOR > SELECT > DD.PATH, > DD.Filename, > DD.PAGE > FROM IMPACTMD.dbo.Doc_Detail DD > WHERE documentid = @documentid > ORDER BY DD.Filename, DD.PAGE > > OPEN PAGE > > FETCH NEXT > FROM PAGE > INTO > @PATH , > @Filename, > @PAGE > > WHILE @@FETCH_STATUS = 0 > > BEGIN > > IF @Filename COLLATE Latin1_General_CI_AI LIKE '%.TIF%' COLLATE Latin1_General_CI_AI > > BEGIN > > IF @PAGE = 1 > > BEGIN > > SET @Export_FileName = @Filename > -- Currently G:\TCimages and F:\Images1 on client box > SET @Merge_Script = 'c:\ImpactMD\Images\' + @PATH + @Filename + ',' > > END > > IF @PAGE <> 1 > > BEGIN > > SET @Merge_Script = @Merge_Script + 'c:\ImpactMD\Images\' + @PATH + @Filename + ',' > > FETCH NEXT > FROM PAGE > INTO > @PATH , > @Filename, > @PAGE > > END > > FETCH NEXT > FROM PAGE > INTO > @PATH , > @Filename, > @PAGE > > END > > END > > CLOSE PAGE > DEALLOCATE PAGE > > SET @Merge_Script = LEFT(@Merge_Script,LEN(LTRIM(RTRIM(@Merge_Script))) -1) > SET @Merge_Script = @Merge_Script + '|c:\ImpactMD\Export\|' + @Export_FileName > SET @Merge_Script = 'C:\ImpactMD\Tiff\Tiff_Merger.exe "' + @Merge_Script + '"' > > -- Testing ONLY! > PRINT @Merge_Script > > --EXEC MASTER.dbo.xp_cmdshell @Merge_Script, no_output > > FETCH NEXT > FROM Patient > INTO > @DocDateTime , > @DocumentName, > @documentid , > @Folder > > END > > CLOSE Patient > DEALLOCATE Patient > > FETCH NEXT > FROM ChartID > INTO > @ChartID > > END > >CLOSE ChartID >DEALLOCATE ChartID > >SET NOCOUNT OFF >