function lAddNewLocation(&$locRec)
{
//---------------------------------------------------------------------
//
//---------------------------------------------------------------------
global $glUserID;
$sqlStr = 'INSERT INTO admin_chapters
SET ' . $this->strSQLCommon($locRec) . ",\n ch_bActive = 1,\n ch_bRetired = 0,\n ch_lOrigID = {$glUserID},\n ch_dteOrigin = NOW();";
$query = $this->db->query($sqlStr);
$lLocID = $this->db->insert_id();
// pre-fill a couple lists
$clist = new mlist_generic();
$clist->strListTable = 'lists_generic';
$clist->strListItemFN = 'lgen_strListItem';
$clist->strQualFN = 'lgen_enumListType';
$clist->strFieldPrefix = 'lgen_';
$clist->enumListQual = CENUM_LISTTYPE_ATTRIB;
$clist->lInsertNewListItem($lLocID, '(other)');
$clist->lInsertNewListItem($lLocID, '(unknown)');
$clist->lInsertNewListItem($lLocID, 'Internet');
$clist->lInsertNewListItem($lLocID, 'Staff Member');
$clist->lInsertNewListItem($lLocID, 'Web Site');
$clist->enumListQual = CENUM_LISTTYPE_VOLACT;
$clist->lInsertNewListItem($lLocID, '(Other)');
$clist->lInsertNewListItem($lLocID, 'Accounting/Bookkeeping');
$clist->lInsertNewListItem($lLocID, 'Administrative Support');
$clist->lInsertNewListItem($lLocID, 'Data Entry');
$clist->lInsertNewListItem($lLocID, 'Errands');
$clist->lInsertNewListItem($lLocID, 'Event Planning');
$clist->lInsertNewListItem($lLocID, 'Facilities Management');
$clist->lInsertNewListItem($lLocID, 'Landscaping');
$clist->lInsertNewListItem($lLocID, 'Office Support');
$clist->lInsertNewListItem($lLocID, 'Software/Database/Computers');
$clist->lInsertNewListItem($lLocID, 'Tuck-In');
$clist->lInsertNewListItem($lLocID, 'Web Design/Update');
$clist->enumListQual = CENUM_LISTTYPE_VOLJOBCODES;
$clist->lInsertNewListItem($lLocID, '2000 Administrative Support');
$clist->lInsertNewListItem($lLocID, '2010 Event Planning');
$clist->lInsertNewListItem($lLocID, '2020 Office Support');
$clist->lInsertNewListItem($lLocID, '5000 Tuck-In');
$clist->lInsertNewListItem($lLocID, '6000 Data Entry');
$clist->lInsertNewListItem($lLocID, '6010 Database/Software');
$clist->lInsertNewListItem($lLocID, '6020 Web Design/Updates');
$clist->enumListQual = CENUM_LISTTYPE_VOLTRAINING;
$clist->lInsertNewListItem($lLocID, '(other)');
$clist->lInsertNewListItem($lLocID, 'Annual Refresher');
$clist->lInsertNewListItem($lLocID, 'Orientation');
$clist->enumListQual = CENUM_LISTTYPE_VOLTRAININGBY;
$clist->lInsertNewListItem($lLocID, '(other)');
$clist->lInsertNewListItem($lLocID, 'Contracted Facilitator');
$clist->lInsertNewListItem($lLocID, 'Staff Member');
$clist->lInsertNewListItem($lLocID, 'Volunteer Coordinator');
$clist->enumListQual = CENUM_LISTTYPE_PV_ACTIVITIES;
$clist->lInsertNewListItem($lLocID, '(Other - please specify in notes)');
$clist->lInsertNewListItem($lLocID, 'Bereavement');
$clist->lInsertNewListItem($lLocID, 'Telephone Call');
$clist->lInsertNewListItem($lLocID, 'Visit');
$clist->enumListQual = CENUM_LISTTYPE_PV_LOCATIONS;
$clist->lInsertNewListItem($lLocID, '(Other - please specify in notes)');
$clist->lInsertNewListItem($lLocID, 'Assisted Living Facility');
$clist->lInsertNewListItem($lLocID, 'Group Home');
$clist->lInsertNewListItem($lLocID, 'Home');
$clist->lInsertNewListItem($lLocID, 'Hospital');
$clist->lInsertNewListItem($lLocID, 'Nursing Home');
$clist->enumListQual = CENUM_LISTTYPE_PV_PSTATUS;
$clist->lInsertNewListItem($lLocID, '(Does not apply)');
$clist->lInsertNewListItem($lLocID, 'Alert');
$clist->lInsertNewListItem($lLocID, 'Appeared calm');
$clist->lInsertNewListItem($lLocID, 'Appeared cheerful');
$clist->lInsertNewListItem($lLocID, 'Appeared confused');
$clist->lInsertNewListItem($lLocID, 'Appeared sad');
$clist->lInsertNewListItem($lLocID, 'Awake');
$clist->lInsertNewListItem($lLocID, 'Drowsy');
$clist->lInsertNewListItem($lLocID, 'In bed');
$clist->lInsertNewListItem($lLocID, 'In wheelchair');
$clist->lInsertNewListItem($lLocID, 'Sleeping');
$clist->lInsertNewListItem($lLocID, 'Up in a chair');
$clist->enumListQual = CENUM_LISTTYPE_PV_VISITTASKS;
$clist->lInsertNewListItem($lLocID, '(Does not apply)');
$clist->lInsertNewListItem($lLocID, '(Other - please specify in notes)');
$clist->lInsertNewListItem($lLocID, 'Confimed patient\'s emotional reactions');
$clist->lInsertNewListItem($lLocID, 'Did light housekeeping');
$clist->lInsertNewListItem($lLocID, 'Listened to music with patient');
$clist->lInsertNewListItem($lLocID, 'Looked at pictures with patient');
$clist->lInsertNewListItem($lLocID, 'Read to patient');
$clist->lInsertNewListItem($lLocID, 'Socialized with patient during volunteer visit');
$clist->lInsertNewListItem($lLocID, 'Talked to patient');
$clist->lInsertNewListItem($lLocID, 'Took patient to activities');
$clist->lInsertNewListItem($lLocID, 'Walked along side of patient');
$clist->enumListQual = CENUM_LISTTYPE_PCON_RELATION;
$clist->lInsertNewListItem($lLocID, '(other)');
$clist->lInsertNewListItem($lLocID, 'Adult Child');
$clist->lInsertNewListItem($lLocID, 'Brother');
$clist->lInsertNewListItem($lLocID, 'Child');
$clist->lInsertNewListItem($lLocID, 'Daughter');
$clist->lInsertNewListItem($lLocID, 'Father');
$clist->lInsertNewListItem($lLocID, 'Friend');
$clist->lInsertNewListItem($lLocID, 'Husband');
$clist->lInsertNewListItem($lLocID, 'Mother');
$clist->lInsertNewListItem($lLocID, 'Other Family Member');
$clist->lInsertNewListItem($lLocID, 'Sister');
$clist->lInsertNewListItem($lLocID, 'Son');
$clist->lInsertNewListItem($lLocID, 'Wife');
return $lLocID;
}
