When you get the Nesting Error, check what value is in orders.printed (make sure it's a logical, and what you get from len(alltrim(orders.po)) (make sure it's numeric. I've seen nesting errors in a SCAN statement when you would normally expect something like "Data type mismatch".
The second problem sounds similar. There's something wrong with your Orders table in some cases.
>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.
> *do nothing
> 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?