Árvore de páginas

Versões comparadas

Chave

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

Descrição

Este Ponto de Entrada refaz a validação para funcionários que terão dados para a DIRF.

Observações

Este ponto de entrada, através de sua validação permite que funcionários que na validação padrão não teriam seus dados enviados na DIRF passem a ter, o inverso não ocorrerá, funcionários que na validação padrão tiverem seus dados enviados na DIRF caso seja utilizado este ponto de entrada e seu retorno seja .F. os dados do funcionário Não deixarão de ser enviados.
Ou seja, este ponto de entrada serve para se incluir funcionários na DIRF mas não serve para excluir.

Exemplos

#INCLUDE 'PROTHEUS.CH'

USER FUNCTION GP590FUN()

Local aArea := GetArea() 
Local lRet := .F.
Local cMat := "000100"

DbSelectArea("SRA")
SRA->( dbSetOrder(1) )

If SRA->RA_MAT < cMAtcMat
lRet := .T.
Endif

RestArea( aArea )

Return lRet

...