There is only one record in all the cursors. Why am I getting repeated values in the results?

Search for "PRINT 'Page One:' + ' ' + @Page" to see where the results are coming from.

This stuff is driving me crazy!

Results:

Page One: 1
Page One: 1
Page One: 1
Page One: 1
Page One: 1
Page One: 1
.
.
.
Page One: 1
Page One: 1
Page One: 1
Page One: 1
Page One: 1
Page One: 1
Page One: 1
Page One: 1

SQL Query:

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 = '1601'
			-- 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
				-- Testing Only!
				-- WHERE P.ChartID = @ChartID
				WHERE ChartID = '1601' AND DocumentID = '58275'
				-- WHERE ChartID = '286' AND DocumentID = '19428'

	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 -- AND Path = @SubDir + '\'
				-- WHERE documentid = 58275 AND Path = '00000004' + '\'
				WHERE documentid = 58275
				ORDER BY DD.Filename, DD.PAGE

		OPEN PAGE

		FETCH NEXT
			FROM PAGE
			INTO
				@PATH ,
				@Filename,
				@PAGE
			WHILE @@FETCH_STATUS = 0

		BEGIN

			IF UPPER(@Filename) LIKE '%.TIF%'

				BEGIN

					IF @PAGE = 1

						BEGIN

							-- Testing Only!
							PRINT 'Page One:' + ' ' + @Page

							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

							-- Testing Only!
							PRINT 'Page More:' + ' ' + @Page

							SET @Merge_Script = @Merge_Script + @PATH + @Filename + ','

						END

				END

		END

		CLOSE PAGE
		DEALLOCATE PAGE

		-- Testing ONLY!
		PRINT @Merge_Script

		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