I am getting the following 2 errors every so often.
1.
Procedure Utilosfprintserver001.zgetpo
C:\ecnc\source\utilosfprintserver.sct (line 15)
"Nesting error."
2.
Procedure Utilosfprintserver001.zgetpo
C:\ecnc\source\utilosfprintserver.sct (line 7)
"Error reading file \\stysinger3\osf\data\orders.dbf."
Create Cursor notprinted (po c(30))
If File('\\stysinger3\osf\data\orders.dbf')
If Not Used('orders')
Use '\\stysinger3\osf\data\orders.dbf' In 0 Shared
Endif
Select orders
Scan For Len(Alltrim(orders.po))>0 And orders.printed<>.T.
Select notprinted
Locate For Alltrim(notprinted.po)=Alltrim(orders.po)
If Found()=.T.
Else
Insert Into notprinted (po) Values (orders.po)
Endif
Endscan
Thisform.lstpos.RowSource='notprinted.po'
Thisform.lstpos.Refresh
Thisform.lstpos.Click
Thisform.Refresh
Else
Wait 'network path not found, process suspeneded' Window Nowait
Endif
This bit of code is part of an automated process that fires every 10 seconds or 30000 miliseconds.
Any ideas on what is causing these errors?