FAQ: Como criar transações específicas do Multiplanta?
| Produto: | Datasul |
| Ambiente: | Unspecified |
| Versão: | 1 |
Sintoma Como criar transações específicas do Multiplanta?
Causa Como criar transações específicas do Multiplanta?
Solução 1) Criar uma transação no cadastro de transações, MP0114.P;
2) Criar um programa que crie o registro para a tabela LOG-ENV e MP-MENSAGEM como abaixo:
/* PROGRAMA DE GERAÇÃO MGXX10 */
/* TEBELA CAPA DE LOTE */
create log-env.
assign log-env.cd-msg = NÚMERO SEQUENCIAL
log-env.cd-trans = NOME DA TANSAÇÃO CADASTRADA
log-env.cd-programa = NOME PRINCIPAL DO PROGRAMA ex:(XX10)
log-env.dt-geracao = today
log-env.hr-geracao = string(time,"HH:MM:SS")
log-env.usuario = userid("mgadm"). /* USUÁRIO */
/* TABELA QUE ARMAZENA DADOS */
create mp-mensagem.
assign mp-mensagem.tp-msg = yes /* envio */
mp-mensagem.cd-maq-origem = 0
mp-mensagem.cd-trans = log-env.cd-trans
mp-mensagem.cd-msg = log-env.cd-msg
mp-mensagem.num-seq = NÚMERO SEQUENCIAL
mp-mensagem.tp-movto = TIPO DE MOVIMENTO
mp-mensagem.char-1 = DESCRIÇÃO DA TRANSÇÃO.
assign mp-mensagem.lin-msg[1] = DADOS A SEREM TRANSFERIDOS.
/* FIM */
3) Na base que receberá as informações, deverá existir o seguinte programa:
- Este programa deverá estar no diretório MAP.
- Com base no exemplo supracitado o nome do programa deverá ser MAXX10.P.
- No programa MAXX10.P deverá ter a seguinte estrutura:
/* PROGRAMA DE ATUALIZAÇÃO MAXX10.P */
def shared buffer b-log-rec for log-rec.
for each mp-mensagem
where mp-mensagem.tp-msg = no /* recepção */
and mp-mensagem.cd-maq-origem = b-log-rec.cd-maq-origem
and mp-mensagem.cd-msg = b-log-rec.cd-msg
and mp-mensagem.cd-trans = b-log-rec.cd-trans:
ATUALIZAÇÃO DOS DADOS.
If "erros"
then
Assign
Mp-mensagem.mensagem[1] = "mensagem de erro"
MP-mensagem.sit-msg = 3
b-log-rec.erro-msg = 3.
end.
assign b-log-rec.situacao = yes
b-log-rec.dt-atualiza = today
b-log-rec.hr-atualiza = string(time,"HH:MM:SS").
/* FIM */
Segue também a lista de programas tratados por transação atualmente no Magnus I :
- MCB - cb1201
cb1202
cb1209
cb1203
cb1210
- MCD - cd0407
cd0906
cd0920
cd1121
cd1406
cd1502
cd1504
cd9111
- MCQ - cq0113
- MCR - cr0503
- MFT - ft0603
- MPM - pm0506
- MRE - re0106
re0404
re0304
- MIN - todos os programas do investimento tratados pelo MP.
Qualquer outra dúvida entrar em contato com o nosso suporte tecnologia via o telefone (047) 2101-7400.
OBS: PARA QUE UMA TRANSAÇÃO SEJA ENVIADA E ATUALIZADA É NECESSÁRIO:
*** ENVIO
- CADASTRAR UM CÓDIGO DE TRANSFERÊNCIA COM UMA SEQÜÊNCIA INDICANDO ENVIO DE TRANSAÇÃO, ISTO VIA MP0112;
- CADASTRAR UM DESTINO DE PROGRAMA PARA O PROGRAMA DA TRANSAÇÃO, (PROGRAMA DA TRANSAÇÃO É O NOME INFORMADO NO CAMPO CD-PROGRAMA DA TABELA LOG-ENV), VIA MP0103.
*** ATUALIZAÇÃO
- PARA ATUALIZAR O LOG DE RECEBIMENTO DE TRANSAÇÃO É NECESSÁRIO UTILIZAR O MP0303.
