Páginas filhas
  • FwDateUpd - Atualiza a database do sistema na virada do dia

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

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.
Isso significa que caso ele possa alterar, não há problema da data se manter no dia anterior, e assim a função FwDateUpd

NÃO (aviso) irá atualizar a data!.


Quando o parâmetro lAccess36 esteja estiver como .F., a função irá atualizar atualizará a data independente de permissão de usuário.

Exemplos

User Function tstdate

Local lContinue := .T.

While lContinue

//A cada volta eu verifico se o dia mudou
FwDateUpd(.F.)

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