Lastday - Data informada no parâmetro

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

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