@Joseg, revisando
detenidamente el ejemplo de
RUI , no me había dado cuenta
que inserta a la variable Traffic-Conditions , cuando el usuario ingresa el
valor del NIF con las siguientes lineas
Código COBOL:
MOVE ZERO TO COUNTER.
INSPECT XTRNIF TALLYING COUNTER FOR ALL SPACES.
SUBTRACT COUNTER FROM 50 GIVING COUNTER. ADD 1 TO COUNTER.
MOVE "</tns1:vatNumber>" TO XTRNIF(COUNTER:).
el problema que le veo al ejemplo es la peticion en las cabeceras
cambiando estas lineas :
Código COBOL:
INVOKE WEBSERVICE "setRequestHeader" USING OP6 OP4 .
INVOKE WEBSERVICE "setRequestHeader" USING OP6 OP5 .
INVOKE WEBSERVICE "setRequestHeader" USING OP6 OP4.
Por esta sola :
Código COBOL:
INVOKE WEBSERVICE "setRequestHeader" USING OP4 OP5 .
Funciona perfectamente
Saludos .....