ONO::ToolBox::Screen
This module helps building the ONO Admin and ONO desk interface.
Functions
build();
This will glue page parts in order to build a stanard ONO Admin or ONO Desk interface screen.
ONO::ToolBox::Screen->build( $TITLE, $SUBTITLE, $TOOLS, $SCREEN, $LEFT, $RIGHT, $MODE );
returns: $WEB
copyright();
Generate the copyright notice.
ONO::ToolBox::Screen->copyright( $username, $time, $year );
returns: qq~<table class="wide_table mt10"> <tr> <td class="w50 p5 small tar" style="line-height:130%"> <div>User $username is logged in</div> <div>Screen loaded on $time</div> </td> <td><img class="block" src="/ono/osr/images/ono/banner_130_40.png" style="width:130px;height:40px" alt=""></td> <td class="w50 p5 small" style="line-height:130%"> <div>ONO $ver$rev</div> <div>© 2000-$year <a href="http://kirps.com" target="_blank">Jos KIRPS</a></div> </td> </tr> </table> ~
login();
The default ONO login screen, as used by ONO Admin and ONO Desk. Note that is screen also offers both PIN and IP based access protection (before you may even try to login using username and password).
ONO::ToolBox::Screen->login( $lang, $BLK_ref, $vars_ref, $mode, $ono_ref );
menu();
Generate a menu item.
ONO::ToolBox::Screen->menu( $LINK, $ICON, $TEXT, $class, $sel );
returns: qq~<td class="nowrap p0" onclick="window.location='$LINK';"> <div style="$sel"> <table class="default_table"> <tr> <td class="hide600"></td> <td class="hide720"></td> <td><a href="$LINK"><img class="block16 community_screen_mini" src="/ono/osr/images/icons/crystal/32x32/$ICON.png" alt=""></a></td> <td class="hide1000 p5"><a href="$LINK" class="$class">$TEXT</a></td> <td class="hide600"></td> <td class="hide720"></td> </tr> </table> </div> </td> ~
menu_pack();
Glue menu elements
ONO::ToolBox::Screen->menu_pack( $MENU, $SUB, $SUB_PHONE, $SIZE );
submenu();
Generate a submenu item.
ONO::ToolBox::Screen->submenu( $LINK, $ICON, $TEXT, $class, $sel );
returns: qq~<td class="nowrap p0" onclick="window.location='$LINK';"> <div class="pad10_2" style="$sel"> <a href="$LINK" class="$class">$TEXT</a> </div> </td> ~
user();
The user pulldown menu.
ONO::ToolBox::Screen->user( $db, $community, $LINK, $LOGOUT, $username, $logout );
returns: qq~<td><a href="$LINK"><img class="block16 community_screen_mini ml10" src="/ono/osr/images/icons/crystal/32x32/kdm/user_male.png" alt=""></a></td> <td class="hide800"><a href="$LINK" class="col3">$username</a></td> <td> <div class="rel" style="z-index:999" onmouseover ="onojs_block('ono_screen_user_color');" onmouseout ="onojs_hide('ono_screen_user_color');"> <img class="block16 community_screen_mini ml10" src="/ono/osr/images/icons/crystal/32x32/actions/run.png" alt=""> <div id="ono_screen_user_color" class="abs hide"> <div class="box_white small rel radius5" style="top:5px"> $ADMIN <div><a href="/ono/desk/black/" class="col3">Black</a></div> <div><a href="/ono/desk/red/" class="col3">Red</a></div> <div><a href="/ono/desk/green/" class="col3">Green</a></div> <div><a href="/ono/desk/blue/" class="col3">Blue</a></div> <div><a href="/ono/desk/purple/" class="col3">Purple</a></div> <div><a href="/ono/desk/grey/" class="col3">Grey</a></div> </div> <img class="block16 abs" src="/ono/osr/images/arrows/nuvola/white32shadow/nav_up.png" style="left:10px;top:-10px" alt=""> </div> </div> </td> <td><a href="$LOGOUT"><img class="block16 community_screen_mini ml10" src="/ono/osr/images/icons/ono/32x32/logout.png" alt=""></a></td> <td class="hide800" style="padding-right:10px"><a href="$LOGOUT" class="col3">$logout</a></td> ~
Sub-Modules
none