Árvore de páginas

Versões comparadas

Chave

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

...

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

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


NomeTipoDescriçãoDefaultObrigatórioReferê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_VALCAMPOCaracterExecutado 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_CAMBIOCaracterExecutado 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_CAMBIOCaracterExecutado 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

NomeTipoEscopoPode AlterarDescrição
 lGrvCamConLogicaPrivate Sim

Variável que permite pular a validação que não gera/regerar o titulo no financeiro

aParcArrayPrivateSim

Array que contém as parcelas de câmbio

lDLoopEEQ

LogicaPrivateSim

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.

aParcAuxArrayPrivateSim

Guarda os percentuais de comissão em conta gráfica nas parcelas de saldo a receber quando há adiantamento com Mov. Exterior


lInicializa

LógicaPrivateSim

Determina se reinicializa as variáveis de controle dos eventos para os quais devem ser geradas parcelas de câmbio

cEventosNaoGeradosCaracterPrivateSim

Eventos para os quais devem ser geradas as parcelas de câmbio

cDespIntFinCaracterPrivateSimEventos 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.
lSairLógicaPrivateSim

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.

nTipoDetNuméricoPrivateNã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

lRetLógicaPrivateSimDisponí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