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="https://kirps.com" target="_blank" class="col6">Jos KIRPS</a> & <a href="https://joopita.com" target="_blank" class="col6">The JOOPITA Project</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 pad5_2_800" style="$sel"> <a href="$LINK" class="$class">$TEXT</a> </div> </td> ~
user();
Username + logout button
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><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