Árvore de páginas

Versões comparadas

Chave

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

...

Incluir Página

...

AVINT101 - Funções de controle das ações, eventos e serviços de integração

...

Observações

...

Utilizado para manipular o array de dados utilizados na rotina automatica das integrações

...

Exemplos

User Function AVINT101()
Local cParam
Local nPos

If ValType(ParamIXB) == "A"

cParam:= ParamIXB[1]

Else

cParam:= ParamIXB

EndIf

Do Case

Case cParam == "ALT_ARRAY_FIN_AVINT101"

MsgInfo("Entrou no ponto de entrada 'ALT_ARRAY_FIN_AVINT101'.")
aAdd(aIntTitFin , {"E2_MOTIVO", "NOR", Nil} )

Case cParam == "AF200VALID_VALCAMPO"

MsgInfo("AF200VALID_VALCAMPO")

Case cParam == "AF200STATUS_ALTSTATUS"

MsgInfo("AF200STATUS_ALTSTATUS")

Case cParam == "AF200GPARC_ALTDTEMBA"

MsgInfo("AF200GPARC_ALTDTEMBA")

Case cParam == "ALTERA_PARCELA"

MsgInfo("ALTERA_PARCELA")

Case cParam == "EECINCOM"

/* exemplo de alteração do aCab e aItem na geração do pedido da despesa nacional do embarque de exportação */
nPos:= AScan(aCab, {|x| AllTrim(x[1]) == "C7_CONTATO"})

If nPos > 0

aCab[nPos][2]:= "Novo Contato"

EndIf

nPos:= AScan(aItem[1], {|x| AllTrim(x[1]) == "C7_QUANT"})

If nPos > 0

aItem[nPos][2]:= 2 //nova quantidade

EndIf

EndCase

Return

DT PE AVINT101
DT PE AVINT101

...

Preview

...

Veja também

...

Idioma

...

Português(Brasil)

...

Versões

...

Microsiga_Protheus11

...

Sistemas Operacionais Suportados

...

Todos

...

Compatível com as Bases de Dados

...

Todas

...

Updates

...

Parâmetros

...

Permite a manipulação do array de integração de titulos com o financeiro

...

Retorno

...

Eventos de chamada do Ponto de Entrada

...

Variáveis

...

Programa Fonte

...