WebService feature request for return Q

[markster]

I would like to request that an embed point be inserted in the BuildResultFields routine in a WebService procedure before a returned Queue is saved to XML. Then there would a place to insert XML save options.

BuildResultFields  Routine
! Start of "Start of BuildResultFields Routine"
! [Priority 5000]

! End of "Start of BuildResultFields Routine"
  xml._indent = IndentLen
  xml.SaveEncoding = 'utf-8'
  If Records(p_web.ServiceErrorQueue)
    xml.save(p_web.ServiceErrorQueue,'ServiceErrors','Error')
    packet.append(sub(xml.xmldata,1,xml.xmldatalen))
  Else
    If Records(p_web.ServiceResultQueue)
      xml.save(p_web.ServiceResultQueue,'ServiceResults','Result')
      packet.append(sub(xml.xmldata,1,xml.xmldatalen))
    End
    If records(p_web.ServiceResultQueue) = 0
      packet.append(all(' ',IndentLen) & '<'&p_web.Nocolon('InvoiceQueryResult',Net:SingleUnderscore+Net:NoSpaces)&'>'......
    End ! Condition
    If records(p_web.ServiceResultQueue) = 0
===================>>>> new embed point here
      xml.save(QInvoice,'','QInvoice')
      packet.append(sub(xml.xmldata,1,xml.xmldatalen))
    End ! Condition
  End

Thanks, Mark

[Bruce]

done for 8.32