Histórico da Página

...

Descrição

EECAF200 - Manutenção do Câmbio

Observações

Utilizado para alteração do status no controle de câmbio e do embarque após a liquidação

Exemplos

User Function EECAF200()

Local cParam := If(Type("ParamIxb") = "A", ParamIxb[1], If(Type("ParamIxb") = "C", ParamIxb, ""))

If cParam == "PE_STATUS"

MsgInfo("Entrou no ponto de entrada 'PE_STATUS'.")

If EEC->(RecLock("EEC",.f.))

M->EEC_STATUS := "A"
M->EEC_STTDES := "STATUS TESTE"

EndIf

IF cParam == "INICIALIZA_EVENTOS"

msginfo("Entrou no ponto de entrada 'INICIALIZA_EVENTOS'")
lGrvCamCon := .F.

ENDIF

IF cParam == PE_ALT_PARC

msginfo("Entrou no ponto de entrada 'PE_ALT_PARC'")

ENDIF

If cParam == "EVENTOS_NAO_GERADOS"

//disponível para alteração a variável cEventosNaoGerados

EndIf

Do Case

Case cParam == "AF200DPARC_PARCELA_CAMBIO"

/* Exemplo de uso do ponto de entrada no momento da exclusão da parcela de câmbio, quando retirada a data do embarque.
A variável lDLoopEEQ indica se o programa deverá esquivar da exclusão do registro. */
If EEQ->EEQ_EVENT == "120"

lDLoopEEQ:= .T.

EndIf

EndCase

Case cParam == "AF200VALID_VALCAMPO"

If nTipoDet == 6 //exclusão

//não permite excluir
lSair:= .T.
lRet:= .F.

EndIf

Case cParam == "PE_VALIDA"

nTipo:= ParamIXB[2] //é o mesmo conteúdo da variável nTipoDet
If nTipo == 6 //ou nTipoDet == 6; exclusão

//não permite excluir
//Return .F. //pode retornar .F. ou alterar a variável lRet
lRet:= .F.

EndIf

Case cParam == "ANTES_GRV_TMP"

nTipo:= ParamIXB[2]
If nTipo == 5

MsgInfo("Alteração da parcela de câmbio", "Aviso")

EndIf

Case cParam == "GRV_ITEM_CAMBIO"

/*
If Empty(EEQ->EEQ_DTCE) .And. !Empty(TMP->EEQ_DTCE)

//processamento customizado

EndIf */
MsgInfo("Ponto de entrada EECAF200 GRV_ITEM_CAMBIO", "GRV_ITEM_CAMBIO")

Case cParam == "INC_CAMBIO"

MsgInfo("Ponto de Entrada EECAF200 INC_CAMBIO", "INC_CAMBIO")

EndCase

Return NilReturn nil

Preview

Veja também

http://tdn.totvs.com/display/public/mp/EECAF200

EECAF200-Manutenção de parcelas de câmbio

Idioma

Português(Brasil)

Versões

Microsiga_Protheus12

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

Nome	Tipo	Descrição	Default	Obrigatório	Referência
PE_STATUS	Carácter	Permite a customização do status do pedido após a liquidação do controle do câmbio
INICIALIZA_EVENTOS	Carácter	Permite a customização da validação que não permite gerar parcela de câmbio, caso a parcela já esteja liquidado. Também possibilita reiniciar a definição dos eventos para os quais devem ser geradas parcelas de câmbio, através da variável lInicializa.
PE_ALT_PARC	Caracter	Permite alteração da parcela de câmbio (aParc)
AF200DPARC_PARCELA_CAMBIO	Caracter	Ao remover a Dt.Embarque do processo e clicar em Salvar, este ponto de entrada será executado. Também estará disponível a variável cDespIntFin, com a lista dos eventos que serão integrados ao módulo SIGAFIN.
AF200GPARC_DEF_PARC	Caracter	Possibilitar a alteração das parcelas que serão criadas no EEQ com base no array aParc. Também estará disponível a variável cDespIntFin, com a lista dos eventos que serão integrados ao módulo SIGAFIN.
AF200GPARC_DEF_COMI	Caracter	Possibilitar a alteração do rateio das comissões no array aParcAux caso o array aParc tenha sido customizado.
EVENTOS_NAO_GERADOS	Caracter	Permite manipular a variável cEventosNaoGerados, determinando os eventos para os quais não devem ser geradas parcelas de câmbio. Este ponto é executado quando ocorre a reinicialização das variáveis de controle, que pode ser provocada pelo uso do ponto de entrada com o parâmetro INICIALIZA_EVENTOS.
AF200VALID_VALCAMPO	Caracter	Executado a partir da validação dos campos , da parcela de câmbio e na confirmação da gravação da parcela de câmbio. Permite implementar validações adicionais e/ou aborar, através da manipulação das variáveis lSair e lRet. Os campos que estão sendo validados podem ser identificados pela função ReadVar().
{"PE_VALIDA", nTipoDet}	Array	Executado na confirmação da gravação da parcela de câmbio - botão Salvar (BT_OK). Permite implementar validações adicionais e/ou aborar, através da manipulação da variável lRet. Este ponto de entrada também pode retornar dados lógicos, sendo atribuído ao lRet da função de validação. Como array, possui duas posições: A primeira posição, PE_VALIDA, serve para indicar que a execução do ponto de entrada ocorre ao confirmar a gravação das alterações realizadas na parcela de câmbio; A segunda posição, nTipoDet, indicará a operação realizada, podendo assumir os valores: 3: Visulização da parcela de câmbio 4: Inclusão da parcela de câmbio 5: Alteração da parcela de câmbio 6: Exclusão da parcela de câmbio 99: Liquidação da parcela de câmbio 98: Estorno da liquidação da parcela de câmbio 97: Baixa gerencial da parcela de câmbio
{"ANTES_GRV_TMP", nTipo}	Array	Executado na confirmação da manutenção da parcela de câmbio, logo após as validações, para gravação dos dados da memória (da parcela) para a tabela temporária: A primeira posição, ANTES_GRV_TMP, serve para indicar que a execução do ponto de entrada ocorre antes da execução da gravação da memória para a tabela temporária; A segunda posição, nTipo, indicará a operação realizada, podendo assumir os valores: 3: Visulização da parcela de câmbio 4: Inclusão da parcela de câmbio 5: Alteração da parcela de câmbio 6: Exclusão da parcela de câmbio 99: Liquidação da parcela de câmbio 98: Estorno da liquidação da parcela de câmbio 97: Baixa gerencial da parcela de câmbio
GRV_ITEM_CAMBIO	Caracter	Executado na confirmação final do câmbio, parcela a parcela, na gravação dos dados da tabela temporária (TMP) para a tabela de câmbio (EEQ).
INC_CAMBIO	Caracter	Executado após a gravação de todas as parcelas de câmbio (looping), da tabela temporária (TMP) para a tabela de câmbio (EEQ).

Retorno

()

Eventos de chamada do Ponto de Entrada

Variáveis

Nome	Tipo	Escopo	Pode Alterar	Descrição
lGrvCamCon	Logica	Private	Sim	Variável que permite pular a validação que não gera/regerar o titulo no financeiro
aParc	Array	Private	Sim	Array que contém as parcelas de câmbio
lDLoopEEQ	Logica	Private	Sim	Se estiver atribuído como .T., a parcela de câmbio da iteração atual não será excluída. Caso estiver como .F., a parcela de câmbio será excluída. Essa variável é referente ao ponto de entrada AF200DPARC_PARCELA_CAMBIO. Valor padrão = .F.
aParcAux	Array	Private	Sim	Guarda os percentuais de comissão em conta gráfica nas parcelas de saldo a receber quando há adiantamento com Mov. Exterior
lInicializa	Lógica	Private	Sim	Determina se reinicializa as variáveis de controle dos eventos para os quais devem ser geradas parcelas de câmbio
cEventosNaoGerados	Caracter	Private	Sim	Eventos para os quais devem ser geradas as parcelas de câmbio
cDespIntFin	Caracter	Private	Sim	Eventos para os quais serão gerados os títulos no módulo SIGAFIN/ contas a pagar. Disponível na execução dos parâmetros AF200GPARC_DEF_PARC e AF200DPARC_PARCELA_CAMBIO.
lSair	Lógica	Private	Sim	Disponível no ponto de entrada com o parâmetro AF200VALID_VALCAMPO, permite a intervenção nas validações dos campos da parcela de câmbio, forçando a saída das validações (True) sem as execuções padrões.
nTipoDet	Numérico	Private	Não	Variável que permite identificar a operação que está sendo executada na manutenção da parcela de câmbio (Af200DetMan()). Pode assumir os valores: 3: Visulização da parcela de câmbio 4: Inclusão da parcela de câmbio 5: Alteração da parcela de câmbio 6: Exclusão da parcela de câmbio 99: Liquidação da parcela de câmbio 98: Estorno da liquidação da parcela de câmbio 97: Baixa gerencial da parcela de câmbio
lRet	Lógica	Private	Sim	Disponível no ponto de entrada com o parâmetro AF200VALIDos parâmetros AF200VALID_VALCAMPO e {"PE_VALIDA", nTipoDet} da validação da parcela de câmbio, permite definir se a validação está correta (True) ou incorreta (False).

Programa Fonte

EECAF200.PRW

Árvore de páginas

Versões comparadas

Versão antiga 11

Nova versão 12

Chave