1/ What if you have a single ALTER TABLE instead of 4?
2/ What if you get the expected columns specs right from your SELECT instead of using ALTER TABLE afterwards?
>I have a program that runs in Unattended Mode using SYS(2335). Occasionally (this weekend 5 out of 56 runs) an ERROR 2031 occurs on an ALTER TABLE line, mostly the last one hereunder. Error 2031 is:
User-interface operation not allowed at this time.>
>It is my impression that this is a VFP-error. In debugging mode it does not occur and the variable m.lcExportAlias is fine.
>
>Can it be that I should use the full table name - DBF() - rather than the alias? Any other suggestion?
>
>
>*
>lcTMPFile = m.P_TempDir + TempName() + '.DBF'
>select * from EmpS0 into table "&lcTMPFile."
>lcExportAlias = alias()
>
>use in select( m.lcExportAlias )
>use ( m.lcTMPFile ) exclusive
>lcExportAlias = alias()
>
>alter table ( m.lcExportAlias ) ;
> drop mutdate ;
> drop muttime ;
> drop thesource
>
>alter table ( m.lcExportAlias ) alter COLUMN reason C(15)
>
>alter table ( m.lcExportAlias );
> add EmpName C( cnMAXLenForName );
> add EmpIndVol C( cnMAXLenForIndVol )
>
>alter table ( m.lcExportAlias ) alter column empno C(5)
Thierry Nivelet
FoxinCloud
Give your VFP application a second life, web-based, in YOUR cloud
http://foxincloud.com/Never explain, never complain (Queen Elizabeth II)