Odyssey
mcu_menu.prg
1 <?php
2  $monLibrary= dirname(__FILE__) . "/../library";
3  require_once("$monLibrary/cu_top.i");
4  require_once("$monLibrary/ck_hticket.i");
5 
6  cu_header("Credit Union Menu");
7 
8  if (!CheckPerm($link, $Hu, basename($_SERVER['SCRIPT_NAME']), $_SERVER['REMOTE_ADDR'])) {
9  // ** Permissions failed
10  // ** redirect to new page
11  header("Location: /hcuadm/hcu_noperm.prg");
12  exit;
13  }
14 
15 $dms_ok=array('rowid'=>'string','vc'=>'string','wc'=>'string');
16 dms_import($dms_ok);
17 
18 
19 
20  $sql = "select upper(user_name) as cu, name, system_options, date_live
21  from cuinfo
22  where user_name = '$rowid'";
23  $sql_rs = db_query($sql, $dbh);
24  $sql_row = db_fetch_array($sql_rs, 0);
25  $list_cu = trim($sql_row['cu']);
26  $list_name = trim($sql_row['name']);
27  $system_options = $sql_row['system_options'];
28 
29  // Odyssey link modification
30  if (strpos($wc, "localhost") !== false) {
31  $serverlink = "$infourl/hcuadm"; // Use the value created in cu_top.
32  $prg = ".prg";
33  $mnulink = "<a href='$produrl/banking/hcuLogin.prg?cu=" . strtoupper($rowid) . "' target='_blank'>login</a>";
34  } else if (isMammothServer($wc)) { // Mammoth
35  $liveBatch = ($system_options & $SYS_TYPE_BATCH) ? "hcubin7" : "hculive7";
36  $mnulink = "<a href='https://${wc}.homecu.net/{$liveBatch}/hcuLogin?cu=" . strtoupper($rowid) . "' target='_blank'>login</a>";
37  $serverlink = "https://$wc.homecu.net/hcuadm";
38  $prg = "";
39  } else { // Odyssey
40  $serverlink = "https://$wc/hcuadm";
41  $prg =".prg";
42  $mnulink = "<a href='$produrl/banking/hcuLogin.prg?cu=" . strtoupper($rowid) . "' target='_blank'>login</a>";
43  }
44 
45  $lbstr = "";
46  $lbstr .= ($system_options & $SYS_TYPE_BATCH ? "Batch" : "");
47  $lbstr .= ($system_options & $SYS_TYPE_LIVE ? (strlen($lbstr) > 0 ? " / " : "") . ($system_options & $SYS_TYPE_LIVE ? "Live" : "") : "");
48  $lbstr .= ($system_options & $SYS_TYPE_ASP ? (strlen($lbstr) > 0 ? " / " : "") . ($system_options & $SYS_TYPE_ASP ? "ASP" : "") : "");
49  $lbstr .= ($system_options & $SYS_TYPE_IVR ? (strlen($lbstr) > 0 ? " / " : "") . ($system_options & $SYS_TYPE_IVR ? "IVR" : "") : "");
50  $lbstr .= ($system_options & $SYS_TYPE_VOIP ? (strlen($lbstr) > 0 ? " / " : "") . ($system_options & $SYS_TYPE_VOIP ? "VOIP" : "") : "");
51  $lbstr .= ($system_options & $SYS_TYPE_WEBONLY ? (strlen($lbstr) > 0 ? " / " : "") . ($system_options & $SYS_TYPE_WEBONLY ? "Web Only" : "") : "");
52  $lbstr .= ($system_options & $SYS_TYPE_UPGRADE ? (strlen($lbstr) > 0 ? " / " : "") . ($system_options & $SYS_TYPE_UPGRADE ? "Upgrade" : "") : "");
53  $lbstr .= ($system_options & $SYS_TYPE_CLOSED ? (strlen($lbstr) > 0 ? " / " : "") . ($system_options & $SYS_TYPE_CLOSED ? "Closed" : "") : "");
54 
55  $sys_typ_upg = $system_options;
56  $sys_typ_upg_test = ($sys_typ_upg & $SYS_TYPE_UPG_TEST ? $SYS_TYPE_UPG_TEST : NULL);
57  $sys_typ_upg_beta = ($sys_typ_upg & $SYS_TYPE_UPG_BETA ? $SYS_TYPE_UPG_BETA : NULL);
58  $sys_typ_upg_comp = ($sys_typ_upg & $SYS_TYPE_UPG_COMP ? $SYS_TYPE_UPG_COMP : NULL);
59 
60  // * Set value whether default banking script will be the 'classic' mindex or the upgrade hcuAccounts
61  $obMbrLogin = 'CLS'; // Classic
62  // ** Determine the Online Banking Desktop Status {Classic, Setup, Beta, Complete}
63  // * They have either no live date -- so they are brand new (they will be upgrade.. Assume beta) OR they have upgrade in process
64 
65  if ($sys_typ_upg_test) {
66  $obDskStatus = 'Odyssey Migration Status: Setup';
67  } elseif ($sys_typ_upg_beta) {
68  $obDskStatus = 'Odyssey Migration Status: Beta';
69  } elseif ($sys_typ_upg_comp) {
70  $obDskStatus = 'Odyssey Migration Status';
71  $obMbrLogin = 'UPG'; // Upgrade
72  } else {
73  $obDskStatus = 'Odyssey Migration Status: Beta';
74  $obMbrLogin = 'UPG'; // Upgrade
75  }
76  ?>
77 
78  <script type="text/javascript" src="https://<?php echo $cloudfrontDomainName; ?>/jquery/js/jquery-1.9.1.min.js"></script>
79  <script type="text/javascript">
80  $(document).ready(function() {
81  $("#loggingLink").click(function() {
82  if ($("#loggingDiv:visible").length == 0)
83  $("#loggingDiv").show();
84  else
85  $("#loggingDiv").hide();
86  return false;
87  })
88  });
89  </script>
90 <?php
91  $lbstr = (strlen($lbstr) > 0 ? $lbstr: "NOT SET");
92 
93  if (isMammothServer($wc)) {
94  $admlink = (trim($wc) == '' ? "" : "<a href='${serverlink}/adm_ticket?username=${rowid}' target='_blank'>Admin</a>");
95  $memlink = (trim($wc) == '' ? "" : "<a href='${serverlink}/mem_ticket?cu=${rowid}' target='_blank'>Banking</a>");
96  } else {
97  $admlink = (trim($wc) == '' ? "" : "<a href='${serverlink}/suAdminUser.prg?cucode=${rowid}&adminuser=${rowid}' target='_blank'>Admin</a>");
98  $memlink = (trim($wc) == '' ? "" : "<a href='${serverlink}/suCuUser.prg?cucode=${rowid}&obMbrLogin=$obMbrLogin' target='_blank'>Banking</a>");
99  }
100  $ivrlink = "https://ivr.homecu.net/hcuadm";
101 
102 print <<<EOF
103  <TABLE WIDTH="94%" BORDER="0" CELLSPACING="0" CELLPADDING="3" ALIGN="CENTER" class="dmsbg"><tr><td>
104  <TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="2" ALIGN="CENTER" bgcolor=white>
105  <TR><TD ALIGN="CENTER" CLASS='bar' nowrap><a href="$infourl/hcuadm/cuilist.prg" target="_parent" class="title_link">Credit Union Menu</a></TD></TR>
106  <tr><td class='hdr' nowrap>
107 <a href="$infourl/hcuadm/cuview.prg?user_name=$rowid&wc=$wc" target="CONTENT">$rowid</a>
108 &nbsp;&nbsp; $admlink &nbsp;&nbsp; $memlink</td></tr>
109  <tr><td class='dtl'>( $lbstr ) $vc <br>
110  $list_name</td></tr>
111  <tr><td class='hdr'>Status:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;( <a href="$infourl/hcuadm/servindex.prg?rowid=$wc" target="_top"> $wc </a>) &nbsp;&nbsp;&nbsp; $mnulink</td></tr>
112  <tr><td class='hdr'>$obDskStatus</td></tr>
113  <TR><TD CLASS='dtl' NOWRAP>
114 EOF;
115 if (($system_options & $SYS_TYPE_BATCH) > 0) {
116 print <<<EOF
117  <a href="$serverlink/tfiles/$rowid/public_html/status.txt" target="CONTENT">Last</a>&nbsp;&nbsp;
118  <a href="$serverlink/tfiles/$rowid/public_html/status.old.txt" target="CONTENT">Old</a>&nbsp;&nbsp;
119  <a href="$serverlink/tfiles/$rowid/public_html/status.older.txt" target="CONTENT">Older</a><br>
120  <a href="$serverlink/files/$rowid/admin/status.html" target="CONTENT">HTML</a>&nbsp;&nbsp;
121  <a href="$serverlink/html_hist{$prg}?rowid=$rowid" target="CONTENT">HTML History</a><br>
122 EOF;
123 }
124 // 1/25/2018 replace Web Stats with a new script: user list.
125  $webStatsOrUserListLink = isMammothServer($wc) ?
126  "<a href='$serverlink/files/httpd/hcupriv/WEBLOG$list_cu.html' target='CONTENT'>Web Stats</a><br>" :
127  "<a href='$serverlink/mUserList.prg?cu=$rowid' target='CONTENT'>User List</a><br>";
128 print <<<EOF
129  <a href="$serverlink/tlogs{$prg}/$rowid/stmnt/logs" target="CONTENT">E-stmt</a>&nbsp;&nbsp;
130  <a href="$serverlink/stmt_hist{$prg}?rowid=$rowid" target="CONTENT">E-History</a><br>
131  {$webStatsOrUserListLink}
132 EOF;
133 if (($system_options & $SYS_TYPE_BATCH) > 0) {
134 print <<<EOF
135  <a href="$serverlink/tlines/$rowid/tmp/exportid.log" target="CONTENT">Export Log</a>&nbsp;&nbsp;
136  <a href="$serverlink/tr_export{$prg}?user_name=$rowid&wc=$wc" target="CONTENT">Reset Export IDs</a><br>
137 EOF;
138 }
139 print <<<EOF
140 </td></tr>
141  <tr><td class='hdr'>Actions:</td></tr>
142  <TR><TD CLASS='dtll' NOWRAP>
143 EOF;
144 if (($system_options & $SYS_TYPE_BATCH) > 0) {
145 print <<<EOF
146  <a href="$serverlink/tr_hist{$prg}?user_name=$rowid&wc=$wc" target="CONTENT">Truncate History</a><br>
147  <a href="$serverlink/restart{$prg}?cu=$rowid" target="CONTENT">Upload Restart</a><br>
148  <a href="$serverlink/uplremove{$prg}?cu=$rowid" target="CONTENT">Remove Upload File</a><br>
149 EOF;
150 }
151  $cu_name = urlencode($list_name);
152 print <<<EOF
153  <a href="$serverlink/unlockbulk{$prg}?cu=$rowid" target="CONTENT">Unlock Members</a><br>
154  <a href="$serverlink/setverifybulk{$prg}?cu=$rowid" target="CONTENT">Set Verify Email</a><br>
155  <a href="$serverlink/cuStatus{$prg}?rowid=$rowid" target="CONTENT">Change Online Status</a><br>
156 EOF;
157  if (($system_options & $SYS_TYPE_LIVE) > 0) {
158  print "<a href='$serverlink/resetPktstamp{$prg}?cu=$rowid' target='CONTENT'>Reset Packet Stamps</a><br>";
159  }
160 print <<<EOF
161 <hr width=180>
162  <a href="$serverlink/MonPass{$prg}?&rowid=$rowid" target="CONTENT">CU Master Password</a><br>
163  <a href="$serverlink/AdminProg{$prg}?&rowid=$rowid&cu_name=$cu_name" target="CONTENT">CU Admin Programs</a><br>
164 
165 EOF;
166  if (($system_options & $SYS_TYPE_LIVE) > 0) {
167  if ($wc == "www3" || $wc == "www6") {
168  // ** ONLY SHOW FOR www3/www6
169  print "<a href=\"$serverlink/applianceSettings?rowid=$rowid\" target=\"CONTENT\">Appliance Settings</a><br>";
170  }
171  print "<a href='$serverlink/packetdump{$prg}?&Fs=" . strtoupper($rowid) . "' target='packet'>Packet Tester</a><br>";
172  }
173 print <<<EOF
174 </td></tr>
175 EOF;
176 
177 if (isMammothServer($wc)) {
178  echo "
179  <TR><TD CLASS='dtll' NOWRAP>
180  ";
181 } else {
182 
183 echo "
184  <tr><td class=\"hdr\">Migration</td></tr>
185  <tr><td class=\"dtll\" nowrap>
186  <a href=\"$serverlink/ody_migr_client.prg/ody_migr_client.prg?cu=$rowid\" target=\"CONTENT\">Import Mammoth Data</a><br>
187  <hr width=180>
188 ";
189 }
190 
191 print <<<EOF
192  <a href="$infourl/hcuadm/cuinfoedit.prg?user_name=$rowid" target="CONTENT">CU Information</a><br>
193  <a href="$serverlink/cumntc{$prg}?&action=fetch&rowid=$rowid" target="CONTENT">Home Banking</a><br>
194  <a href="$infourl/hcuadm/cuissues_report.prg?user_name=$rowid" target="CONTENT">View $list_cu Jobs</a><br>
195  <a href="$infourl/hcuadm/cuissues_edit.prg?user_name=$rowid" target="CONTENT">New Job</a><br>
196  <a href="$infourl/hcuadm/upgrade_svs.prg?user_name=$rowid" target="CONTENT">Upgrade Service</a><br>
197  <a href="$ivrlink/ivr_mntc?action=read&rowid=$rowid" target="CONTENT">IVR Maintenance</a><br>
198  <a href="#" id="loggingLink">Logging</a><br>
199  <div id="loggingDiv" style="display:none; margin-left: 15px;">
200  <a href="$serverlink/loggingReport{$prg}?cu=$rowid" target="CONTENT">Vendor Logging</a><br>
201  <a href="$serverlink/hcuRDCStatus{$prg}?cu=$rowid" target="CONTENT">RDC Logging</a><br>
202  <a href="$serverlink/hcuLoginsReport{$prg}?cu=$rowid" target="CONTENT">Member Logins Summary</a><br>
203  </div>
204  <hr width=180>
205  </td></tr>
206  <tr><td class='hdr'>
207  <span style='font-size:1.2em; font-weight:bold'>Site Configuration</span>
208  </td></tr>
209  <tr><td class='dtll' nowrap>
210  <a href="$serverlink/siteSettings{$prg}?&user_name=$rowid" target="CONTENT">Settings</a><br>
211 EOF;
212  if (!isMammothServer($wc)) {
213  print "<a href=\"$serverlink/mFeatureMnu.prg?&user_name=$rowid\" target=\"CONTENT\">Banking Menu</a><br>";
214  }
215 print <<<EOF
216  <a href="$serverlink/siteSetColor{$prg}?&user_name=$rowid" target="CONTENT">Branding</a><br>
217  <a href="$serverlink/ContentMntc{$prg}?&user_name=$rowid&cu_name=$cu_name" target="CONTENT">Custom Content</a><br>
218 EOF;
219  if (!isMammothServer($wc)) {
220  print "<a href=\"$serverlink/cEstmntMntc.prg?cu=$rowid\" target=\"CONTENT\">eStatement Content</a><br>";
221  }
222 print <<<EOF
223  <a href="$serverlink/cutrustdetail{$prg}?user_name=$rowid" target="CONTENT">Trusted Details</a><br>
224 EOF;
225  if (isMammothServer($wc)) {
226  print "<a href=\"$serverlink/lnapp.view?&user_name=$rowid\" target=\"CONTENT\">Online Apps</a><br>";
227  } else {
228  print "<a href=\"$serverlink/lnapp.prg?&user_name=$rowid\" target=\"CONTENT\">Online Apps</a><br>";
229  }
230 print <<<EOF
231 
232  <hr width=180>
233  <a href="$infourl/hcuadm/servindex.prg?rowid=$wc" target="_parent">CU List on $wc</a><br>
234  <a href="$infourl/hcuadm/cuilist.prg" target="_parent">Credit Union List</a><br>
235  </td></tr>
236  </table>
237  </td></tr></table>
238 EOF;
239 
240  cu_footer();