Odyssey
servindex.prg
1 <?php
2  $monLibrary= dirname(__FILE__) . "/../library";
3  require_once("$monLibrary/cu_top.i");
4  require_once("$monLibrary/ck_hticket.i");
5 
6  if (!CheckPerm($link, $Hu, basename($_SERVER['SCRIPT_NAME']), $_SERVER['REMOTE_ADDR'])) {
7  // ** Permissions failed
8  // ** redirect to new page
9  header("Location: /hcuadm/hcu_noperm.prg");
10  exit;
11  }
12 
13 $dms_ok=array('rowid'=>'string','lb'=>'string');
14 dms_import($dms_ok);
15 
16 $lb_show = (isset($lb) && $lb) != "" ? $lb : "";
17 ?>
18 <html>
19  <head>
20  <title>HomeCU Credit Union Maintenance</title>
21  <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
22  </head>
23  <frameset cols="170,*" frameborder="YES" border="1" framespacing="0" rows="*">
24  <frame name="menu" src="serv_menu.prg?rowid=<?php echo $rowid; ?><?php echo "$lb_show"; ?>">
25  <?php
26  // $infourl is built with the HTTP_HOST value in cu_top.i, this will either be localhost:8000
27  // for dev or my.homecu.net for production odyssey.
28  if (isMammothServer($rowid)) { ?>
29  <frame name="CONTENT" src="https://<?php echo $rowid; ?>.homecu.net/hcuadm/culist">
30  <?php
31  } else { ?>
32  <frame name="CONTENT" src="<?php echo $infourl; ?>/hcuadm/culist.prg">
33  <?php
34  }?>
35  </frameset>
36  <noframes>
37  <body bgcolor="#FFFFFF" text="#000000">
38  </body>
39  </noframes>
40 </html>
41