Home

Linha Microsiga Protheus

Páginas filhas
  • DarfAdObs - Adiciona observações na DARF

Descrição

Ponto de entrada que permite adicionar informações ao campo observações no DARF.

Exemplos

User Function DarfAdObs()

Local cObs := ""

cObs:= "Ponto de entrada que adiciona informações ao campo observações"

Return cObs

Idioma

Português(Brasil)

Versões

Microsiga Protheus 11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Retorno

Variável Caracter contendo o texto a ser inserido como observações no DARF.

Eventos de chamada do Ponto de Entrada

If lDarfAdObs
cObs := ExecBlock("DarfAdObs", .F. , .F.)
If ValType(cObs) == 'C' .And. !Empty(cObs)
oPrint:Say(nX+490,60,"Observação",oFont10)
oPrint:Say(nX+520,70,Alltrim(cObs),oFont07)
Endif
Endif

Variáveis

Local:= cObs

Programa Fonte

FRSRF.PRX

  • Sem rótulos