84 $this->poolOBJ = $poolGUI->object;
94 if (!$this->access->checkAccess(
'write',
'', $this->poolGUI->ref_id))
97 $this->ctrl->redirectByClass(
'ilObjQuestionPoolGUI',
'infoScreen');
102 $this->tabs->activateTab(
'settings');
106 $nextClass = $this->ctrl->getNextClass();
111 $cmd = $this->ctrl->getCmd(self::CMD_SHOW_FORM).
'Cmd';
123 $this->tpl->setContent( $this->ctrl->getHTML($form) );
132 $errors = !$form->checkInput();
133 $form->setValuesByPost();
150 $this->ctrl->redirect($this, self::CMD_SHOW_FORM);
155 include_once
'Services/MetaData/classes/class.ilMD.php';
156 $md_obj =
new ilMD($this->poolOBJ->getId(), 0,
"qpl");
164 $md_desc_ids = $md_section->getDescriptionIds();
167 $md_desc = $md_section->getDescription(array_pop($md_desc_ids));
168 $md_desc->setDescription($form->
getItemByPostVar(
'description')->getValue());
173 $md_desc = $md_section->addDescription();
174 $md_desc->setDescription($form->
getItemByPostVar(
'description')->getValue());
179 $this->poolOBJ->setDescription($form->
getItemByPostVar(
'description')->getValue());
180 $this->poolOBJ->update();
183 $this->poolOBJ->setOnline($online->getChecked());
186 $this->poolOBJ->setShowTaxonomies($showTax->getChecked());
189 $this->poolOBJ->setNavTaxonomyId($navTax->getValue());
194 $this->poolOBJ->setSkillServiceEnabled($skillService->getChecked());
197 $this->poolOBJ->saveToDb();
202 require_once
'Services/Form/classes/class.ilPropertyFormGUI.php';
205 $form->setFormAction($this->ctrl->getFormAction($this));
206 $form->addCommandButton(self::CMD_SAVE_FORM, $this->lng->txt(
'save'));
208 $form->setTitle($this->lng->txt(
'qpl_form_general_settings'));
209 $form->setId(
'properties');
211 include_once
'Services/MetaData/classes/class.ilMD.php';
212 $md_obj =
new ilMD($this->poolOBJ->getId(), 0,
"qpl");
216 $title->setRequired(
true);
217 $title->setValue($md_section->getTitle());
220 $ids = $md_section->getDescriptionIds();
223 $desc_obj = $md_section->getDescription(array_pop($ids));
228 $desc->setValue($desc_obj->getDescription());
229 $form->addItem($desc);
234 $online =
new ilCheckboxInputGUI($this->lng->txt(
'qpl_settings_general_form_property_online'),
'online');
235 $online->
setInfo($this->lng->txt(
'qpl_settings_general_form_property_online_description'));
236 $online->setChecked($this->poolOBJ->getOnline());
237 $form->addItem($online);
241 $showTax =
new ilCheckboxInputGUI($this->lng->txt(
'qpl_settings_general_form_property_show_taxonomies'),
'show_taxonomies');
242 $showTax->
setInfo($this->lng->txt(
'qpl_settings_general_form_prop_show_tax_desc'));
243 $showTax->setChecked($this->poolOBJ->getShowTaxonomies());
244 $form->addItem($showTax);
250 $navTax =
new ilSelectInputGUI($this->lng->txt(
'qpl_settings_general_form_property_nav_taxonomy'),
'nav_taxonomy');
251 $navTax->
setInfo($this->lng->txt(
'qpl_settings_general_form_property_nav_taxonomy_description'));
252 $navTax->setValue($this->poolOBJ->getNavTaxonomyId());
253 $navTax->setOptions($taxSelectOptions);
254 $showTax->addSubItem($navTax);
260 $skillService =
new ilCheckboxInputGUI($this->lng->txt(
'tst_activate_skill_service'),
'skill_service');
261 $skillService->
setChecked($this->poolOBJ->isSkillServiceEnabled());
262 $form->addItem($skillService);
270 $taxSelectOptions =
array(
271 '0' => $this->lng->txt(
'qpl_settings_general_form_property_opt_notax_selected')
274 foreach($this->poolOBJ->getTaxonomyIds() as $taxId)
279 return $taxSelectOptions;
static sendSuccess($a_info="", $a_keep=false)
Send Success Message to Screen.
This class provides processing control methods.
getTaxonomySelectInputOptions()
static _lookupTitle($a_id)
lookup object title
static sendInfo($a_info="", $a_keep=false)
Send Info Message to Screen.
special template class to simplify handling of ITX/PEAR
This class represents a text property in a property form.
setCols($a_cols)
Set Cols.
__construct(ilCtrl $ctrl, ilAccessHandler $access, ilLanguage $lng, ilTemplate $tpl, ilTabsGUI $tabs, ilObjQuestionPoolGUI $poolGUI)
Constructor.
Class ilObjQuestionPoolGUI.
Create styles array
The data for the language used.
static sendFailure($a_info="", $a_keep=false)
Send Failure Message to Screen.
formPropertyExists(ilPropertyFormGUI $form, $propertyId)
static isSkillManagementGloballyActivated()
executeCommand()
Command Execution.
This class represents a text area property in a property form.
showFormCmd(ilPropertyFormGUI $form=null)
const CMD_SHOW_FORM
command constants
performSaveForm(ilPropertyFormGUI $form)