Problemas al llamar a un servicio web externo desde Navision 2018

Cursos de Navision 100% online Foros Foro Dynamics NAV y Business Central Problemas al llamar a un servicio web externo desde Navision 2018

Este debate contiene 1 respuesta, tiene 2 mensajes y lo actualizó  Cristina Nicolàs hace 9 meses, 3 semanas.

Viendo 2 publicaciones - del 1 al 2 (de un total de 2)
  • Autor
    Publicaciones
  • #6067

    Navision2018
    Participante

    Buenos días a todos, necesito ayuda vuestra con el problema que tengo y que necesito sacar adelante.
    Desde Navision 2018 tengo que llamar a un Web Services externo y pasarle una variable de texto con varios campos separados por el sigo #,
    En estos momentos tengo el siguiente código realizado pero al entrar en el Web Services, la variable llega vacía.
    Os adjunto el código que llama al Web Services por si veis lo que tengo mal o por si se ha de implementar de otra forma.
    Espero noticias vuestras.
    Un saludo y gracias.
    Miguel
    [code]
    LOCAL CreateQuizWeb(pRecordQuizs : Record Quizs) ReturnValue : Boolean
    Window.OPEN(‘Creando encuesta…’);

    data := ‘<soap:Envelope xmlns:soap=”http://schemas.xmlsoap.org/soap/envelope/” xmlns:tem=”http://tempuri.org/”><soap:Header/><soap:Body><tem:CrearEncuesta>’;
    data += ‘<tem:pCourse>’ + pRecordQuizs.”Course No.” + ‘#’ + ‘</tem:pCourse>’;
    data += ‘<tem:pCall>’ + pRecordQuizs.”Call No.” + ‘#’ + ‘</tem:pCall>’;
    data += ‘<tem:pLine>’ + FORMAT(pRecordQuizs.”Line No.”) + ‘#’ + ‘</tem:pLine>’;
    data += ‘<tem:pQuizName>’ + pRecordQuizs.”Quiz name” + ‘#’ + ‘</tem:pQuizName>’;
    data += ‘<tem:pQuestion1>’ + pRecordQuizs.”Question 1″ + ‘#’ + ‘</tem:pQuestion1>’;
    data += ‘<tem:pQuestionType1>’ + FORMAT(pRecordQuizs.”Question type 1″) + ‘#’ + ‘</tem:pQuestionType1>’;
    data += ‘<tem:pQuestionPoint1>’ + FORMAT(pRecordQuizs.”Question Point 1″) + ‘#’ + ‘</tem:pQuestionPoint1>’;
    data += ‘<tem:pQuestion2>’ + pRecordQuizs.”Question 2″ + ‘#’ + ‘</tem:pQuestion2>’;
    data += ‘<tem:pQuestionType2>’ + FORMAT(pRecordQuizs.”Question type 2″) + ‘#’ + ‘</tem:pQuestionType2>’;
    data += ‘<tem:pQuestionPoint2>’ + FORMAT(pRecordQuizs.”Question Point 2″) + ‘#’ + ‘</tem:pQuestionPoint2>’;
    data += ‘<tem:pQuestion3>’ + pRecordQuizs.”Question 3″ + ‘#’ + ‘</tem:pQuestion3>’;
    data += ‘<tem:pQuestionType3>’ + FORMAT(pRecordQuizs.”Question type 3″) + ‘#’ + ‘</tem:pQuestionType3>’;
    data += ‘<tem:pQuestionPoint3>’ + FORMAT(pRecordQuizs.”Question Point 3″) + ‘#’ + ‘</tem:pQuestionPoint3>’;
    data += ‘<tem:pQuestion4>’ + pRecordQuizs.”Question 4″ + ‘#’ + ‘</tem:pQuestion4>’;
    data += ‘<tem:pQuestionType4>’ + FORMAT(pRecordQuizs.”Question type 4″) + ‘#’ + ‘</tem:pQuestionType4>’;
    data += ‘<tem:pQuestionPoint4>’ + FORMAT(pRecordQuizs.”Question Point 4″) + ‘#’ + ‘</tem:pQuestionPoint4>’;
    data += ‘<tem:pQuestion5>’ + pRecordQuizs.”Question 5″ + ‘#’ + ‘</tem:pQuestion5>’;
    data += ‘<tem:pQuestionType5>’ + FORMAT(pRecordQuizs.”Question type 5″) + ‘#’ + ‘</tem:pQuestionType5>’;
    data += ‘<tem:pQuestionPoint5>’ + FORMAT(pRecordQuizs.”Question Point 5″) + ‘#’ + ‘</tem:pQuestionPoint5>’;
    data += ‘<tem:pQuestion6>’ + pRecordQuizs.”Question 6″ + ‘#’ + ‘</tem:pQuestion6>’;
    data += ‘<tem:pQuestionType6>’ + FORMAT(pRecordQuizs.”Question type 6″) + ‘#’ + ‘</tem:pQuestionType6>’;
    data += ‘<tem:pQuestionPoint6>’ + FORMAT(pRecordQuizs.”Question Point 6″) + ‘#’ + ‘</tem:pQuestionPoint6>’;
    data += ‘<tem:pQuestion7>’ + pRecordQuizs.”Question 7″ + ‘#’ + ‘</tem:pQuestion7>’;
    data += ‘<tem:pQuestionType7>’ + FORMAT(pRecordQuizs.”Question type 7″) + ‘#’ + ‘</tem:pQuestionType7>’;
    data += ‘<tem:pQuestionPoint7>’ + FORMAT(pRecordQuizs.”Question Point 7″) + ‘#’ + ‘</tem:pQuestionPoint7>’;
    data += ‘<tem:pQuestion8>’ + pRecordQuizs.”Question 8″ + ‘#’ + ‘</tem:pQuestion8>’;
    data += ‘<tem:pQuestionType8>’ + FORMAT(pRecordQuizs.”Question type 8″) + ‘#’ + ‘</tem:pQuestionType8>’;
    data += ‘<tem:pQuestionPoint8>’ + FORMAT(pRecordQuizs.”Question Point 8″) + ‘#’ + ‘</tem:pQuestionPoint8>’;
    data += ‘<tem:pQuestion9>’ + pRecordQuizs.”Question 9″ + ‘#’ + ‘</tem:pQuestion9>’;
    data += ‘<tem:pQuestionType9>’ + FORMAT(pRecordQuizs.”Question type 9″) + ‘#’ + ‘</tem:pQuestionType9>’;
    data += ‘<tem:pQuestionPoint9>’ + FORMAT(pRecordQuizs.”Question Point 9″) + ‘#’ + ‘</tem:pQuestionPoint9>’;
    data += ‘<tem:pQuestion10>’ + pRecordQuizs.”Question 10″ + ‘#’ + ‘</tem:pQuestion10>’;
    data += ‘<tem:pQuestionType10>’ + FORMAT(pRecordQuizs.”Question type 10″) + ‘#’ + ‘</tem:pQuestionType10>’;
    data += ‘<tem:pQuestionPoint10>’ + FORMAT(pRecordQuizs.”Question Point 10″) + ‘</tem:pQuestionPoint10>’;
    data += ‘</tem:CrearEncuesta></soap:Body></soap:Envelope>’;
    stringContent := stringContent.StringContent(data,encoding.UTF8,’text/xml’);
    ReturnValue := TRUE;
    ReturnValue := CallRESTWebService(‘http://w2012serverr2.cloudapp.net:150/wskschoolquiz.asmx’,’wskschoolquiz.asmx?op=CrearEncuesta’,’POST’,stringContent,HttpResponseMessage);
    IF NOT ReturnValue THEN ERROR(‘No se ha podido crear la encuesta’);
    Window.CLOSE;

    LOCAL [TryFunction] CallRESTWebService(BaseUrl : Text;Method : Text;RestMethod : Text;VAR HttpContent : DotNet “System.Net.Http.HttpContent”;VAR HttpResponseMessage : DotNet “System.Net.Http.HttpResponseMessage”)
    HttpClient := HttpClient.HttpClient();
    HttpClient.BaseAddress := Uri.Uri(BaseUrl);

    CASE RestMethod OF
    ‘GET’: HttpResponseMessage := HttpClient.GetAsync(Method).Result;
    ‘POST’: HttpResponseMessage := HttpClient.PostAsync(Method,HttpContent).Result;
    ‘PUT’: HttpResponseMessage := HttpClient.PutAsync(Method,HttpContent).Result;
    ‘DELETE’: HttpResponseMessage := HttpClient.DeleteAsync(Method).Result;
    END;

    HttpResponseMessage.EnsureSuccessStatusCode(); // Throws an error when no success

    [/code]

    #6080

    Cristina Nicolàs
    Jefe de claves

    Hola,

    Espero que alguien pueda contestar a esta pregunta.
    Yo he utilizado los WebServices de NAV pero siempre siendo NAV quien los publica y una aplicación externa la que los llama. Nunca he llamado a WebServices externos desde NAV.

    Un saludo,
    Cristina Nicolàs

    Curso presencial. Conviértete en un Experto en Business Central.

    Curso organizado como un máster.
    Las inscripciones anticipadas terminan el 28 de febrero.
    Inicio del curso: 26 de Abril
    Más información

Viendo 2 publicaciones - del 1 al 2 (de un total de 2)

Debes estar registrado para responder a este debate.

Members Currently Active: 0
No users are currently active
Keymaster | Moderator | Participant | Spectator | Blocked
Additional Forum Statistics
Threads: 722, Posts: 2.395, Members: 809
Welcome to our newest member, Carlos Lopez
Most users ever online was 15 on 5 April, 2019 9:31 am