project BLF > class BSystem > method XMLNodeValue

function returns character


Parameters


ihNodeinputhandle


Internal usage


BLF
method BSystem.ApiLoadDefaultSecurity


program code (program1/bsystem.p)

create x-noderef vhText in widget-pool "non-persistent".
vlValidNode = ihNode:get-child (vhText,1) no-error.
if vlValidNode
then if vhText:subtype = "text"
     then if vhText:node-value = ?
          then return "".
          else return vhText:node-value.

finally:
    delete object vhText.
end finally.