Descrição: | Possibilita realizar a manutenção das Cotações de Moedas, tais como Inclusão, Alteração e Exclusão através do mecanismo de rotina automática. | ||||||||||||||||||||
Produto: | Microsiga Protheus | ||||||||||||||||||||
Segmento: | Comércio Exterior | ||||||||||||||||||||
Módulo: | SIGAEEC - Easy Export Control | ||||||||||||||||||||
Rotina: |
| ||||||||||||||||||||
País(es): | Todos | ||||||||||||||||||||
Banco(s) de Dados: | Todos Homologados pela TOTVS | ||||||||||||||||||||
Tabelas Utilizadas: | SYE - Cotação de Moedas | ||||||||||||||||||||
Parâmetros: | Função EECAT140:
|
Integração automática de registro de Cotação de Moedas
Para realizar a inclusão automática de um registro de Cotação de Moedas é necessário a utilização da função MsExecAuto utilizando o programa EECAT140 responsável pela manutenção das informações
Para a utilização da rotina automática deve-se utilizar arrays multi dimensionais no envio dos dados para o processamento que segue o mesmo critério dos dados que são colocados via tela. Esses arrays são definidos da seguinte forma:
Modelo do array:
- nome do campo;
- dados a serem inseridos;
- validação caso queira substituir a validação do dicionário de dados (SX3);
Exemplo:
- aAdd(aCab, {"YE_MOEDA", "US$" , Nil})
Para um melhor entendimento segue abaixo exemplo de código de implementação da rotina:
Código de exemplo para integração automática de registro de Cotação de Moedas |
---|
User Function IntegTaxas() Local aCab := {} Local nOpc := 3//Operação a ser executada (3=Inclusão;4=Alteração;5=Exclusão) Private lMsErroAuto := .F. aAdd(aCab, {"YE_DATA" , dDatabase, Nil})//Data da cotação aAdd(aCab, {"YE_MOEDA" , "US$" , Nil})//Moeda aAdd(aCab, {"YE_VLCON_C", 5 , Nil})//Taxa de Venda aAdd(aCab, {"YE_VLFISCA", 5 , Nil})//Taxa Fiscal aAdd(aCab, {"YE_TX_COMP", 5 , Nil})//Taxa de Compra MsAguarde({|| MSExecAuto( {|aAux, nOpc| EECAT140(aCab, Nil, nOpc) }, aCab, nOpc) }, "Integrando Cotação de Moeda") If lMsErroAuto MostraErro() Else MsgInfo("Integrado com sucesso", "Aviso") EndIf Return Nil |