// start form insert($w, $f = form(array("name" => "ENTRY", "method" => "post", "action" => $_SERVER["PHP_SELF"]))); insert($f, $con = container("fieldset", array("class" => "fieldset"))); insert($con, $legend = container("legend", array("class" => "legend"))); insert($legend, text(my_("Required information"))); insert($con, textbr(my_("Customer/autonomous system description:"))); insert($con, hidden(array("name" => "cust", "value" => "{$cust}"))); myFocus($p, "ENTRY", "custdescrip"); insert($con, input_text(array("name" => "custdescrip", "value" => "{$custdescrip}", "size" => "80", "maxlength" => "80"))); insert($con, textbrbr(my_("Customer/autonomous system admin group:"))); insert($con, textbr(my_("WARNING: If you choose a group that you do not have access to, you will not be able to see or access the data"))); insert($con, selectbox($lst, array("name" => "grp"), $grp)); insert($f, submit(array("value" => my_("Submit")))); insert($f, freset(array("value" => my_("Clear")))); if ($_GET) { $result2 = $ds->GetCustomerDNSInfo($cust); $org = $row1["org"]; $street = $row1["street"]; $city = $row1["city"]; $state = $row1["state"]; $zipcode = $row1["zipcode"]; $cntry = $row1["cntry"]; $nichandl = $row1["nichandl"]; $lname = $row1["lname"]; $fname = $row1["fname"]; $mname = $row1["mname"]; $torg = $row1["torg"]; $tstreet = $row1["tstreet"]; $tcity = $row1["tcity"]; $tstate = $row1["tstate"]; $tzipcode = $row1["tzipcode"];
function __FetchCustomerInfo($params) { global $xmlrpcerruser; // import user errcode value // $params is an Array of xmlrpcval objects $errstr = ""; $err = 0; if (IPPLAN_API_VER != DBF_API_VER) { return new xmlrpcresp(0, $xmlrpcerruser + 3, "Incorrect API version"); } // get the first param $custobj = $params->getParam(0); // if it's there and the correct type if (isset($custobj) && $custobj->scalartyp() == "int") { // extract the value of the state number $cust = $custobj->scalarval(); if (!($ds = new IPplanDbf())) { return new xmlrpcresp(0, $xmlrpcerruser + 1, "Could not connect to database"); } $result = $ds->GetCustomerDNSInfo($cust); while ($row = $result->FetchRow()) { $myDNS[] = new xmlrpcval(array("hname" => new xmlrpcval($row["hname"]), "ipaddr" => new xmlrpcval($row["ipaddr"])), "struct"); } $result = $ds->GetCustomerInfo($cust); // only one row here $row = $result->FetchRow(); $myVal = new xmlrpcval(array("org" => new xmlrpcval($row["org"]), "street" => new xmlrpcval($row["street"]), "city" => new xmlrpcval($row["city"]), "state" => new xmlrpcval($row["state"]), "zipcode" => new xmlrpcval($row["zipcode"]), "cntry" => new xmlrpcval($row["cntry"]), "nichandl" => new xmlrpcval($row["nichandl"]), "lname" => new xmlrpcval($row["lname"]), "fname" => new xmlrpcval($row["fname"]), "mname" => new xmlrpcval($row["mname"]), "torg" => new xmlrpcval($row["torg"]), "tstreet" => new xmlrpcval($row["tstreet"]), "tcity" => new xmlrpcval($row["tcity"]), "tstate" => new xmlrpcval($row["tstate"]), "tzipcode" => new xmlrpcval($row["tzipcode"]), "tcntry" => new xmlrpcval($row["tcntry"]), "phne" => new xmlrpcval($row["phne"]), "mbox" => new xmlrpcval($row["mbox"]), "dns" => new xmlrpcval($myDNS, "array")), "struct"); } else { // parameter mismatch, complain $err = 2; $errstr = "Incorrect parameters"; } if ($err) { // this is an error condition return new xmlrpcresp(0, $xmlrpcerruser + 1, $errstr); } else { // this is a successful value being returned return new xmlrpcresp($myVal); } }