#--------------------------------------------------------------------------#
FUNCTION EAIHelperCancelRequest1EAIHelperInvoice3_recebe_negocio_eai_adapter(l_msg_negocio)
#--------------------------------------------------------------------------#
DEFINE l_msg_negocio VARCHAR(10),
l_conteudo VARCHAR(10)
CALL EAIHelperCancelRequest1EAIHelperInvoice3_inicializa_record() # Limpa record da msg
LET g_eai_msg_negocio = l_msg_negocio
CALL EAIHelperCancelRequest1EAIHelperInvoice3_carrega_elementos_xml()
### Carrega o tipo da mensagem.
LET _MessageType = _ADVPL_eai_get_event(g_eai_msg_negocio)
### Realiza a carga do RECORD com a mensagem de negócio que chegou
LET l_conteudo = _ADVPL_eai_get_business_content(g_eai_msg_negocio, _BusinessContent, 'EAIHelperCancelRequest1EAIHelperInvoice3')
### Verifica se o estado da mensagem recebida está ok.
IF NOT _ADVPL_eai_get_success(l_conteudo) THEN
CALL _ADVPL_eai_log_add_message(g_eai_msg_negocio, 'error', '0', _ADVPL_eai_get_error_message(l_conteudo))
RETURN NULL
END IF
### Mensagem de resposta baseada na mensagem de negócio
LET g_eai_msg_resposta = _ADVPL_eai_create_response(g_eai_msg_negocio)
### Tratamento da mensagem de retorno pelo 'Adapter'.
IF NOT EAIAdapterCancelRequest1EAIAdapterInvoice3_ReceiveBusinessMessage() THEN
### Retorna com a descrição dos erros.
RETURN g_eai_msg_resposta
END IF
IF NOT EAIAdapterInvoice3_CreateReturnMessage() THEN
#Retorna com a descrição dos erros.
RETURN g_eai_msg_resposta
END IF
### Inclui o conteúdo de retorno na mensagem criada.
LET l_conteudo = _ADVPL_eai_set_return_content(g_eai_msg_resposta, _ReturnContent, _XmlElements)
IF NOT _ADVPL_eai_get_success(l_conteudo) THEN
RETURN NULL
END IF
RETURN g_eai_msg_resposta
END FUNCTION |