Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 4

changes.mady.by.user Viviane Alves Bolivar

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Daniel Fonseca de Lira

Gravado em

Chave

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

Descrição

O ponto de entrada AF10DESC, é utilizado na gravação de um ativo, carregando a descrição estendida automaticamente preenchida, na rotina ATFA010 - Cadastro de Ativos.

Exemplos

User Function AF10DESC()


    Local cDesc :=
"TESTE" //texto retornado para descricao estendida

Alert("Ponto de entrada AF10DESC executado")

Return 
 ParamIXB[1]

    If Empty(cDesc)
        cDesc := "Novo texto padrao"
    Else
        cDesc := StrTran(cDesc, "o", "z")
    EndIf
Return cDesc

Idioma

Português(Brasil)

Versões

Versões_Anteriores

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Parâmetros

Nenhum

Retorno

cDesc

Eventos de chamada do Ponto de Entrada

If
INCLUI
If 
 Inclui .And. ExistBlock("AF10DESC")


    cTexto := ExecBlock("AF10DESC",.F.,.F.
)
Endif
Endif
, {cTexto})
EndIf

Programa Fonte

ATFA010.PRW - Cadastro de Ativos