Histórico da Página

...

cAlias - Tabela da capa de Câmbio. Deve vir com conteudo fixo "EEQ".
nReg - Recno da tabela: não obrigatório
nOpc - Número da operação: não obrigatório
aEEQAuto (REGISTROS) - Variavel do tipo Array com os dados de cambio
nOpcAuto (OPERAÇÃO) - Variavel do tipo Numerico responsavel por definir qual operação executar (Inclusão, Alteração, Exclusão).
cTipo - Variável do tipo Caractere que identifica o tipo de integração. Deve vir com conteúdo fixo "A" quando Aquisição, ou "V" quando Venda.

Importante ressaltar que os câmbios sempre são vinculados a uma ou mais Invoices. Desta maneira, não é possível criar parcelas de câmbio sem antes possuir uma invoice para vincula-las.

Os campos para geração de Câmbio são listados abaixo:

10 utilizado para ExportadorELALOJEXPCaracter utilizado para ELACaracter10 utilizado para ELALOJIMPCaracter utilizado para ELA_TX_MOE8Cotação na data emissão da

Título	Campo	Tipo	Tam.	Dec.	Obrigatório	Observação
Filial	ELAEEQ_FILIAL	Caracter	2	0	Sim	Filial do Sistema (xFilial)	Exportador	ELA_EXPORT	Caracter
Tipo	EEQ_TPPROC	Caracter	1	0	Sim	Tipo de Processo. Fixar "A" para Aquisição ou "V" para Venda.
Processo	EEQ_PREEMB	Caracter	20	0	Sim	Concatenação dos campos ELA_TPPROC e ELA_PROCES. (Exemplo: V0001)
Evento	EEQ_EVENT	Caracter	3	0	Sim	Informar código do cadastro de eventos para tipo “SISCSV”. Padrão "001" para parcela de invoice de Aquisição e "501" para parcela de invoice de Venda.
Fornecedor	EEQ_FORN	Caracter	6	0	Sim	Código válido do cadastro de fornecedores (SA2). Este campo deve ser	utilizado apenas	para Invoices e Pedidos de Aquisição.
Loja	Fornecedor	EEQ_	FOLOJA	Caracter	2	0	Sim	Código válido do cadastro de fornecedores (SA2). Este campo deve ser	utilizado apenas	para Invoices e Pedidos de Aquisição.
Importador	EEQ_IMPORT	Caracter	6	0	Sim	Código válido do cadastro de clientes (SA1). Este campo deve ser	utilizado apenas	para Invoices e Pedidos de Venda.
Loja Importador	EEQ_	IMLOJA	Caracter	2	0	Sim	Código válido do cadastro de clientes (SA1). Este campo deve ser	utilizado apenas	para Invoices e Pedidos de Venda.
Processo	EEQ_PROCES	Caracter	15	0	Sim	Processo de Venda de Serviço
Invoice	EEQ	Nro. Invoice	ELA_NRINVO	Caracter	20	0	Sim	Numero Informar o numero da Invoice invoice (fatura) emitida pelo exportador (fornecedor).a receber.
Nro. Parcela	EEQ_PARC	Caracter	2	0	Sim	Número da Parcela para condições parceladas. Limite de 99 parcelas.
Sistema de Origem	EEQ_SOURCE	Origem	ELA_ORIGEM	Caracter	10	0	Sim	Módulo de Origem (SIGACOM/SIGAFAT/EXECAUTO/etc.)
Data EmissãoVencto.	ELAEEQ_DTEMISVCT	Data	8	0	Sim	Data de emissão Vencimento da invoiceparcela.
Moeda	EEQ_MOEDA	Caracter	Cond. Pag.	ELA_CONDPG	Caracter	3	0	Não	Condição de Pagamento. Necessário apenas para uso do controle de câmbio.
Moeda	ELA_MOEDA	Caracter	3	0	Sim	Moeda da invoice
	Sim	Deve ser a mesma moeda da invoice.
Vl.da Parc.	EEQ_VL	Numerico	15	2	Sim	Informar valor da parcela na moeda da invoice.
Vl. Siscoserv	EEQ_VLSISC	Taxa Emissão		Numerico	15	2	Sim	Informar valor da parcela na moeda	da	invoice.
ObservaçõesModalidade de pagamento	ELAEEQ_COMPLMODAL	MemoCaracter	60 1	0	Não	Texto livre para informações complementares e referencias para consulta desta invoice.
Processo	ELA_PROCES	Caracter	15	0	Sim	Processo de serviço da fatura.
Nota Fiscal	ELA_DOC	Caracter	9	0	Não	Numero da Nota Fiscal, caso tenha sido emitida.
Serie	ELA_SERIE	Caracter	3	0	Não	Série da Nota Fiscal, caso tenha sido emitida.
Informar “1” para baixa por contrato de câmbio ou “2” para baixa por recebimento no exterior.
Data do Crédito no Exterior	EEQ_DTCE	Data	8	0	Não	Data do crédito no exterior. Obrigatória para a baixa da parcela.
Banco no exterior	EEQ_BCOEXT	Caracter	3	0	Não	Banco para baixa por recebimento no exterior.
Agencia no exterior	EEQ_AGCEXT	Caracter	5	0	Não	Agência para baixa por recebimento no exterior.
Conta no exterior	EEQ_CNTEXT	Caracter	10	0	Não	Conta para baixa por recebimento no exterior.
Banco	EEQ_BANC	Caracter	3	0	Não	Banco da contratação do câmbio. Obrigatório para baixa por contratação de câmbio.
Agencia	EEQ_AGEN	Caracter	5	0	Não	Agência da contratação de câmbio. Obrigatório para baixa por contratação de câmbio.
Conta	EEQ_NCON	Caracter	Modelo NF	ELA_MODELO	Caracter	10	0	NãoModelo da Nota Fiscal, caso tenha sido emitida	Conta da contratação de câmbio. Obrigatório para baixa por contratação de câmbio.
Solicitação de câmbio	EEQ_SOL	Data	8	0	Não	Obrigatório para baixa por contratação de câmbio.
Contrato de câmbio	EEQ_NROP	Caracter	20	0	Não	Obrigatório para baixa por contratação de câmbio.
Data Liquidação Contrato câmbio	EEQ_PGT	Data	8	0	Não	Obrigatório para baixa por contratação de câmbio.
Taxa contratação do câmbio	EEQ_TX	Numerico	15	6	Não	Obrigatório para baixa por contratação de câmbio.
Valor em R$	EEQ_EQVL	Numerico	16	2	Não	Obrigatório para baixa por contratação de câmbio.

A operação de execução é definida conforme abaixo:

...

Exemplo de Inclusão de Invoice via ExecAuto

Exemplo de Resultado da operação

Exemplo de Resultado com erros.

Image Removed

Exemplo de Resultado com sucesso.

Image Removed

aracter

...

*------------------------------------------*
User Function ExecCambAuto()
*------------------------------------------*
Local aEEQAuto := {}
Local nOpcAuto := 3
Private lMsErroAuto := .F.

/******* Montagem dos Arrays *******/
// REGISTROS (aEEQAuto)
aAdd(aEEQAuto, {"EEQ_FILIAL" , xFilial("EEQ") , NIL})
aAdd(aEEQAuto, {"EEQ_TPPROC" , "V" , NIL})
aAdd(aEEQAuto, {"EEQ_PREEMB" , "V0100" , NIL})
aAdd(aEEQAuto, {"EEQ_EVENT" , "501" , NIL})
aAdd(aEEQAuto, {"EEQ_IMPORT" , "01" , NIL})
aAdd(aEEQAuto, {"EEQ_IMLOJA" , "01" , NIL})
aAdd(aEEQAuto, {"EEQ_PROCES" , "0100" , NIL})
aAdd(aEEQAuto, {"EEQ_NRINVO" , "INV540" , NIL})
aAdd(aEEQAuto, {"EEQ_PARC" , "01" , NIL})
aAdd(aEEQAuto, {"EEQ_SOURCE" , "EXECAUTO" , NIL})
aAdd(aEEQAuto, {"EEQ_VCT" , CTOD("31/12/2016") , NIL})
aAdd(aEEQAuto, {"EEQ_VL" , 50.00 , NIL})
aAdd(aEEQAuto, {"EEQ_VLSISC" , 50.00 , NIL})
aAdd(aEEQAuto, {"EEQ_MODAL" , "1" , NIL})

/******* Execução do ExecAuto *******/
MSExecAuto({|a,b,c,d,e,f| EECAF500(a,b,c,d,e,f)}, "EEQ", NIL, NIL, aEEQAuto,

...

nOpcAuto, "V")

/******* Tratamento de Erro *******/
If lMsErroAuto
MostraErro()
Else
MsgInfo("Registro manipulado com sucesso.")
EndIf

Return NIL

Exemplo de Resultado da operação

Exemplo de Resultado com erros.

Image Added

Exemplo de Resultado com sucesso.

Image Added

Árvore de páginas

Versões comparadas

Versão antiga 1

Nova versão Atual

Chave