CONTEÚDO

Visão Geral
Exemplo de utilização
Parâmetros
Variáveis
Tabelas utilizadas

01. VISÃO GERAL

Este Ponto de Entrada pertence à rotina de Manutenção de Câmbio (EECAF200). Ele deve ser utilizado para customizar a rotina de Manutenção de Câmbio.

Programa Fonte: EECAF200.PRW

Retorno: Verdadeiro (.T.) ou Falso (.F.).

02. EXEMPLO DE UTILIZAÇÃO

03. TELA XXXXX

Outras Ações / Ações relacionadas

Ação	Descrição

04. TELA XXXXX

Principais Campos e Parâmetros

Campo	Descrição

05. TABELAS UTILIZADAS

Não há.

HTML

<!-- esconder o menu --> 


<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>

EECAF200 - Manutenção do Câmbio

Descrição

Observações

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

Exemplos

#DEFINE ENTER Chr(10) + Chr(13)

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

elseif cParam == "INICIALIZA_EVENTOS"

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

elseif cParam == "PE_ALT_PARC"

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

elseif cParam == "EVENTOS_NAO_GERADOS"

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

elseif 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

elseif cParam == "AF200VALID_VALCAMPO"

if nTipoDet == 6 //exclusão

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

endif

elseif 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

elseif cParam == "ANTES_GRV_TMP"

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

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

endif

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

elseif cParam == "INC_CAMBIO"

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

elseif 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

elseif cParam == "VALIDA_PARCELA"

cMsg := "Variáveis com dados da parcela a ser gerada " + ENTER
cMsg += "nValParPE = " + Alltrim(str(nValParPE)) + ENTER
cMsg += "cCondPagtoPE = " + cCondPagtoPE + ENTER
cMsg += "dDtBasePE = " + dtoc(dDtBasePE) + ENTER
cMsg += "cEventoPE = " + cEventoPE + ENTER
cMsg += "cFornecedorPE = " + cFornecedorPE + ENTER
cMsg += "cLojaPE = " + cLojaPE + ENTER
cMsg += "cEmpresaPE = " + cEmpresaPE + ENTER
cMsg += "cNrInvoPE = " + cNrInvoPE + ENTER
cMsg += "cNatPE = " + cNatPE + ENTER
MsgInfo(cMsg,"VALIDA_PARCELA")

endif

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	INICIALIZA_EVENTOS	Variável que permite pular a validação que não gera/regerar o titulo no financeiro
aParc	Array	Private	Sim	PE_ALT_PARC	Array que contém as parcelas de câmbio
lDLoopEEQ	Logica	Private	Sim	AF200DPARC_PARCELA_CAMBIO	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.
cDespIntFin	Caracter	Private	Não	AF200DPARC_PARCELA_CAMBIO	Variável com a lista dos eventos que serão integrados ao módulo SIGAFIN.
aParcAux	Array	Private	Sim	AF200GPARC_DEF_COMI	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	INICIALIZA_EVENTOS	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_NAO_GERADOS	Eventos para os quais devem ser geradas as parcelas de câmbio
cDespIntFin	Caracter	Private	Não	AF200GPARC_DEF_PARC AF200DPARC_PARCELA_CAMBIO	Eventos para os quais serão gerados os títulos no módulo SIGAFIN/ contas a pagar.
lSair	Lógica	Private	Sim	AF200VALID_VALCAMPO	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	Local	Sim	PE_VALIDA	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
nTipo	Caracter	Local	Sim	ANTES_GRV_TMP	Variável que 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
lRet	Lógica	Private	Sim	AF200VALID_VALCAMPO	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).
nValParPE	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 18

Nova versão 19

Chave

CONTEÚDO

01. VISÃO GERAL

02. EXEMPLO DE UTILIZAÇÃO

03. TELA XXXXX

04. TELA XXXXX

05. TABELAS UTILIZADAS

EECAF200 - Manutenção do Câmbio

Árvore de páginas

Histórico da Página

Versões comparadas

Versão antiga 18

Nova versão 19

Chave

CONTEÚDO

01. VISÃO GERAL

02. EXEMPLO DE UTILIZAÇÃO

03. TELA XXXXX

04. TELA XXXXX

05. TABELAS UTILIZADAS

EECAF200 - Manutenção do Câmbio