Compile Subroutine Temp(dummy)
Declare Function datetime
Debug

dt = datetime()

*Open 'SYSENV' To hSysenv Then 
*     Open 'TEMP_SYSENV' To hNewSysenv Then
*          Select hSysenv
*          EOF = 0
*          Loop
*          Readnext Key Else EOF = 1
*          Until EOF
*               //If IndexC(Key, 'SRP', 1) then
*                    Read Rec From hSysenv, Key Then
*                         Write Rec To hNewSysenv, Key Else 
*                              Debug
*                         end
*                    End
*               //end
*          Repeat
*     End
*End


return
