Histórico da Página

#-----------------------------------------------------------------# 
 FUNCTION EAIAdapterSalesOrder1_SendBusinessMessage(l_MessageType)
#-----------------------------------------------------------------#
  DEFINE l_MessageType VARCHAR(6) #upsert / delete
  
  IF NOT EAIHelperSalesOrder1_esta_configurado_para_envio() THEN
     RETURN TRUE
  END IF
  
  CALL EAIHelperSalesOrder1_inicializa_record()
  
  ### Carrega os dados da mensagem.
  IF NOT EAIAdapterSalesOrder1_LoadUsualContent() THEN
     RETURN FALSE
  END IF
  
  IF l_MessageType IS NOT NULL THEN
     LET l_MessageType = DOWNSHIFT(l_MessageType)
  END IF
  
  CASE l_MessageType
     WHEN 'upsert'
        IF NOT EAIAdapterSalesOrder1_LoadUpsertContent() THEN
           RETURN FALSE
        END IF
     WHEN 'delete'
        IF NOT EAIAdapterSalesOrder1_LoadDeleteContent() THEN
           RETURN FALSE
        END IF
     OTHERWISE
        ### Caso não for nenhuma das opções, a mensagem será de 'SalesOrder'.
        INITIALIZE l_MessageType TO NULL
        IF NOT EAIAdapterSalesOrder1_LoadRequestContent() THEN
           RETURN FALSE
        END IF
  END CASE
  
  ### Cria mensagem de negócio.
  CALL EAIHelperSalesOrder1_cria_mensagem_negocio(l_MessageType)
  
  ### Adiciona as chaves primárias da mensagem.
  CALL EAIHelperSalesOrder1_adiciona_chave_primaria("CompanyId")
  CALL EAIHelperSalesOrder1_adiciona_chave_primaria("OrderId")
  
  ### Definir qual modelo de dados estará utilizando: sync - síncrono, async - assíncrono.
  CALL EAIHelperSalesOrder1_set_send_sync()
  # CALL EAIHelperSalesOrder1_set_send_async()
  
  ### Adiciona informações customizadas.
  CALL EAIAdapterSalesOrder1_LoadCustomContent()
  
  IF NOT EAIHelperSalesOrder1_envia_mensagem_eai_Adapter() THEN
     ### Tratar problemas com a integração nesse ponto.
  
     RETURN FALSE
  END IF
  
  RETURN TRUE
END FUNCTION