@verb #80:"parse_GET parse_POST" this none this rxdo #60
@program #80:"parse_GET parse_POST" this none this
"Returns a parameter from either the GET or the POST data."
"If the parameter wasn't found, E_PROPNF is returned."
r = {}
for name in (args)
  if (x = listassoc(name, verb == "parse_GET" ? dobj | iobj))
    r = {@r, x[2]}
  else
    r = {@r, E_PROPNF}
  endif
endfor
if (length(r) > 1)
  return r
else
  return r[1]
endif
"Last modified by manta (#7165) on Sat Oct 28 15:04:42 2000 MDT."
.