#
# xtablestart:
#
# we start by getting the articleNr of our search request
# which is given as argument when dbengine is called
local($nr) = xChop($query->param('articleNr'));

#
# then we remove any leading = which might
# be here if this is a sublist\
if (substr($nr,0,1) eq "=") {
 $nr = substr($nr, 1, length($nr)-1);
}

#
# now we make sure that this articleNr is kept in mind\
# if our user chooses to create a new price record
$out->append(-name=>'articleNr',-value=>$nr) if $nr;


#
# and we print our "new" entry and a table start on top of our list
sprintf("<TABLE CELLSPACING=0><TR><TD><A HREF=\"dbengine.cgi?dbase=$dbase&mode=plain&table=$table&%s\"><FONT SIZE=2 FACE=Helvetica>New</FONT></A>\n",$out->query_string);






#
# xtableitem:
#
# ok this item listing starts with getting the ready build HREF to our record
local($href) = $_;

#
# we now start to build our return string beginning with a <TR> tag
$ret  = "<TR>";

#
# we add the vendor name
$ret .= "<TD>".$values{'vendor'};

#
# and create an input field for the price whose fieldname has to start with the oid
$ret .= "<TD><INPUT NAME=".$oid."price TYPE=Text SIZE=10 MAXLENGTH=10 VALUE=\"".sprintf("%.2f",$values{'price'})."\">";

#
# finally we complete our record listing with a reference to the full price record around the article No
$ret .= "<TD>".$href.$values{'articleNr'}."</A>";
$ret;






#
# xtableend:
#
# make dure our output is terminated properly
"</TABLE>";






#
# xxquerystring:
#
# take the ready built query string and extend it to order our output by vendor
$_ . "ORDER BY vendor";