Páginas filhas
  • Lastday - Data informada no parâmetro

Função: Lastday - Data informada no parâmetro

Esta função retorna as informações relacionadas a data informada no parâmetro dData conforme o tipo de ação a ser executada definida através do parâmetro nTipo.

Lastday - Data informada no parâmetro ( < dData>, [ nTipo] ) --> dDataRet

NomeTipoDescriçãoObrigatórioReferência
dDataDataData para cálculo. X
nTipoNuméricoParâmetro de cálculo
    dDataRet(data)
  • Data devolvida pela função conforme o valor informado no parâmetro nTipo

Parâmetro

nTipo

O parâmetro nTipo define a ação que a função deverá executar.

Segue os valores que poderão ser passados pelo parâmetro e o seu respectivo retorno:

  • 0 ou Branco - Último dia do mês em Pauta;        
  • 1 - Primeiro dia útil do mês;               
  • 2 - Último dia útil do mês;                 
  • 3 - Próximo dia útil após a data informada (Se a data informada for útil, a função retorna a própria data).

Observação

Caso a data de retorno esteja dentro das opções abaixo:

  • 01/01
  • 21/04
  • 01/05
  • 07/09
  • 12/10
  • 02/11
  • 15/11
  • 25/12

A função retornará a data conforme as opções mostradas abaixo:

  • Se nTipo = 1 ou nTipo = 3 -> retorna dDataRet+1
  • Se nTipo = 2 -> retorna dDataRet-1

 

Exemplo:#include "protheus.ch"                                                                                     User Function TstLastDay()	 Local dData := Date()                                          Local dRetSET DATE BRITISH//retorna o ultimo dia do mesdRet := LastDay(dData)ApMsgAlert("Último dia do mês: " + Dtoc(dRet))//retorna o primeiro dia útil do mesdRet := LastDay(dData, 1)ApMsgAlert("Primeiro dia útil do mês: " + Dtoc(dRet))//retorna o ultimo dia útil do mesdRet := LastDay(dData, 2)ApMsgAlert("Último dia útil do mês: " + Dtoc(dRet))//retorna o próximo dia útil do mesdRet := LastDay(dData, 3)ApMsgAlert("Próximo dia útil do mês: " + Dtoc(dRet))Return	

  • Sem rótulos