* GNU Affero General Public License for more details.
*
* You should have received a copy of the GNU Affero General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
* For more information, contact Colosa Inc, 2566 Le Jeune Rd.,
* Coral Gables, FL, 33134, USA, or email info@colosa.com.
*
*/
/**
* @package classes.model
*/
$G_MAIN_MENU = "rbac";
$G_SUB_MENU = "rbac.appEdit";
$G_MENU_SELECTED = 1;
$appid = isset($_GET[0]) ? $_GET[0] : '';
//$URI_VARS[0];
$HTTP_SESSION_VARS['CURRENT_APPLICATION'] = $appid;
$dbc = new DBConnection(DB_HOST, DB_RBAC_USER, DB_RBAC_PASS, DB_RBAC_NAME);
G::LoadClassRBAC("applications");
$obj = new RBAC_Application();
$obj->SetTo($dbc);
$obj->Load($appid);
$obj->Fields['EDIT_ROLES'] = G::LoadMessageXml('ID_ROLES');
$obj->Fields['EDIT_PERMISSIONS'] = G::LoadMessageXml('ID_PERMISSIONS');
$G_PUBLISH = new Publisher();
$G_PUBLISH->SetTo($dbc);
$G_PUBLISH->AddContent("xmlform", "xmlform", "rbac/appEdit", "", $obj->Fields, "../appEdit2");
$content = '';
//G::LoadContent( "rbac/myApp" );
G::RenderPage("publish");
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Affero General Public License for more details.
*
* You should have received a copy of the GNU Affero General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
* For more information, contact Colosa Inc, 2566 Le Jeune Rd.,
* Coral Gables, FL, 33134, USA, or email info@colosa.com.
*
*/
$frm = $HTTP_POST_VARS['form'];
$frm = G::PrepareFormArray($frm);
$dbc = new DBConnection(DB_HOST, DB_RBAC_USER, DB_RBAC_PASS, DB_RBAC_NAME);
$appid = $HTTP_SESSION_VARS['CURRENT_APPLICATION'];
$code = strtoupper($frm['APP_CODE']);
$descrip = $frm['APP_DESCRIPTION'];
//crear nueva applicacion
G::LoadClassRBAC("applications");
$obj = new RBAC_Application();
$obj->SetTo($dbc);
print "xx {$res}";
$res = $obj->applicationCodeRepetido($code);
if ($res != 0 && $res != $appid) {
G::SendMessage(15, "error");
header("location: appList.php");
die;
}
print "xx {$res}";
$uid = $obj->editApplication($appid, $code, $descrip);
header("location: appList.html");
/**
* appDel.php
*
* ProcessMaker Open Source Edition
* Copyright (C) 2004 - 2008 Colosa Inc.23
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU Affero General Public License as
* published by the Free Software Foundation, either version 3 of the
* License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Affero General Public License for more details.
*
* You should have received a copy of the GNU Affero General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
* For more information, contact Colosa Inc, 2566 Le Jeune Rd.,
* Coral Gables, FL, 33134, USA, or email info@colosa.com.
*
*/
$appid = $HTTP_SESSION_VARS['CURRENT_APPLICATION'];
$dbc = new DBConnection(DB_HOST, DB_RBAC_USER, DB_RBAC_PASS, DB_RBAC_NAME);
//crear Objeto
G::LoadClassRBAC("applications");
$obj = new RBAC_Application();
$obj->SetTo($dbc);
$obj->removeApplication($appid);
header("location: appList.html");
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Affero General Public License for more details.
*
* You should have received a copy of the GNU Affero General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
* For more information, contact Colosa Inc, 2566 Le Jeune Rd.,
* Coral Gables, FL, 33134, USA, or email info@colosa.com.
*
*/
header("location: appList.html");
die;
/*Falta revisar la clase RBAC_Application*/
$frm = $_POST['form'];
$code = strtoupper($frm['APP_CODE']);
$description = $frm['APP_DESCRIPTION'];
$dbc = new DBConnection(DB_HOST, DB_RBAC_USER, DB_RBAC_PASS, DB_RBAC_NAME);
//crear nueva aplicacion
G::LoadClassRBAC('applications');
$obj = new RBAC_Application();
$obj->SetTo($dbc);
$res = $obj->applicationCodeRepetido($code);
if ($res != 0) {
G::SendMessage(15, "error");
header("location: appNew.php");
die;
}
$appid = $obj->createApplication($code, $description);
$_SESSION['CURRENT_APPLICATION'] = $appid;
header("location: appList.html");
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
* For more information, contact Colosa Inc, 2566 Le Jeune Rd.,
* Coral Gables, FL, 33134, USA, or email info@colosa.com.
*
*/
global $G_TMP_MENU;
global $HTTP_SESSION_VARS;
$appid = $HTTP_SESSION_VARS['CURRENT_APPLICATION'];
$G_TMP_MENU->AddIdRawOption("OP1", "rbac/appList.html");
$G_TMP_MENU->AddIdRawOption("OP2", "rbac/appDel.html");
switch (SYS_LANG) {
case 'es':
$G_TMP_MENU->Labels = array("Cancelar", "Eliminar Applicación");
break;
case 'po':
$G_TMP_MENU->Labels = array("Cancelar", "Eliminar Application");
break;
default:
$G_TMP_MENU->Labels = array("Cancel", "Remove Application");
break;
}
//si no hay nada relacionado a esta aplicación se puede BORRAR!!
$dbc = new DBConnection(DB_HOST, DB_RBAC_USER, DB_RBAC_PASS, DB_RBAC_NAME);
//G::LoadClassRBAC ("applications");
$obj = new RBAC_Application();
$obj->SetTo($dbc);
$sw = $obj->canRemoveApplication($appid);
if ($sw > 0) {
$G_TMP_MENU->disableOptionId("OP2");
}
