CXML-GET-NEXT-SIBLING

Syntax:

CALL "C$XML" USING CXML-GET-NEXT-SIBLING, handle

Parameters:

CXML-GET-NEXT-SIBLING Op-code 4. Numeric data item that specifies the operation to perform. Each operation is defined in acucobol.def, which is included with your system.
handle USAGE handle

On Entry:

CXML-GET-NEXT-SIBLING Value 4
handle An element handle.

On Exit:

RETURN-CODE A handle of the next sibling element, or “0” if no more siblings. (The case of no next sibling is not considered an error, even though CXML-GET-LAST-ERROR will return “11”.)

Comments:

This operation retrieves the handle of the next sibling element of the handle passed. You should move return code to an element handle that you have declared in Working-Storage

Example:

working-storage section.
01 parser-handle usage is handle.
01 element-1-handle usage is handle.
01 element-2-handle usage is handle.
COPY "acucobol.def".
procedure division.
main-logic.  
*Get child and next sibling element 
   call "C$XML" using CXML-GET-FIRST-CHILD, parser-handle
   move return-code to element-1-handle.

   call "C$XML" using CXML-GET-NEXT-SIBLING, element-1-handle
   move return-code to element-2-handle.