<?xml version="1.0" encoding="ISO-8859-1"?> <!-- - <COPYRIGHT> - Copyright 2003 Gerd Stolpmann - - <GPL> - This file is part of WTimer. - - WTimer is free software; you can redistribute it and/or modify - it under the terms of the GNU General Public License as published by - the Free Software Foundation; either version 2 of the License, or - (at your option) any later version. - - WTimer 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 General Public License for more details. - - You should have received a copy of the GNU General Public License - along with WDialog; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - </> --> <!-- $Id: selectuser.ui,v 1.4 2003/03/23 11:59:14 gerd Exp $ - ====================================================================== - --> <!-- This file defines the dialog "selectuser". --> <ui:dialog name="selectuser" start-page="selector"> <ui:variable name="session" type="dialog"/> <!-- The session pseudo dialog, see session.ui --> <ui:variable name="sheetlist" type="dynamic-enumerator"> <!-- The list of sheets for which the login user has at least read - permission --> <!--&selectuser-sheetlist;--> <!-- testdata --> </ui:variable> <ui:page name="selector"> <t:basic-grid> <p:nav-col> <t:selectuser-nav/> </p:nav-col> <p:headline> Select Sheet <t:head-info-box/> </p:headline> <p:main-col> Select the time sheet you want to view or edit. <div> <br/> <ui:select variable="session.current-sheet" base="sheetlist" size="$[size(sheetlist)]"/> </div> </p:main-col> </t:basic-grid> </ui:page> <!-- ERROR HANDLING --> <!-- See also ocaml class error_behaviour that uses the following definitions --> <ui:variable name="runtime-error"/> <ui:page name="runtime-error"> <t:basic-grid> <p:nav-col> <!-- empty nav-col: this is a modal dialog --> </p:nav-col> <p:headline> Select Sheet <t:head-info-box/> </p:headline> <p:main-col> <t:error errid="$[runtime-error]"/> <ui:button name="cont-error" label="Continue"/> </p:main-col> </t:basic-grid> </ui:page> </ui:dialog> <!-- ********************************************************************** --> <!-- selectuser-nav: The navigation bar for user selection --> <ui:template name="selectuser-nav"> <q:nav-section head="File"> <t:file-menu except="file-select-user"/> </q:nav-section> </ui:template> <!-- ******************* For Emacs: ********************* --> <!-- Local Variables: mode: xml sgml-parent-document: ("main.ui" "ui:application" "ui:dialog") End: -->