Histórico da Página
...
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
|
...
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
...