Linha Microsiga Protheus

Árvore de páginas

MATI681INT - Permite processar o XML no PE para validação/gravação customizada, podendo optar  por executar a rotina padrão de apontamento de produção ou não. Se houver execução da rotina padrão e houver erro, será desfeito somente o que foi realizado na rotina padrão.


Características do Requisito

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

Parâmetro(s):

oXml - Tipo objeto

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Versões/Release:

12.1.23, 12.1.25

Ponto de Entrada

Descrição:

Permite processar o XML recebido antes de executar a rotina padrão da mensagem de apontamento de produção, para validação/gravação customizada.

O PE deve retornar :

    • Executa a rotina padrão da mensagem de apontamento de produção do Protheus ou não;
    • XML recebido foi importado com sucesso ou não;
    • A descrição da mensagem em branco quando a importação foi com sucesso e em caso negativo, a descrição da mensagem explicando o erro ocorrido.

Este PE é chamado antes de iniciar a transação do processamento da rotina padrão da mensagem de apontamento de produção. Se houver erro na execução da rotina padrão da mensagem de apontamento de produção, não será desfeito o que foi efetivado no PE, porque está fora da transação.

Localização:

Function MATI681 -> Adapter de apontamento da produção modelo 2.

Programa Fonte:

MATI681

Retorno:

Nome

Tipo

Descrição

Obrigatório

aRet

Array

aRet[1] - Se irá utilizar a rotina padrão ou não (lógico) (T - Rotina Padrão , F - Não irá utilizar rotina padrão)

Sim



aRet[2] - Se o XML foi importado com sucesso (lógico) (T - Importado com sucesso, F - Erro na importação)Sim


aRet[3] - Se houve erro, precisa gravar a mensagem de erro que será apresentada ao usuário (STRING). Se a importação foi feita com sucesso, essa variável deve estar em branco.Sim

 

Exemplo 1  :

#Include 'Protheus.ch'

Exemplo 1:
user function MATI681INT(oXmlEnv)
local aRet := {}

Private oXML := oXMLEnv //

aAdd(aRet, .F.) // Não Irá executar a rotina padrão
aAdd(aRet, .T.) // XML importado com sucesso
aAdd(aRet, " ") // Como não houve erro, o terceiro parâmetro deve estar em branco.

return aRet


Exemplo 2:

user function MATI681INT(oXmlEnv)
local aRet := {}

Private oXML := oXMLEnv

aAdd(aRet, .F.) // Não Irá executar a rotina padrão
aAdd(aRet, .F.) // XML não foi importado com sucesso
aAdd(aRet, " Deve ser preenchido a mensagem quando o XML não é importado com sucesso. ") // Houve erro, então o terceiro parâmetro deve ser preenchido.

return aRet