'; Lib::loadClass('ProcesHelper'); $zasobID = ProcesHelper::getZasobTableID('USERS2_MARKETING'); $userAcl = User::getAcl(); $userAcl->fetchGroups(); //echo'
'; if (!$userAcl->hasTableAcl($zasobID)) { die("Brak uprawnień do tabeli ID={$zasobID}"); } $tblAcl = $userAcl->getTableAcl($zasobID); //echo'tblAcl (F.' . __FUNCTION__ . ':' . __LINE__ . '): ';print_r($tblAcl);echo''; $forceTblAclInit = ('1' == V::get('_force', '', $_GET)); $tblAcl->init($forceTblAclInit); if(V::get('DBG', '', $_GET)){echo'
tblAcl (' . __CLASS__ . '::' . __FUNCTION__ . ':' . __LINE__ . '): ';print_r($tblAcl);echo'';}
$dataSource = $tblAcl->getDataSource();
$cols = array();
$ankietaFrm = new stdClass();
$ankietaFrm->S_ADDRESS_STREET = V::get('S_ADDRESS_STREET', '', $_GET);
//$ankietaFrm->T_WORKPOINTS_USER = V::get('T_WORKPOINTS_USER', '', $_GET);
$ankietaFrm->row = null;
$ankietaFrm->rowID = null;
$rows = array();
if (!empty($ankietaFrm->S_ADDRESS_STREET)) {
$params = array();
$params['f_S_ADDRESS_STREET'] = '=' . $ankietaFrm->S_ADDRESS_STREET;
$rows = $dataSource->getItems($params);
}
if (1 != count($rows) && isset($_GET['S_ADDRESS_STREET'])) {
?>
row (' . __CLASS__ . '::' . __FUNCTION__ . ':' . __LINE__ . '): ';print_r($ankietaFrm->row);echo'';}
$fieldsAnkieta = array();
$fieldsAnkieta[] = 'S_OTHER_INFO';
$fieldsAnkieta[] = 'I_BAD_DATE';
$fieldsAnkieta[] = 'I_OPER';
$fieldsAnkieta[] = 'I_OPER_ZAD';
$fieldsAnkieta[] = 'I_OPER_FIN';
$fieldsAnkieta[] = 'I_OPER_ZAINT';
$fieldsAnkieta[] = 'T_BAD_DATE';
$fieldsAnkieta[] = 'T_OPER';
$fieldsAnkieta[] = 'T_OPER_ZAD';
$fieldsAnkieta[] = 'T_OPER_FIN';
$fieldsAnkieta[] = 'T_OPER_ZAINT';
$fieldsAnkieta[] = 'TV_BAD_DATE';
$fieldsAnkieta[] = 'TV_OPER';
$fieldsAnkieta[] = 'TV_OPER_ZAD';
$fieldsAnkieta[] = 'TV_OPER_FIN';
$fieldsAnkieta[] = 'TV_OPER_ZAINT';
$fieldsAnkieta[] = 'P_NAME';
$fieldsAnkieta[] = 'P_PHONE';
$fieldsAnkieta[] = 'T_WORKPOINTS_USER';
$fieldsAnkieta[] = 'T_WORKPOINTS_TYPE';
$fieldsAnkieta[] = 'T_WORKPOINTS_DATE';
$fieldsAnkieta[] = 'P_FLOOR_CONTROL';
$fieldsList = array();
$fieldsListAll = $tblAcl->getFields();
foreach ($fieldsAnkieta as $vColName) {
$vColID = $tblAcl->getFieldIdByName($vColName);
if (isset($fieldsListAll[$vColID])) {
$fieldsList[$vColID] = $fieldsListAll[$vColID];
$cols[$vColID] = '';
//$cols[$kID] = V::get($vCol['name'], '', $row);
$cols[$vColID] = V::get("f{$vColID}", $cols[$vColID], $_POST);
}
else {
?>
fields (' . __CLASS__ . '::' . __FUNCTION__ . ':' . __LINE__ . '): ';print_r($fields);echo'';}
foreach ($fields as $kID => $vField) {
if (!$tblAcl->isAllowed($kID, 'W', $ankietaFrm->row)) {
continue;
}
if (array_key_exists("f{$kID}", $args)) {
$sqlObj->{$vField['name']} = $args["f{$kID}"];
if (empty($args["f{$kID}"])) {// fix bug in input type date and value="0000-00-00"
$type = $tblAcl->getFieldTypeById($kID);
if ($type['type'] == 'date') {
$sqlObj->{$vField['name']} = $type['default'];
}
}
}
}
$sqlObj->ID = $id;
if($DBG){echo' (' . __CLASS__ . '::' . __FUNCTION__ . ':' . __LINE__ . '): ';print_r($sqlObj);echo'';}
$ret = $db->UPDATE_OBJ($tblName, $sqlObj);
if ($ret > 0) {
echo '