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

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")

Case cParam == "PE_GERPARC"

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

//customização após a gravação das parcelas de câmbio (EEQ)

//EEQ->(DBSeek(xFilial() + M->EEC_PREEMB))

//Looping na tabela EEQ para customização das parcelas de câmbio geradas para o processo de embarque

EndCase

Return 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
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).
PE_GERPARC	Caracter	Indica o final da gravação de todas as parcelas de câmbio para o processo de embarque, após o preenchimento da data do embarque e gravação do processo. Este ponto permite a implementação de um looping na tabela das parcelas de câmbio (EEQ) para customização e gravação adicional de informações, dentre outras necessidades. Os dados da tabela podem ser posicionados usando as variáveis de memória da capa do processo de embarque (EEC).
VALIDA_PARCELA	Caracter	Valida as parcelas que serão geradas para o câmbio como comissão de agentes e despesas internacionais

Retorno

Nil

Variáveis

Nome	Tipo	Escopo	Pode Alterar	Parâmetro	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 os 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).
nValorPE	Númerico	Private	Não	VALIDA_PARCELA	Valor da parcela a ser gerada
cCondPagtoPE	Caracter	Private	Não	VALIDA_PARCELA	Condição de pagamento aplicado no processo
dDtBasePE	Data	Private	Não	VALIDA_PARCELA	Data de criação da parcela
cEventoPE	Caracter	Private	Não	VALIDA_PARCELA	Evento do qual será criado a parcela
cFornecedorPE	Caracter	Private	Não	VALIDA_PARCELA	Fornecedor referente a parcela
cLojaPE	Caracter	Private	Não	VALIDA_PARCELA	Loja referente a parcela
cEmpresaPE	Caracter	Private	Não	VALIDA_PARCELA	Empresa no qual será criada a parcela
cNrInvoPE	Caracter	Private	Não	VALIDA_PARCELA	Número da Invoice do processo
cNatPE	Caracter	Private	Não	VALIDA_PARCELA	Natureza da parcela
lRetPE	Lógica	Private	Sim	VALIDA_PARCELA	Variável que valida a geração da parcela e caso verdadeiro aborta o processo de gerar a parcela
nValorPE	Númerico	Private	Sim	VALIDA_PARCELA	Variável que permite alterar o valor da parcela a ser gerada, não podendo o valor ser igual a zero

Programa Fonte

EECAF200.PRW

Árvore de páginas

Versões comparadas

Versão antiga 14

Nova versão 15

Chave