View Replies (1)
HTTPClient parsing response not working, moving away from SOAP
  1. New
  2. How-to
  3.  HTTPClient
  4.  OLE
  5.  XML
0 Votes
  1. Karen Gray
  2. PowerBuilder
  3. Wednesday, 16 July 2025 11:29 PM UTC

Hi there,

We are moving to use HTTPClient away from SOAP. as our version of PB is going out of support

I have an XML response which I am trying to interrogate so as to store the values into a result structure - named tns__DocResult

The structure has 3 columns:

global type tns__DocResult from structure
   long Status
   string StatusText
   string Action
end type

 

I am loading the XML response (see below) into an oleobject - named lole

I am creating a list of nodes based on a documentElement in the lole

I should have 2 nodes - (DocResult) and when I test the length it returns 2 nodes.

The issue I am having is that when I loop through the nodes - it only ever loops over the same node twice. e.g PRINT

The statement - node = nodesList.nextNode() - does not seem to be working/moving onto the next node (EMAIL)

The tns__DocResult structure only ever contains one result - when it should contain 2

How do I fix this please? I am not familiar with the node syntax

Here is my function code:

 

public function tns__docresult of_parsexml_response ();
 
long ll_count, ll_index,ll_status,ll_ret
string ls_err, ls_Status
string ls_namespace, ls_status_text, ls_action
oleobject lole, node, nodesList
 
tns__docResult doc_result_list[]
 
// Define the XML string
string ls_xml
 
ls_xml = '<?xml version="1.0" encoding="utf-8"?>' + &
         '<soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">' + &
         '<soap:Body>' + &
         '<DespatchDocumentResponse xmlns="http://lol.linz.govt.nz/">' + &
         '<DespatchDocumentResult>' + &
         '<DocResult>' + &
         '<Status>1</Status>' + &
         '<StatusText>No printer name given.</StatusText>' + &
         '<Action>PRINT</Action>' + &
         '</DocResult>' + &
         '<DocResult>' + &
         '<Status>1</Status>' + &
         '<StatusText>Email sent OK</StatusText>' + &
         '<Action>EMAIL</Action>' + &
         '</DocResult>' + &
         '</DespatchDocumentResult>' + &
         '</DespatchDocumentResponse>' + &
         '</soap:Body>' + &
         '</soap:Envelope>'
 
 
 gnv_app.of_createnvo( 'oleobject', lole )
lole.ConnectToNewObject("Msxml2.DOMDocument.6.0" )
lole.SetProperty("NewParser", TRUE)
lole.setProperty("SelectionNamespaces", "xmlns:lol='http://lol.linz.govt.nz/'")
 
if not lole.loadxml( ls_xml ) then throw gnv_app.of_createruntimeerror( FAILURE, 'Could not parse loadxml()')
if lole.parseError.errorCode <> 0 then throw gnv_app.of_createruntimeerror( lole.parseError.errorCode, lole.parseError.reason)
 
node = lole.documentElement
 
nodesList = node.selectNodes("//lol:DocResult") 
 
// Loop through each DocResult element and extract data
ll_count = nodesList.length  //returns 2
ll_index = 1
 
//Initialize the node to the first element
     node = nodesList.nextNode()
 
// Loop through the nodes
do while not isNull(node))
    ls_Status= node.selectSingleNode("//lol:Status").text
   doc_result_list[ll_index].status =integer(ls_Status)
        ls_status_text = node.selectSingleNode("//lol:StatusText").text
   doc_result_list[ll_index].statustext = ls_status_text
        ls_action = node.selectSingleNode("//lol:Action").text
   doc_result_list[ll_index].action = ls_action
 
    // Output the DocResult structure
    messagebox("DocResult " + string(ll_index), "Status: " + string(doc_result_list[ll_index].status) + "~r~nStatusText: " +
 
   doc_result_list[ll_index].statustext + "~r~nAction: " + doc_result_list[ll_index].action)
    ll_index ++
  // Move to the next node
   node = nodesList.nextNode()
loop
 
return doc_result_list[]  --- only ever returns one instead of two
end function
 
 
Getting the name of the datawindow control placed on a usero...
Who is viewing this page
Sally Li @Appeon
Arnd Schmidt
Responses (1)
  1. Likes
  2. Latest
  3. Oldest

Find Questions by Tag

.EXE .NET 6.0 .NET Assembly .NET Core 3.1 .NET Core Framework .NET DataStore .NET Std Framework 32-bit 64-bit ADO.NET AEM AI Algorithm Amazon AWS Android Apache API APK App Store App Store (Apple) Appeon Workspace Appeon Xcelerator Plug-in Architecture Array ASE Asynchronous Methods Authentication AutoBuild AutoCompiler Automated Testing Automation AutoScript Azure Barcode Base64 Batch BigData BLOB Branch & Merge Browser Bug Build Button C# C# Class Importer C# Editor C# Model generator Calendar Camera Certificate Chrome Citrix Class Client Client/Server Cloud Cluster Collection COM Command Line Compiler Compression Computed Field Configuration Controls Cookies Cordova Crash Cross-Platform Crosstab CSharpAssembly CSharpObject CSS CSV Cursor Data Database Database Driver Database Painter Database Profile Database Provider DataObject DataSource DataStore DataStore (C#) DataStore (PS) DataType DataWindow DATE DATETIME DB2 Debug Debugger Debugging Deployment Design DLL DO-WHILE Dockable Docker Documentation DOUBLE Download DPI DragDrop Edge Edit Style Editor Elevate Conference Email Embedded SQL Emulator Encoding Encryption Enhancement Request Entity Entity Framework ERP Error Event Event Handler Event Handling Excel Exception Export Expression External Functions F# Field File File Access Filter Firefox Firewall Font FOR-NEXT Foreground Format Function Garbage Collection GeoLocation Git Graph HANA Hash Header HTML/5 HTTP/S HTTPClient Icon IDE Identity IIS IMAPI Import InfoMaker Inheritance Installation Integer IntelliSense Interface Internet Internet Explorer iOS IPA iPad iPhone IWA J# Java JavaScript JBoss JDBC JOIN JSON JSONGenerator JSONParser Kestrel Label Lambda Large File LDAP Library License LINQ Linux OS Load Balancing Localization Localized PBVM Log In Log Out Logging LONG LONGLONG macOS MAPI Maps MDI Memory Memory Leak Menu Merge MessageBox Messagging Method Migration MIME TYPE Mobile Model ModelStore ModelStore (C#) MSOLEDBSQL Multi Threading MVC MySQL n-Tier Namespace NativePDF NVO OAuth ODATA ODBC Office Offline OLE OLEDB Online Open Source OpenAPI OpenSSL Oracle OrcaScript Other Outlook Output Package Parameter Patch PayPal PB Classic PB Native PB.NET PBC PBD PBDOM PBG PBJVM PBL PBNI PBORCA PBVM PBX PDF Performance Permission PFC Picture Pipeline Play Store (Google) Plugin Popup Port POST PostgreSQL PowerBuilder PowerBuilder (Appeon) PowerBuilder (SAP) PowerBuilder Compiler PowerBuilder Runtime PowerClient PowerScript (PS) PowerScript IDE PowerScript Migrator PowerServer PowerServer Mobile PowerServer Toolkit PowerServer Web PowerServerLabel Print Properties Proxy Publish PULL PUSH Query Regression Release Renew Resize Response REST Retrieve RibbonBar RibbonBar Builder RibbonView Rich Text Roadmap RPC Runtime Packager SaaS Scaffolding Script SDI SDK Security Server Service Session Single Sign-on Size SMTP SMTPClient SnapDevelop SOAP Solution Sort Source Code Speech Recognition SQL SQL Anywhere SQL Server SqlBuilder SqlExecutor SQLite SqlModelMapper Storage Stored Procedure Subscription SVN Swagger Syntax TabbedBar TabbedView Tablet TabPage Target TE Control Testing Text TFS Theme TIME Timer TLS/SSL Tomcat TortoiseGit TortoiseSVN Transaction Transparency Trial Trigger TRY-CATCH TX Control Type UI ULONG UltraLite Uninstall Unit Test Unit Testing UNIX OS Update Upgrade Upload URL User Center User Object UWP Validation VARCHAR Variable Versioning Visual Studio Visual Studio Code VM Voice Warning WCF Web API Web Extensions Web Service WebBrowser WebForms WebLogic WebSphere WildFly WinAPI Window Windows OS WinForms Wizard Workgroup Workspace WPF XCODE XHTML XML Zoom
✖

Helpful?

If a reply or comment is helpful for you, please don’t hesitate to click the Helpful button. This action is further confirmation of their invaluable contribution to the Appeon Community.