Frameworksp

Atalhos

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

Versões comparadas

Versão antiga 5

changes.mady.by.user Danilo Basilio Medeiros

Gravado em

comparado com

Nova versão 6

changes.mady.by.user Danilo Basilio Medeiros

Gravado em

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 estiver como .F., a função atualizará a data independente de permissão de usuário.

* A função possui uma tolerância de 30 minutos, ou seja, a data não será alterada após a 00h30.



Nota
titleNota:

A função possui uma tolerância de 30 minutos, ou seja, a data não será alterada após a 00h30.

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