req==>".$req."<===+
"; if ($req == 'add_record') addRecord(); else if ($req == 'search_record') searchRecord(); else if ($req == 'edit_record') editRecord(); else if ($req == 'update_record') updateRecord(); else if ($req == 'delete_record') deleteRecord(); else if ($req == 'display_details') displayDetails(); else if ($req == 'add_detail') addDetail(); else defaultDisplay(); function defaultDisplay() { // ML added global and dropdown with available languages // global $ModName, $topic, $sel; $ModName = $GLOBALS['ModName']; $topic = $GLOBALS['topic']; $sel = $GLOBALS['sel']; list($dbconn) = pnDBGetConn(); //$pntable = pnDBGetTables(); $currentlang = pnUserGetLang(); $prev_op=pnVarCleanFromInput('prev_op'); include ('header.php'); OpenTable(); echo "
VP DATABASE

"; if ($prev_op) echo "Previous Operation: $prev_op
"; CloseTable(); OpenTable(); echo "
SEARCH RECORDS

"; echo ""; echo ""; echo ""; echo ""; echo "
You may enter a partial string below. For example, to search for
all entries with a last name beginning with 'A', type A in the criteria
field and select the 'Last' radio button.

If the Notes field is selected, the query will find all records
containing the search criteria anywhere within the field.

Leaving the search field empty will retrieve all records.

"; echo "
Search criteria:
Select the field from the database to search below:
"; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo "
First:Last:Organization:

"; echo ""; CloseTable(); OpenTable(); echo ""; echo "
ADD A RECORD

"; echo ""; echo "

"; echo "

"; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo "
Name (first,last):
Organization:
Position:
Address 1:
Address 2:
Address 3:
City:
State:
Zip:
 INCLUDE AREA CODES IN PHONE NUMBERS.
Phone:
Fax:
Cell Ph:
 ONE EMAIL ADDRESS ONLY.
Email:
Notes:

"; CloseTable(); include ('footer.php'); } function addRecord() { list($dbconn) = pnDBGetConn(); list($first,$last,$org,$pos,$addr1,$addr2,$addr3,$city,$state,$zip,$phone,$fax,$cell,$email,$notes) = pnVarCleanFromInput('first','last','org','pos','addr1','addr2','addr3','city','state','zip','phone', 'fax','cell','email','skill','notes'); include 'header.php'; openTable(); // $uid = pnUserGetVar('uid'); $uid=0; $sqlstr="insert into vp_database (pn_userid,first,last,org,position,addr1,addr2,addr3, city,state,zip,phone,fax,cell,email,notes,whoid) values (0,'".pnVarPrepForStore($first)."','".pnVarPrepForStore($last)."','".pnVarPrepForStore($org)."','".pnVarPrepForStore($pos)."','".pnVarPrepForStore($addr1)."','".pnVarPrepForStore($addr2)."','".pnVarPrepForStore($addr3)."','".pnVarPrepForStore($city)."','".pnVarPrepForStore($state)."','".pnVarPrepForStore($zip)."','".pnVarPrepForStore($phone)."','".pnVarPrepForStore($fax)."','".pnVarPrepForStore($cell)."','".pnVarPrepForStore($email)."','".pnVarPrepForStore($notes)."',".$uid.")"; echo "
$sqlstr
"; $result = $dbconn->Execute($sqlstr); if($dbconn->ErrorNo()<>0) { echo $dbconn->ErrorNo(). ": ".$dbconn->ErrorMsg(). "
"; exit(); } $name=$first." ".$last; pnRedirect('modules.php?op=modload&name=vp_database&file=index&prev_op='.$name.' added to database.'); closeTable(); include 'footer.php'; } function searchRecord() { list($dbconn) = pnDBGetConn(); include 'header.php'; openTable(); list($searchdata,$keyfield,$skill) = pnVarCleanFromInput('searchdata','keyfield'); //echo "
searchdata:[$searchdata]"; if ($searchdata=="") $srchstr = "SELECT id,first,last,org,city,phone,email FROM vp_database order by last"; else $srchstr = "SELECT id,first,last,org,city,phone,email FROM vp_database WHERE ".$keyfield." LIKE '".pnVarPrepForStore($searchdata)."%'"; //echo "
Str:$srchstr
"; $result=$dbconn->Execute($srchstr); if($dbconn->ErrorNo()<>0) { echo $dbconn->ErrorNo(). ": ".$dbconn->ErrorMsg(). "
"; exit(); } echo ""; //echo ""; echo ""; while(list($id,$first,$last,$org,$city,$phone,$email)=$result->fields) { echo ""; echo ""; $result->MoveNext(); } echo "
Key Field: $keyfield
 NameOrganizationCityPhoneEmail
[edt] "; echo "[del]   "; echo "$last,$first   $org   $city$phone   $email
"; closeTable(); include 'footer.php'; } function editRecord() { list($dbconn) = pnDBGetConn(); include 'header.php'; $id = pnVarCleanFromInput('id'); openTable(); //echo "
Record ID:$id"; $result=$dbconn->Execute("SELECT * FROM vp_database WHERE ID=$id"); if($dbconn->ErrorNo()<>0) { echo $dbconn->ErrorNo(). ": ".$dbconn->ErrorMsg(). "
"; exit(); } list($id,$pn_id,$first,$last,$position,$org,$addr1,$addr2,$addr3,$city,$state,$zip,$phone,$fax,$cell,$email,$notes)=$result->fields; //echo "
Media:$media"; echo ""; echo "

"; echo "

"; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo "
Name (first,last):
Organization:
Position:
Address 1:
Address 2:
Address 3:
City:
State:
Zip:
 INCLUDE AREA CODES IN PHONE NUMBERS.
Phone:
Fax:
Cell Ph:
 ONE EMAIL ADDRESS ONLY.
Email:
Notes:

"; closeTable(); include 'footer.php'; } function updateRecord() { list($dbconn) = pnDBGetConn(); include 'header.php'; openTable(); list($id,$pn_id,$first,$last,$position,$org,$addr1,$addr2,$addr3,$city,$state,$zip,$phone,$fax, $cell,$email, $notes)=pnVarCleanFromInput('id','pn_id','first','last','position','org', 'addr1','addr2','addr3','city','state','zip','phone','fax','cell','email','notes'); /* echo "
id:$id"; echo "
pn_id:$pn_id"; echo "
first:$first"; echo "
last:$last"; echo "
position:$position"; echo "
org:$org"; echo "
addr1:$addr1"; echo "
addr2:$addr2"; echo "
addr3:$addr3"; echo "
city:$city"; echo "
state:$state"; echo "
zip:$zip"; echo "
phone:$phone"; echo "
fax:$fax"; echo "
cell:$cell"; echo "
email:$email"; echo "
notes:$notes"; */ echo "
Updating record for $first $last..."; $result = $dbconn->Execute ("update vp_database set first='".pnVarPrepForStore($first)."', last='".pnVarPrepForStore($last)."', position='".pnVarPrepForStore($position)."', org='".pnVarPrepForStore($org)."', addr1='".pnVarPrepForStore($addr1)."', addr2='".pnVarPrepForStore($addr2)."', addr3='".pnVarPrepForStore($addr3)."', city='".pnVarPrepForStore($city)."', state='".pnVarPrepForStore($state)."', zip='".pnVarPrepForStore($zip)."', phone='".pnVarPrepForStore($phone)."', fax='".pnVarPrepForStore($fax)."', cell='".pnVarPrepForStore($cell)."', email='".pnVarPrepForStore($email)."', notes='".pnVarPrepForStore($notes)."' where id=$id"); if($dbconn->ErrorNo()<>0) { echo $dbconn->ErrorNo(). ": ".$dbconn->ErrorMsg(). "
"; exit(); } pnRedirect('modules.php?op=modload&name=vp_database&file=index&prev_op='.$first." "."$last updated in database"); closeTable(); include 'footer.php'; } function deleteRecord() { list($dbconn) = pnDBGetConn(); include 'header.php'; openTable(); list($id,$oper)=pnVarCleanFromInput('id','oper'); //echo "
ID:$id, OPER:$oper"; $result=$dbconn->Execute("SELECT first,last,position,org FROM vp_database WHERE ID=$id"); if($dbconn->ErrorNo()<>0) { echo $dbconn->ErrorNo(). ": ".$dbconn->ErrorMsg(). "
"; exit(); } list($first,$last,$position,$org)=$result->fields; if ($oper=='verify') { list($first,$last,$position,$org)=$result->fields; echo ""; echo ""; echo ""; echo "
Name:$first $last, $position
Organization:$org
"; echo "

Are you sure you want to delete this record from the database?

"; echo "[NO]           "; echo "[Delete]"; closeTable(); } if($oper=='del') { echo"
Delete here..."; $result=$dbconn->Execute("DELETE FROM vp_database WHERE ID=$id"); if($dbconn->ErrorNo()<>0) { echo $dbconn->ErrorNo(). ": ".$dbconn->ErrorMsg(). "
"; exit(); } pnRedirect('modules.php?op=modload&name=vp_database&file=index&prev_op='.$first." "."$last deleted from database"); } closeTable(); } function displayDetails() { list($dbconn) = pnDBGetConn(); include 'header.php'; openTable(); $cid=pnVarCleanFromInput('id'); //echo "
Display details"; //echo "
ID:$id
"; $result=$dbconn->Execute("SELECT first,last FROM vp_database WHERE id=$cid"); if($dbconn->ErrorNo()<>0) { echo $dbconn->ErrorNo(). ": ".$dbconn->ErrorMsg(). "
"; exit(); } list($first,$last)=$result->fields; echo "
$first $last


"; $result=$dbconn->Execute("SELECT id,dposted,notes,amt FROM vp_database_details WHERE cid=$cid order by id"); if($dbconn->ErrorNo()<>0) { echo $dbconn->ErrorNo(). ": ".$dbconn->ErrorMsg(). "
"; exit(); } echo ""; echo ""; while(list($id,$dposted,$notes,$amt)=$result->fields) { echo ""; $result->MoveNext(); } echo "
DateNotesAmountID/Invoice No.
$dposted$notes$amt$id


"; $dposted = date('Y-m-d'); echo ""; echo "

"; echo "

"; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo "
Date:
Notes:
Amount:

"; CloseTable(); include ('footer.php'); } function addDetail() { list($dbconn) = pnDBGetConn(); include 'header.php'; openTable(); list($cid,$dposted,$notes,$amt)=pnVarCleanFromInput('cid','dposted','notes','amt'); echo "
ID:$cid
"; $result = $dbconn->Execute("insert into vp_database_details (cid,dposted,notes,amt) values (".pnVarPrepForStore($cid).",'".pnVarPrepForStore($dposted)."','".pnVarPrepForStore($notes)."',".pnVarPrepForStore($amt).")"); if($dbconn->ErrorNo()<>0) { echo $dbconn->ErrorNo(). ": ".$dbconn->ErrorMsg(). "
"; exit(); } pnRedirect("modules.php?op=modload&name=vp_database&file=index&prev_op='New detail added to database.'"); CloseTable(); include ('footer.php'); } ?>