$qry = "select \"EmployeeID\" AS empid, \"FirstName\"::text || ' ' ||\"LastName\"::text as name from \"Employees\""; $qq = $db_handle->prepare($qry); $qq->execute; while (@row = $qq->fetchrow) { $tt .= "\n"; } ####
Select an employee to be updated and press FETCH:
.............. ##
## # If the form has been completed, save data entered if ($input{"go"} eq "FETCH") { $query = "SELECT \"LastName\" AS ln, \"FirstName\" AS fn, \"Title\" AS tl, \"TitleOfCourtesy\" AS tc, \"BirthDate\" AS bd, \"HireDate\" AS hd, \"Address\" As ad, \"City\" AS ct, \"Region\" AS rg, \"PostalCode\" AS pc, \"Country\" AS cy, \"HomePhone\" AS hp, \"Extension\" AS xt, \"Notes\" AS nt, \"ReportsTo\" AS rt FROM \"Employees\" WHERE \"EmployeeID\"="." \'$input{empid}\'"; $ins = $db_handle->prepare($query); $ins->execute; while (@row = $ins->fetchrow) { $ln .= "\n"; $fn .= "\n"; $tl .= "\n"; $tc .= "\n"; $bd .= "\n"; $hd .= "\n"; $ad .= "\n"; $ct .= "\n"; $rg .= "\n"; $pc .= "\n"; $cy .= "\n"; $hp .= "\n"; $xt .= "\n"; $nt .= "\n"; $rt .= "\n"; } ####
Select an employee to be updated and press FETCH:
Last Name :
First Name :
Title :
Title Of Courtesy :
Birth Date :
Hire Date :
Address :
City :
Region :
Postal Code :
Country :
Home Phone :
Extension :
Notes :
Reports To :