THISFORM.FILEUAC = Alltrim(mxopid)+SUBSTR(SYS(2015), 3, 10) IF USED(THISFORM.FILEUAC) USE IN(THISFORM.FILEUAC) ENDIF IF USED("UACQuery" ) USE IN UACQuery ENDIF SELECT 0 CREATE TABLE (AddBS(Sys(2023))+THISFORM.FILEUAC) FREE (UAC C(03), LOB C(03) ) USE (DBF()) ALIAS UACQuery EXCLUSIVE INDEX ON UAC TAG UAC SET ORDER TO UAC>After months of working correctly, some workstations are failing.
>THISFORM.FILEUAC = Alltrim(mxopid)+SUBSTR(SYS(2015), 3, 10) > >SELECT 0 >CREATE TABLE (AddBS(Sys(2023))+THISFORM.FILEUAC) FREE (UAC C(03), LOB C(03) ) > IF USED(THISFORM.FILEUAC) > SELECT (THISFORM.FILEUAC) > USE > ENDIF > USE (AddBS(Sys(2023))+THISFORM.FILEUAC) IN 0 ALIAS UACQuery EXCLUSIVE > SELECT UACQuery > INDEX ON UAC TO (AddBS(Sys(2023))+THISFORM.FILEUAC) > SET INDEX TO (AddBS(Sys(2023))+THISFORM.FILEUAC)>