Michael Mullan
17-May-2010, 06:56 AM
After I send a VRW report to print to printer at a client site, I get the following error
C:\dfdata\CECI14\Programs\CECI.exe
Data Out of Range
Error: 4382
MSG_READDEVMODE (13322) - OOBJECT (2870) - at address 127552
GET_PRINTDIALOG (6558) - OOBJECT (2870) - at address 127691
MSG_PRINTREPORT (6447) - OREPORT (2781) - at address 128297
MSG_STARTREPORT (13007) - OVRWPREVIEWPANEL (2780) - at address 139395
MSG_STARTREPORT (13007) - O3COLUMNREPORTVIEW (2822) - at address 139836
MSG_STARTREPORT (13007) - OPRINTBUTTON (2829) - in native code
MSG_ONCLICK (4574) - OPRINTBUTTON (2829) - at address 139802
MSG_COMMAND (648) - OPRINTBUTTON (2829) - in native code
[start] - at address 140589
address 127552 is
{ Visibility = Private }
Procedure ReadDevMode
Integer iResult iVoid
Handle hDevMode
Pointer pDevMode
DEVMODE dm
.
.some code removed for clarity.
.
If (dm.dmFields iand DM_DITHERTYPE) Begin
Set peDitherType to dm.dmDitherType
End
If (dm.dmFields iand DM_NUP) Begin //<<-- Error Here
Set peNup to dm.dmNup
End
Move (GlobalUnlock (hDevMode)) to iResult
If (iResult = 0) Begin
Move (ShowLastError ()) to iResult
End
End_Procedure
this does not happen on my workstation, but does when I connect via remote desktop to the client PC.
C:\dfdata\CECI14\Programs\CECI.exe
Data Out of Range
Error: 4382
MSG_READDEVMODE (13322) - OOBJECT (2870) - at address 127552
GET_PRINTDIALOG (6558) - OOBJECT (2870) - at address 127691
MSG_PRINTREPORT (6447) - OREPORT (2781) - at address 128297
MSG_STARTREPORT (13007) - OVRWPREVIEWPANEL (2780) - at address 139395
MSG_STARTREPORT (13007) - O3COLUMNREPORTVIEW (2822) - at address 139836
MSG_STARTREPORT (13007) - OPRINTBUTTON (2829) - in native code
MSG_ONCLICK (4574) - OPRINTBUTTON (2829) - at address 139802
MSG_COMMAND (648) - OPRINTBUTTON (2829) - in native code
[start] - at address 140589
address 127552 is
{ Visibility = Private }
Procedure ReadDevMode
Integer iResult iVoid
Handle hDevMode
Pointer pDevMode
DEVMODE dm
.
.some code removed for clarity.
.
If (dm.dmFields iand DM_DITHERTYPE) Begin
Set peDitherType to dm.dmDitherType
End
If (dm.dmFields iand DM_NUP) Begin //<<-- Error Here
Set peNup to dm.dmNup
End
Move (GlobalUnlock (hDevMode)) to iResult
If (iResult = 0) Begin
Move (ShowLastError ()) to iResult
End
End_Procedure
this does not happen on my workstation, but does when I connect via remote desktop to the client PC.