Descrição | Essa é uma função de framework, que deve ser utilizada dentro de outras rotinas quando se deseja que a database seja atualizada automaticamente na virada do dia. Ela deve ser chamada dentro do loop principal da rotina, pois assim que sua chamada for realizada, a data já é atualizada. | |||||
---|---|---|---|---|---|---|
Observações | Por padrão, essa rotina considera o acesso de usuário de número 36, que indica se ele pode ou não alterar a database do sistema. NÃO irá atualizar a data.
...
| |||||
Exemplos | User Function tstdate Local lContinue := .T. While lContinue //A cada volta eu verifico se o dia mudou lContinue := MsgYesNo("Continuar no Loop?","Aviso em " + DToC(If(Type("dDatabase") == "D", dDatabase, Date()))) EndDo Return | |||||
Parâmetros | lAccess36 - Considera o Acesso 36(Alterar Database do Sist.)? | |||||
Retorno | Nil | |||||
Programa Fonte | FWPreExecute.PRW |