Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

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

Versões comparadas

Versão antiga 1

changes.mady.by.user Nathalia Lira Akamine

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Daniela Rodrigues Monstans Ferreira

Gravado em

Chave

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

Descrição

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

no DARF.

Observações

Exemplos

User Function DarfAdObs()

Local cObs := ""

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

Return cObs

Veja também

Idioma

Português(Brasil)

Versões

Microsiga _Protheus11Protheus 11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

Retorno

Variável Caracter contendo o texto a ser inserido como observações na 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