Descrição

Manutenção de contrato de financiamento

Exemplos

#include "protheus.ch"


User Function EFFEX400()
Local cParamIXB

Begin Sequence

If ValType(ParamIXB) == "A"

cParamIXB:= ParamIXB[1]

Else

cParamIXB:= ParamIXB

EndIf

Do Case

Case cParamIXB == "ANTES_GRAVA_EF3"

MsgInfo("Teste ANTES_GRAVA_EF3", "ponto de entrada")
//EF3->EF3_ZZCAMPO:= "CONTEUDO"

Case cParamIXB == "GRAVANDO_EF3"

MsgInfo("Teste GRAVANDO_EF3", "ponto de entrada")
//EF3->EF3_ZZCAMPO:= "CONTEUDO"

Case cParamIXB == "INC_EF3"

MsgInfo("Teste INC_EF3", "ponto de entrada")
//EF3->EF3_ZZCAMPO:= "CONTEUDO"

Case cParamIXB == "BOTOES1"

//adicionar ou remover ações extras em outras ações

AAdd( aBotoes, {"EDIT", {|| MsgInfo("Nova Ação"")}, "Ação Teste"} )

Case cParamIXB == "CONDICAO_VINCULACAO_TOP"

cCond += " And EEQ_ABC = 'ABC'"

Case cParamIXB == "CAMPOS_QUERY_INVOICES"

cQuery += ", EEQ_ABC "        

Case cParamIXB == "GRV_EVENTO_EFF"

MsgInfo("Entrou no ponto de entrada 'GRV_EVENTO_EFF'")

EndCase

End Sequence

Return

Idioma

Português(Brasil)

Versões

Microsiga Protheus11 e posteriores

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Parâmetros

NomeTipoDescrição
ANTES_GRAVA_EF3CaracterIndica o início do processamento da gravação da tabela de parcelas/ eventos do contrato de financiamento. Executado após o RecLock na tabela e antes da gravação de qualquer registro
GRAVANDO_EF3CaracterExecutado durante o processamento de gravação dos registros da tabela EF3, logo após a migração dos dados da tabela temporária (WorkEF3) para esta.
INC_EF3CaracterIndica o fim do processamento de gravação; executado quando muda o registro da tabela temporária (WorkEF3).
BOTOES1CaracterIndica a chamada do ponto de entrada no momento da criação das ações que poderão ser executadas na rotina de manutenção do contrato. Estará disponível a variável aBotoes.
CONDICAO_VINCULACAO_TOPCaracterIndica a chamada do ponto de entrada no filtro dos câmbios de exportação das Invices que podem ser usadas na vinculação ao contrato de financiamento. Neste momento estará disponível a variável cCond.
CAMPOS_QUERY_INVOICESCaracterIndica a chamada do ponto de entrada na definição dos campos que serão listados no filtro dos câmbios das Invoices que podem ser usadas na vinculação ao contrato de financiamento. Neste ponto estará disponível a variável cQuery.
GRV_EVENTO_EFFCaracterIndica a chamada do ponto de entrada para a gravação do evento na função EX400GrvTrans

Retorno


Variáveis

NomeTipoEscopoPode AlterarDescrição
lAppendLógicoPrivateNãoIndica se será incluído ou alterado um registro da tabela EF3. Disponível no ponto de entrada com os parâmetros ANTES_GRAVA_EF3, GRAVANDO_EF3 e INC_EF3.
nOpcRdmNuméricoPrivateNãoIndica a operação que está sendo processada na gravação das parcelas/ eventos. Disponível no ponto de entrada com os parâmetros ANTES_GRAVA_EF3, GRAVANDO_EF3 e INC_EF3.
aBotoesArrayPrivateSimContém as ações que serão executadas na manutenção do contrato. Disponível no ponto de entrada com o parâmetro BOTOES1, permite incluir novas ações ou excluir ações existentes.
cCondCaracterPrivateSim

Disponível no ponto de entrada com o  parâmetro CONDICAO_VINCULACAO_TOP, possibilita intervir na condição de execução da query usada para filtrar os câmbios de exporação que podem ser vinculados ao contrato de financiamento.

cQueryCaracterPrivateSimDisponível no ponto de entrada com o parâmetro CAMPOS_QUERY_INVOICES, possibilita a adição de campos na query que serão listados na apuração dos câmbios que podem ser vinculados aos contratos de financiamento, tanto de importação quanto de exportação.
cTpConCaracterPrivateNãoDisponível tanto no ponto de entrada com o parâmetro CONDICAO_VINCULACAO_TOP quanto no parâmetro CAMPOS_QUERY_INVOICES, possibilita identificar se a opção de câmbio a ser listado é "1" (exportação) ou "2" (remessa)
cModCaracterPrivateNãoDisponível tanto no ponto de entrada com o parâmetro CONDICAO_VINCULACAO_TOP quanto no parâmetro CAMPOS_QUERY_INVOICES, possibilita identificar se o tipo de contrato de financiamento é "E" (exportação) ou "I" (importação).

Programa Fonte

EFFEX400.PRW