. * * For more information, contact Colosa Inc, 2566 Le Jeune Rd., * Coral Gables, FL, 33134, USA, or email info@colosa.com. * */ //G::genericForceLogin( 'WF_MYINFO' , 'login/noViewPage', $urlLogin = 'login/login' ); G::LoadClass('tree'); $wsSessionId = ''; if (isset ( $_SESSION ['WS_SESSION_ID'] )) { $wsSessionId = $_SESSION ['WS_SESSION_ID']; } if (isset ( $_GET ['x'] )) { if ($_GET ['x'] == 1) { $wsdl = $_SESSION ['END_POINT']; $workspace = $_SESSION ['WS_WORKSPACE']; } else { $wsdl = '' . G::LoadTranslation ( 'ID_WSDL' ) . ''; $workspace = ''; } } else { if (! isset ( $_SESSION ['END_POINT'] )) { //$wsdl = 'http://'.$_SERVER['HTTP_HOST'].'/sys'.SYS_SYS.'/en/classic/services/wsdl'; $wsdl = 'http://' . $_SERVER ['HTTP_HOST']; $workspace = SYS_SYS; } else { $wsdl = $_SESSION ['END_POINT']; $workspace = $_SESSION ['WS_WORKSPACE']; } } $defaultEndpoint = 'http://' . $_SERVER ['SERVER_NAME'] . ':' . $_SERVER ['SERVER_PORT'] . '/sys' . SYS_SYS . '/en/classic/services/wsdl2'; $wsdl = isset ( $_SESSION ['END_POINT'] ) ? $_SESSION ['END_POINT'] : $defaultEndpoint; $tree = new Tree ( ); $tree->name = 'WebServices'; $tree->nodeType = "base"; $tree->contentWidth = "310"; $tree->width = "280px"; $tree->value = '

' . G::loadTranslation ( "ID_WEB_SERVICES" ) . '

' . G::LoadTranslation ( 'ID_DETAILS_WEBSERVICES' ) . ' ' . G::LoadTranslation ( 'ID_SETUP_WEBSERVICES' ) . '

'; $tree->showSign = false; $allWebservices = array (); $allWebservices [] = 'Login'; $allWebservices [] = 'CreateUser'; $allWebservices [] = 'AssignUserToGroup'; $allWebservices [] = 'NewCase'; $allWebservices [] = 'NewCaseImpersonate'; $allWebservices [] = 'DerivateCase'; $allWebservices [] = 'SendVariables'; $allWebservices [] = 'SendMessage'; $allWebservices [] = 'ProcessList'; $allWebservices [] = 'CaseList'; $allWebservices [] = 'UnassignedCaseList'; $allWebservices [] = 'RoleList'; $allWebservices [] = 'GroupList'; $allWebservices [] = 'UserList'; $allWebservices [] = 'TaskList'; $allWebservices [] = 'TriggerList'; $allWebservices [] = 'InputDocumentList'; $allWebservices [] = 'InputDocumentProcessList'; $allWebservices [] = 'OutputDocumentList'; $allWebservices [] = 'RemoveDocument'; $allWebservices [] = 'TaskCase'; $allWebservices [] = 'ReassignCase'; $allWebservices [] = 'removeUserFromGroup'; foreach ($allWebservices as $ws) { $ID_TEST = G::LoadTranslation ( 'ID_TEST' ); $UID = htmlentities ( $ws ); $WS_TITLE = strip_tags ( $ws ); $htmlGroup = ''; $htmlGroup .= ""; $htmlGroup .= ""; $htmlGroup .= ""; $htmlGroup .= "

"; $htmlGroup .= "{$WS_TITLE}

"; if ($WS_TITLE !='SendFiles') { if ($WS_TITLE == 'Login' || $wsSessionId != '') { $htmlGroup .= "[{$ID_TEST}]"; } } else { if (isset($_SESSION ['WS_SESSION_ID'])&&$_SESSION ['WS_SESSION_ID']!='') { $htmlGroup .= "[{$ID_TEST}]"; } } $htmlGroup .= "

"; $ch = & $tree->addChild ( $ws, $htmlGroup, array ('nodeType' => 'child' ) ); $ch->point = '

'; } print ($tree->render ()) ;