function get_dyn_content($id)
{
$SQL = new FC_SQL();
$qs = "SELECT content FROM anima09_page p\n\t\t\t\tLEFT JOIN anima09_page_content c \n\t\t\t\t\tON p.anima09_page_id = c.anima09_page_id\n\t \t\t\tWHERE p.anima09_page_id = {$id}";
$SQL->query($qs);
$SQL->next_record();
return $SQL->f(0);
}
function fc_display_product($fc_sku = '', $zid = 1, $lid = 1, $cat = 0)
{
// display one product with options
// doesn't return anything
global $fc_cartid, $flag_persvc, $flag_webshowqty;
global $fc_csym, $fc_webfree, $fc_webflags1;
global $flag_poptskusub, $flag_poptskumod, $flag_poptskusuf, $flag_poptskupre;
global $flag_poptgrpexc, $flag_poptprcrel, $flag_poptgrpqty, $flag_poptgrpreq;
$now = time();
$fco = new FC_SQL();
$fcp = new FC_SQL();
$fcrp = new FC_SQL();
$fcrpl = new FC_SQL();
$fcp->query('select prodsdescr,proddescr,prodaudio,prodvideo,prodsetup,prodprice,' . 'prodsalebeg,prodsaleend,prodpic,prodpicw,prodpich,prodpersvc,prodflag1 ' . 'from prod,prodlang ' . "where prodsku='{$fc_sku}' and prodlsku='{$fc_sku}' and prodsku=prodlsku");
$fcp->next_record();
$flag1 = (int) $fcp->f('prodflag1');
?>
<tr><td align=left valign=top colspan=1>
<table width="100%" cellpadding=0 cellspacing=0 border=0>
<tr><td align=left valign=top colspan=3>
<br>
<?php
if ($fcp->f("prodpic")) {
// show the product picture (if defined)
?>
<img src="<?php
echo $fcp->f("prodpic");
?>
"
width="<?php
echo $fcp->f("prodpicw");
?>
"
height="<?php
echo $fcp->f("prodpich");
?>
"
alt="" align=left>
<?php
}
// end of the product picture
?>
<b><?php
echo stripslashes($fcp->f("prodsdescr"));
?>
:</b>
<?php
echo stripslashes($fcp->f("proddescr"));
?>
<br>
</td></tr>
<tr><td align=left valign=bottom colspan="1">
<?php
if ($fcp->f("prodaudio")) {
?>
<a href="<?php
echo $fcp->f("prodaudio");
?>
"><i><?php
echo fc_text("audiosample");
?>
</i></a><br>
<?php
}
?>
</td><td align=center valign=bottom colspan="1">
<?php
if ($fcp->f("prodvideo")) {
?>
<a href="<?php
echo $fcp->f("prodvideo");
?>
"><i><?php
echo fc_text("videosample");
?>
</i></a><br>
<?php
}
?>
</td><td colspan=1 align=right valign=middle>
</td></tr>
<tr><td align=left valign=middle colspan=3>
<form method=post action="//fishcart/showcart.php?cartid=<?php
echo $fc_cartid;
?>
&zid=<?php
echo $zid;
?>
&lid=<?php
echo $lid;
?>
&product=<?php
echo $fc_sku;
?>
&cat=<?php
echo $cat;
?>
">
<?php
// show the product options; see showcart for a detailed description
$poptqty = 0;
$poptgrp = 0;
// nmb
$poptflag1 = 0;
// nmb
$poptogrp = -1;
// -1 is initial value
$poptgrpcnt = 0;
// # of options per group
$poptgrplst = '';
// : separated list of all represented groups
$fco->query("select poptid,poptname,poptsdescr,poptsetup,poptprice,poptgrp,poptskumod," . "poptflag1 from prodopt where poptsku='{$fc_sku}' order by poptgrp,poptseq");
if ($fco->next_record()) {
$i = 0;
do {
$poptid = (int) $fco->f("poptid");
$poptgrp = (int) $fco->f("poptgrp");
$poptflag1 = (int) $fco->f("poptflag1");
$poptsetup = (double) $fco->f("poptsetup");
$poptprice = (double) $fco->f("poptprice");
$poptname = stripslashes($fco->f("poptname"));
$poptsdescr = stripslashes($fco->f("poptsdescr"));
if ($poptogrp != -1 && $poptogrp != $poptgrp) {
// group rollover check
echo "</select>";
if ($poptflag1 & $flag_poptgrpqty) {
// qty is required
echo ' ' . fc_text("qty") . '<input name="' . $fc_sku . '_' . $poptogrp . '_qty" size=3>' . "\n";
}
if ($poptoflg & $flag_poptgrpreq) {
// option group is required
echo '<input type=hidden name="' . $fc_sku . '_' . $poptogrp . '_req" value=1>' . "\n";
} else {
echo '<input type=hidden name="' . $fc_sku . '_' . $poptogrp . '_req" value=0>' . "\n";
}
echo "<br>\n<select name=\"{$fc_sku}_{$poptgrp}_popt[]\">\n";
if ($poptogrp >= 0) {
$poptgrplst .= "{$poptogrp}:";
}
$poptgrpcnt = 0;
// zero the counter
} elseif (!$i) {
// nmb
echo "<select name=\"{$fc_sku}_{$poptgrp}_popt[]\">\n";
}
if ($poptflag1 & $flag_poptgrpexc) {
$popttype = 'radio';
} else {
$popttype = 'checkbox';
}
// compose composite sku
$csku = '';
if ($poptflag1 & $flag_poptskupre) {
$csku = $fco->f("poptskumod") . $csku;
} elseif ($poptflag1 & $flag_poptskusuf) {
$csku = $csku . $fco->f("poptskumod");
} elseif ($poptflag1 & $flag_poptskumod) {
$csku = ereg_replace($fco->f("poptskusub"), $fco->f("poptskumod"), $csku);
} elseif ($poptflag1 & $flag_poptskusub) {
$csku = $fco->f("poptskumod");
}
/* nmb
echo '<input type='.$popttype.' name="'.$fc_sku.'_'.$poptgrp.
'_popt[]" value='.$poptid.'>'.
$poptname . $poptsdescr .' '.fc_text('reqflag')."<br>\n";
nmb */
// nmb
echo "<option value=\"{$poptid}\"> {$poptname}\n";
if ($poptsetup) {
echo ' ' . fc_text("setup") . sprintf("%s%.2f\n", $fc_csym, $poptsetup);
// nmb sprintf("%s%.2f<br>\n",$fc_csym,$poptsetup);
}
echo ' ' . fc_text("price");
// nmb added if/else below
if ($poptflag1 & $flag_poptprcrel && $poptprice) {
$relflg = '+';
} else {
$relflg = '';
}
if ($poptprice) {
// nmb echo sprintf("%s%.2f<br>\n",$fc_csym,$poptprice);
echo ' ' . $relflg . sprintf("%s%.2f\n", $fc_csym, $poptprice);
} else {
// nmb echo fc_text("nocharge")."<br>\n";
echo ' ' . $relflg . fc_text("nocharge") . "\n";
}
$poptgrpcnt++;
// incr count of options per group
$poptogrp = $poptgrp;
// keep the current group ID
$poptoflg = $poptflag1;
// keep the current group flag set
$i++;
} while ($fco->next_record());
$fco->free_result();
// nmb
if ($i) {
echo "</select>";
}
// always do this stuff for last option group rollover check
if ($poptflag1 & $flag_poptgrpqty) {
// qty is required
echo ' ' . fc_text("qty") . '<input name="' . $fc_sku . $poptgrp . 'qty" size=3><br>' . "\n";
}
if ($poptflag1 & $flag_poptgrpreq) {
// option group is required
echo '<input type=hidden name="' . $fc_sku . '_' . $poptgrp . '_req" value=1>' . "\n";
} else {
echo '<input type=hidden name="' . $fc_sku . '_' . $poptgrp . '_req" value=0>' . "\n";
}
if ($poptgrp >= 0) {
$poptgrplst .= "{$poptgrp}";
}
echo '<input type=hidden name="' . $fc_sku . '_grplst" value="' . $poptgrplst . '">' . "\n";
}
// if product options
?>
</td></tr>
<tr><td align=left valign=middle colspan=1>
<i><?php
echo fc_text("sku");
?>
<?php
echo $fc_sku;
?>
</i>
</td><td align=left valign=middle colspan=1>
<?php
// show the product price
$setup = (double) $fcp->f("prodsetup");
if ($setup) {
echo sprintf("%s %s%8.2f ", fc_text("setup"), $fc_csym, $setup);
}
$prc = '';
if ($fcp->f("prodprice") == 0) {
// free, show alternative text
if (!empty($cat)) {
$prc = $fcs->f("catfree");
}
if (empty($prc)) {
$prc = $fc_webfree;
}
} else {
// not free, check for sale price
if ($fcp->f("prodsalebeg") < $now && $now < $fcp->f("prodsaleend")) {
// on sale
$prc = sprintf("<b>%s %s%8.2f</b>", fc_text("onsale"), $fc_csym, $fcp->f("prodsaleprice"));
} else {
$prc = sprintf("%s %s%8.2f", fc_text("price"), $fc_csym, $fcp->f("prodprice"));
}
}
echo $prc;
if ($flag1 & $flag_persvc) {
//echo ' '.fc_text('periodic');
echo ' ' . $fcp->f('prodpersvc');
}
?>
</td><td align=right valign=middle colspan=1>
<?php
// SHOW THE ADD TO ORDER BUTTON
// with product options, it is no longer feasible to show the qty
// on order, as we don't know which options have been chosen
if ($fc_webflags1 & $flag_webshowqty) {
$qty = "1";
} else {
$qty = "";
}
?>
<input type=text size=3 name=quantity value=<?php
echo $qty;
?>
><input type=submit value="<?php
echo fc_text('shortadd');
?>
">
</td></tr>
</form>
<tr><td align=left valign=bottom colspan=3>
</td></tr>
<?php
// show related products
$fcrp->query("select relprod from prodrel where relsku='{$fc_sku}' order by relseq");
while ($fcrp->next_record()) {
$rsku = $fcrp->f('relprod');
$fcrpl->query("select prodname from prodlang where prodlsku='{$rsku}' " . "and prodlzid={$zid} and prodlid={$lid}");
$fcrpl->next_record();
$pname = strip_tags($fcrpl->f("prodname"));
?>
<tr><td align=left valign=top colspan=3>
<a href="display.php?cartid=<?php
echo $cartid;
?>
&zid=<?php
echo $zid;
?>
&lid=<?php
echo $lid;
?>
&psku=<?php
echo $rsku;
?>
"><?php
echo $pname;
?>
</a><br>
</td></tr>
<?php
}
$fcrp->free_result();
?>
</table>
</td></tr>
<?php
}
function show_countries($zid, $lid, $matchiso, $lang_iso)
{
$ret = NULL;
$fct = new FC_SQL();
$fct->query("select ctrylangciso,ctrylangname from country,countrylang " . "where ctryzid={$zid} and ctrylid={$lid} and ctryactive=1 and " . "ctryiso=ctrylangciso and ctrylangliso='{$lang_iso}' order by ctryseq,ctrylangname");
while ($fct->next_record()) {
$iso = $fct->f('ctrylangciso');
$name = $fct->f('ctrylangname');
if ($matchiso == $iso) {
$chk = ' selected';
} else {
$chk = '';
}
$ret .= "<option value=\"{$iso}\"{$chk}>{$name}</option>\n";
}
$fct->free_result();
return $ret;
}
$cybercash->cccity = "{$billing_city}";
$cybercash->ccstate = "{$billing_state}";
$cybercash->cczip = "{$billing_zip}";
$cybercash->cccountry = "USA";
// submit the charge to CyberCash and parse out the return data
if (!$cybercash->send()) {
$cybercash->errorHandler("Error: no data received back from CyberCash");
}
$POP = $cybercash->POP;
parse_str(ereg_replace("pop.", "", $POP));
if ($status != 'success') {
// get the Web table
$fcw = new FC_SQL();
$fcw->query("select webback,webtext,weblink,webvlink,webalink,webbg,webfree,websort " . "from fishcart where webzid={$zid} and weblid={$lid}");
$fcw->next_record();
$srt = $fcw->f("websort");
$fcw->free_result();
// END OF ESSENTIAL CART DISPLAY CODE FROM LINE 1 TO HERE
?>
<html>
<head>
<link rel="stylesheet" ID href="style.css" type="text/css" />
<title>
</title>
</head>
<body<?php
if ($fcw->f("webback")) {
?>
background="<?php
}
if ($act == "insert" || $act == "update") {
if ($nsm != "" && $nsd != "" && $nsy != "" && $nem != "" && $ned != "" && $ney != "") {
$sdate = mktime(0, 0, 0, $nsm, $nsd, $nsy);
$ndate = mktime(0, 0, 0, $nem, $ned, $ney);
} else {
$sdate = 0;
$ndate = 0;
}
}
$fco = new FC_SQL();
$fcu = new FC_SQL();
if ($act == "insert") {
$fcu->query("select count(*) as cnt from oprod where oprodsku='{$sku}'");
$fcu->next_record();
if ($fcu->f('cnt') == 0) {
$fco->query("insert into oprod (oprodsku,ostart,oend,ozid) " . "values ('{$sku}',{$sdate},{$ndate},{$zoneid})");
}
$fcu->free_result();
} elseif ($act == "update") {
$fco->query("update oprod " . "set oprodsku='{$sku}',ostart={$sdate},oend={$ndate} where oprodsku='{$sku}'");
} elseif ($act == "delete") {
$fco->query("delete from oprod where oprodsku='{$sku}'");
}
$fco->commit();
?>
<p>
The <?php
echo $act;
$zflag1 = 0;
}
$now = time();
// see if this order exists
$fco = new FC_SQL();
$fco->query("select subz,contrib from ohead where orderid='{$cartid}'");
if (!$fco->next_record()) {
header("Location: {$nsecurl}/?cartid={$cartid}&zid={$zid}&lid={$lid}");
}
// if subz=0, no products in the cart
$subz = (int) $fco->f("subz");
// get the language templates
$fcl = new FC_SQL();
$fcl->query("select langgeo,langshow,langordr,langcopy,langterms from lang where langid={$lid}");
$fcl->next_record('langterms');
$geo = $fcl->f("langgeo");
$show = $fcl->f("langshow");
$ordr = $fcl->f("langordr");
$copy = $fcl->f("langcopy");
$lterms = $fcl->f("langterms");
$fcl->free_result();
if (!empty($doit)) {
if ($zflag1 & $flag_zonetcpage) {
// set for inline terms and conditions
$ordr = 'terms.php';
}
$contrib = str_replace("\$", "", $contrib);
$contrib = str_replace(",", "", $contrib);
$c = (double) $contrib;
if ($c < 0) {
$c = (double) 0;
<b><?php
echo fc_text('shipfee');
?>
</b><br />
<?php
if ($allowupdate) {
if ($scnt > 1) {
?>
<select name="shipid" size="1" onChange="submit(); return false;">
<?php
$fcmt = new FC_SQL();
$fcmt->query("select ship.shipid,shipdef,shipdescr " . "from ship,subzship " . "where shipzid={$zid} " . "and shipszid={$subz} " . "and ship.shiplid={$lid} " . "and subzship.shiplid={$lid} " . "and subzship.shipid=ship.shipid " . "and subzship.shiplid=ship.shiplid " . "order by ship.shipid");
while ($fcmt->next_record()) {
if ($curshipid == (int) $fcmt->f("shipid")) {
?>
<option value="<?php
echo $fcmt->f("shipid");
?>
" selected><?php
echo stripslashes($fcmt->f("shipdescr"));
?>
</option>
<?php
} else {
?>
<option value="<?php
echo $fcmt->f("shipid");
?>
"><?php
$cartid = getparam('cartid');
$zid = (int) getparam('zid');
$lid = (int) getparam('lid');
$subz = (int) getparam('subz');
$ccexp_years = (int) getparam('ccexp_years');
$mode = getparam('mode');
// ========== end of variable loading ==========
require_once BITCART_PKG_PATH . 'public.php';
require_once BITCART_PKG_PATH . 'cartid.php';
require_once BITCART_PKG_PATH . 'languages.php';
require_once BITCART_PKG_PATH . 'flags.php';
$fcl = new FC_SQL();
$fcz = new FC_SQL();
$fcz->query("select zonecurrsym,zflag1 from zone where zoneid={$zid}");
if ($fcz->next_record()) {
$csym = stripslashes($fcz->f("zonecurrsym"));
$csym = trim($csym);
$zflag1 = (int) $fcz->f('zflag1');
} else {
$csym = '';
$zflag1 = 0;
}
// get the language templates
$fcl->query("select langterms,langcopy,langordr from lang where langid={$lid}");
$fcl->next_record('langterms');
if (!empty($showscat)) {
$tmpl = stripslashes($fcl->f('langstmpl'));
} else {
$tmpl = stripslashes($fcl->f('langtmpl'));
}
$lterms = $fcl->f('langterms');
$fcp = new FC_SQL();
// check if product exists
$fcu = new FC_SQL();
// update product
$fcw = new FC_SQL();
// web
//$fcc = new FC_SQL; // :VESTIGIAL?: mag 030704 I don't see this used anywhere.
$fcz = new FC_SQL();
// zone
$now = time();
$droot = 'BITCART_PKG_PATH';
// figure out from the addzone* fields which zones must be processed
// accumulate a numeric indexed array $zins
$fcz->query("select zoneid from zone order by zoneid");
while ($fcz->next_record()) {
$zid = (int) $fcz->f('zoneid');
$tzid = (int) getparam('addzone' . $zid);
//$tzid : this zone id, get the value of this zone flag
if ($tzid) {
// if this box was checked
$zins[] = $zid;
// process this zone (add this zone to array of zones to process)
}
}
$z = 0;
while ($zins[$z]) {
// process all selected zones
$zid = $zins[$z];
$proderr = 0;
// the fields are all in the form of name + zoneid
// we recover the language independent fields below
if ($ossem && $ossed && $ossey) {
$ossedate = mktime(23, 59, 59, $ossem, $ossed, $ossey);
} else {
$ossedate = 0;
}
require './admin.php';
require './header.php';
require_once BITCART_PKG_PATH . 'flags.php';
$fcp = new FC_SQL();
$fpo = new FC_SQL();
$fcg = new FC_SQL();
if ($act == 'add' || $act == 'update' && !empty($pgrpname)) {
// update group name only if not null
$fcg->query("select count(*) as cnt from prodoptgrp " . "where pgrpzid={$zoneid} and pgrplid={$langid} and pgrpgrp={$poptgrp}");
$fcg->next_record();
$cnt = $fcg->f('cnt');
$fcg->free_result();
// name/rename the option group with the value given
if ($cnt) {
$fcg->query("update prodoptgrp set pgrpname='{$pgrpname}' " . "where pgrpzid={$zoneid} and pgrplid={$langid} and pgrpgrp={$poptgrp}");
} else {
$fcg->query("insert into prodoptgrp (pgrpzid,pgrplid,pgrpgrp,pgrpname) " . "values ({$zoneid},{$langid},{$poptgrp},'{$pgrpname}')");
}
}
if ($act == 'add') {
if ($poptgrp) {
// get flag values from group if it exists
$fpo->query("select poptflag1,poptflag2 from prodopt " . "where poptsku='{$poptsku}' and poptgrp={$poptgrp}");
if ($fpo->next_record()) {
$poptflag1 = $fpo->f("poptflag1");
$poptflag2 = $fpo->f("poptflag2");
if ($esdid == 0) {
echo fc_text('esdnotrans');
echo fc_text('esdcustsvc');
exit;
}
require './pwesd.php';
$now = time();
// increment the download count
$fcesd = new FC_SQL();
$fcesd->query("select esddlcnt,esddlmax,esddlexp,esddlfile from esd " . "where esdid={$esdid} and esdoid='{$pwuid}'");
if (!$fcesd->next_record()) {
echo fc_text('esdnodl');
echo fc_text('esdcustsvc');
exit;
}
$esddlcnt = (int) $fcesd->f('esddlcnt') + 1;
$esddlmax = (int) $fcesd->f('esddlmax');
$esddlexp = (int) $fcesd->f('esddlexp');
$esddlfile = $fcesd->f('esddlfile');
$fcesd->free_result();
if ($esddlcnt > $esddlmax || $now > $esddlexp) {
echo fc_text('esddlmax');
echo fc_text('esdcustsvc');
exit;
}
$fcesd->query("update esd set esddlcnt={$esddlcnt} where esdid={$esdid}");
$fcesd->commit();
$file = substr(strrchr($esddlfile, '/'), 1);
set_magic_quotes_runtime(0);
$fd = fopen($esddlfile, 'rb');
if ($fd) {
$langid = (int) getparam('langid');
// ========== end of variable loading ==========
require './admin.php';
require './header.php';
if (!$zoneid || !$langid) {
?>
A zone or language ID was not selected.
<p>Please click the <a href='self.history.back()'>Back</a> button on your browser
and select a zone. Thank you.
<?php
exit;
}
$fcp = new FC_SQL();
$fcp->query("select zonedescr from zone where zoneid='{$zoneid}' and zonedeflid='{$langid}'");
if ($fcp->next_record()) {
$zone_name = $fcp->f("zonedescr") . "<br>";
$fcp->free_result();
}
?>
<table align=center cellspacing=0 cellpadding=4 bgcolor=#666666 width=650 class="text">
<tr valign="middle" align="center">
<td bgcolor=#ffffff>
<h2>FishCart Reporting Module</h2>
</td>
</tr>
</table>
<hr>
<table align=center class="text">
<tr>
<td>
exit;
}
$max_seq = new FC_SQL();
if ($databaseeng == 'odbc' && $dialect == 'solid') {
$max_seq->query("select seq from auxtext where rownum < 2 order by seq desc");
} elseif ($databaseeng == 'postgres') {
$max_seq->query("select seq from auxtext order by seq desc limit 1,0");
} elseif ($databaseeng == 'mssql') {
$max_seq->query("select top 1 seq from auxtext order by seq desc");
} elseif ($databaseeng == 'oracle') {
$max_seq->query("select seq from auxtext where rownum < 2 order by seq desc");
} elseif ($databaseeng == 'mysql') {
$max_seq->query("select seq from auxtext order by seq desc limit 0,1");
}
$max_seq->next_record();
$seq = $max_seq->f("seq") + 1;
$max_seq->free_result();
$res = $fcc->query("insert into auxtext (" . "seq,loc,title,text) values ({$seq},{$loc},'{$title}','{$text}')");
} elseif ($act == "mod") {
$res = $fcc->query("update auxtext " . "set loc={$loc},title='{$title}', text='{$text}' where rid='{$rid}'");
} elseif ($act == "del") {
$res = $fcc->query("delete from auxtext " . "where rid={$rid}");
} elseif ($act == "seq") {
$i = 0;
while ($i < $scount) {
$seq = (int) getparam('lseq' . $i);
$rid = (int) getparam('link' . $i);
$res = $fcc->query("update auxtext set seq={$seq} where rid='{$rid}'");
$i++;
}
}
echo $vendid;
?>
">
<input type=hidden name=zoneid value="<?php
echo $zoneid;
?>
">
<input type=hidden name=langid value="<?php
echo $langid;
?>
">
Vendor Name: <i>max 80 characters</i><br>
<input name="vendname" size=50 onFocus="currfield='vendor'"
value="<?php
echo $fcv->f("vendname");
?>
"><br>
Vendor Address 1: <i>max 80 characters</i><br>
<input name="vendaddr1" size=50 onFocus="currfield='vendor'"
value="<?php
echo $fcv->f("vendaddr1");
?>
"><br>
Vendor Address 2: <i>max 80 characters</i><br>
<input name="vendaddr2" size=50 onFocus="currfield='vendor'"
value="<?php
echo $fcv->f("vendaddr2");
?>
</td></tr>
<tr><td align="center" bgcolor="#FFFFFF">
<form name="couponmod" method="post" action="couponmod.php">
To modify an existing coupon profile,<br />
select its name from the list and<br />
click <i>Modify Selected Profile</i>.
<br />
<?php
$coupon = new FC_SQL();
$coupon->query("select count(*) as cnt from coupon");
$coupon->next_record();
$len = (int) $coupon->f("cnt");
$coupon->free_result();
?>
<select name="cpnid" size="<?php
echo $len + 1;
?>
"
onChange="document.couponmod.action='couponmod.php';submit();">
<option name=cpnid value="" selected>[no change]</option>
<?php
// query the coupon
$coupon->query("select cpnid,cpnredeem from coupon order by cpnid");
while ($coupon->next_record()) {
?>
<option value="<?php
$st = (int) $fcs->f('cnt') + 1;
$fcs->free_result();
?>
<select name="subzone" size="<?php
echo $st;
?>
" onfocus="currfield='subzsid';"
onChange="submit();">
<option value="" selected="selected">[no change]</option>
<?php
$fcs->query("select subzsid,subzdescr,subzvendid from subzone " . "where subzid={$zoneid} order by subzsid");
while ($fcs->next_record()) {
$vendor = $fcs->f('subzvendid');
$fcz->query("select vendid,vendname from vend where vendid={$vendor}");
$fcz->next_record();
echo '<option value="' . $fcz->f('vendid') . ":" . $fcs->f('subzsid') . '">';
echo $fcz->f('vendname') . " : " . substr($fcs->f('subzdescr'), 0, 30) . '</option>';
$fcz->free_result();
}
$fcs->free_result();
?>
</select>
<p></p>
<input type="hidden" name="zoneid" value="<?php
echo $zoneid;
?>
" />
<input type="hidden" name="langid" value="<?php
echo $langid;
<input type=radio name=pwactive value="0"<?php
if (!$pwactive) {
?>
checked<?php
}
?>
> No<br>
<b>Permitted zone for this user:</b><br>
<select name="pwzone" size="1">
<option value="0">[-- All Zones --]
<?php
$fcz = new FC_SQL();
$fcz->query("select zoneid,zonedescr from zone");
while ($fcz->next_record()) {
$zid = $fcz->f('zoneid');
$zdesc = stripslashes($fcz->f('zonedescr'));
if ($zid == $pwzone) {
echo "<option value=\"{$zid}\" selected>{$zdesc}\n";
} else {
echo "<option value=\"{$zid}\">{$zdesc}\n";
}
}
?>
</select><br>
<input type="hidden" name="action" value="M">
<input type="hidden" name="oldpwuid" value="<?php
echo $pwuid;
?>
">
}
} else {
$notfound = 1;
}
if ($notfound) {
echo '<tr><td align=center valign=middle colspan=4 bgcolor="#FFFFFF">' . 'Order record ' . $orderid . ' not found<br>' . '</td></tr>';
} else {
// notfound
$purchid = $fcohead->f("purchid");
$fccust->query("select * from cust where custid={$purchid}");
if (!$fccust->next_record()) {
echo '<tr><td align=center valign=middle colspan=4 bgcolor="#FFFFFF">' . 'Customer record ' . $purchid . ' not found<p>' . "</td></tr>\n";
} else {
// show the customer record
echo "<tr><td valign=top colspan=2 bgcolor=\"#FFFFFF\"><b>Billing Information</b><p>\n";
echo $fccust->f("custbsal") . ' ' . $fccust->f("custbfname") . ' ' . $fccust->f("custbmname") . ' ' . $fccust->f("custblname") . "<br>\n" . $fccust->f("custbaddr1") . "<br>\n" . $fccust->f("custbaddr2") . "<br>\n" . $fccust->f("custbcity") . ', ' . $fccust->f("custbstate") . ' ' . $fccust->f("custbzip") . '-' . $fccust->f("custbzip4") . ' ' . $fccust->f("custbnatl") . "<br>\n" . $fccust->f("custbacode") . ' ' . $fccust->f("custbphone") . "<br>\n" . $fccust->f("custbemail") . "<br>\n";
echo "</td><td valign=top colspan=2 bgcolor=\"#FFFFFF\"><b>Shipping Information</b><p>\n";
echo $fccust->f("custssal") . ' ' . $fccust->f("custsfname") . ' ' . $fccust->f("custsmname") . ' ' . $fccust->f("custslname") . "<br>\n" . $fccust->f("custsaddr1") . "<br>\n" . $fccust->f("custsaddr2") . "<br>\n" . $fccust->f("custscity") . ', ' . $fccust->f("custsstate") . ' ' . $fccust->f("custszip") . '-' . $fccust->f("custszip4") . ' ' . $fccust->f("custsnatl") . "<br>\n" . $fccust->f("custsacode") . ' ' . $fccust->f("custsphone") . "<br>\n" . $fccust->f("custsemail") . "<br>\n";
echo "<tr><td valign=top colspan=2 bgcolor=\"#FFFFFF\"><b>IP Address:</b>\n";
echo "</td><td valign=top colspan=2 bgcolor=\"#FFFFFF\">" . $fcohead->f('oheadcustip') . "\n";
echo "</td></tr>\n";
echo "</td></tr>\n";
echo "<tr><td valign=top colspan=4 align=center bgcolor=\"#FFFFFF\"><b>Credit Information</b></td></tr>\n";
echo "<tr><td valign=top colspan=2 bgcolor=\"#FFFFFF\">\n";
echo '<b>CC Name</b><br>' . '<b>CC Number</b><br>' . '<b>CC Type</b><br>' . '<b>CC Expiration</b><br>';
echo "</td><td valign=top colspan=2 bgcolor=\"#FFFFFF\">\n";
echo $fccust->f("custccname") . "<br>\n" . $fccust->f("custccnumber") . "<br>\n" . $fccust->f("custcctype") . "<br>\n" . $fccust->f("custccexpmo") . '/' . $fccust->f("custccexpyr") . "<br>\n";
echo "</td></tr>\n";
$fccust->free_result();
}
$fcoline->query("select * from oline where orderid='{$orderid}'");
// ========== end of variable loading ==========
$fcl = new FC_SQL();
$fcp = new FC_SQL();
if (!$zoneid || !$langid) {
echo 'Please click Back and select a zone and/or language. Thank you.';
exit;
}
?>
<h2 align="center">Related Product Maintenance</h2>
<hr />
<?php
$fcp->query("select count(*) as cnt from prodrel where relzone={$zoneid}");
$fcp->next_record();
$pt = $fcp->f('cnt');
$fcp->free_result();
?>
<center>
<table border="0" cellpadding="4" cellspacing="1" bgcolor="#666666" width="650" class="text">
<tr><td colspan="2" align="center" valign="middle" bgcolor="#ffffff">
<a href="index.php?zoneid=<?php
echo $zoneid;
?>
&langid=<?php
echo $langid;
?>
"
onclick="closehelp()">
// ========== end of variable loading ==========
require './public.php';
if (eregi("^[a-z0-9_\\'\\.-]+@[a-z0-9_\\.-]+\\.[a-z]{2,4}\$", $pwlostmail)) {
$pwlostmail = $pwlostmail;
} else {
$pwlostmail = "";
}
if ($pwlostmail == "") {
echo 'no email address found or no valid email address in your request';
exit;
}
// retrieve the record for the email address
$wwkwijt = new FC_SQL();
$wwkwijt->query("SELECT pwactive,pwemail,pwuid,pwpw from pw " . "where pwemail='{$pwlostmail}' limit 1");
$wwkwijt->next_record();
if ($wwkwijt->f("pwuid") == "") {
//no record for this address so we're supposed to build an errormessage here
//let's keep it simple for now
//this will be fixed in the next release
echo "sorry, we don't know the address entered";
exit;
}
if ($wwkwijt->f("pwactive") == "0") {
//login is not active so we're supposed to build an errormessage here
//let's keep it simple for now
//this will be fixed in the next release
echo 'account is currently not active';
exit;
}
$login = $wwkwijt->f("pwuid");
$ww = $wwkwijt->f("pwpw");
echo $show;
?>
">
<input type=hidden name=oldsku value="">
Default Zone:<br>
</td>
</tr>
<tr><td valign=top align=center bgcolor=#ffffff>
<?php
$currz = $fcm->f("zoneid");
$fcz->query("select count(*) as cnt from zone");
$fcz->next_record();
$zt = (int) $fcz->f('cnt');
$fcz->free_result();
$fcz->query("select zoneid,zonedescr from zone order by zoneid");
?>
<select name=zoneid size="<?php
echo $zt + 1;
?>
" onFocus="currfield='zoneid';">
<option value="">[select a zone]
<?php
while ($fcz->next_record()) {
$zid = $fcz->f("zoneid");
if ($currz == $zid) {
echo "<option value=\"{$zid}\" selected>";
$oldzid = $zid;
} else {
<input type="hidden" name="act" value="new" />
<input type="hidden" name="zoneid" value="<?php
echo $zoneid;
?>
" />
<input type="hidden" name="langid" value="<?php
echo $langid;
?>
" />
Select Web Profile for this Associate
<?php
$fcw = new FC_SQL();
$fcw->query("select count(*) as cnt from web " . "where webzid={$zoneid} and weblid={$langid}");
$wt = (int) $fcw->f("cnt");
$fcw->free_result();
$fcw->query("select * from web " . "where webzid={$zoneid} and weblid={$langid} order by webid");
?>
<select name="ascwebid" size="<?php
echo $wt + 1;
?>
">
<option value="0" selected>[no web profile]</option>
<?php
while ($fcw->next_record()) {
?>
<option value="<?php
echo $fcw->f("webid");
?>
</td></tr>
<tr><td align=center bgcolor=#ffffff>
<form name=langmod method="post" action="langmod.php">
To modify an existing language profile,<br>
select its name from the list and<br>
click <i>Modify Selected Profile</i>.
<br>
<?php
$fcl = new FC_SQL();
$fcl->query("select count(*) as cnt from lang " . "where langzid={$zoneid} and langid={$langid}");
$fcl->next_record();
$len = $fcl->f("cnt");
$fcl->free_result();
?>
<select name=lngid size="<?php
echo $len + 1;
?>
"
onChange="document.langmod.action='langmod.php';submit();">
<option value="" selected>[no change]
<?php
$fcl->query("select * from lang " . "where langzid={$zoneid} and langid={$langid} order by langid");
while ($fcl->next_record()) {
?>
<option value="<?php
$fcca = new FC_SQL();
$fcca->query("select * from prodrel where relzone={$zoneid} and relsku='{$relsku}'");
if ($fcca->next_record()) {
$prelf = 1;
} else {
$prelf = 0;
}
$fcca->free_result();
/*fetch prodflag1 from prod table
Any other prodflag1 flag other then prodrel should be added here to keep
prodflag1 complete
*/
$fccb = new FC_SQL();
$fccb->query("select prodflag1 from prod where prodsku='{$relsku}' " . "and prodzid='{$zoneid}'");
$fccb->next_record();
$prodflag1 = (int) $fccb->f("prodflag1");
$fccb->free_result();
$flag1 = 0;
if ($prodflag1 & $flag_noship) {
$flag1 |= (int) $flag_noship;
}
if ($prodflag1 & $flag_notax) {
$flag1 |= (int) $flag_notax;
}
if ($prodflag1 & $flag_novat) {
$flag1 |= (int) $flag_novat;
}
if ($prodflag1 & $flag_useesd) {
$flag1 |= (int) $flag_useesd;
}
if ($prodflag1 & $flag_genesd) {
// ========== end of variable loading ==========
require './admin.php';
require './header.php';
$droot = "BITCART_PKG_PATH";
if ($zoneid == 0) {
?>
Please click the "Back" button on your browser
and select a default zone. Thank you.
<?php
exit;
}
$fcm = new FC_SQL();
$fcm->Auto_commit = 0;
$fcm->query("select count(*) as cnt from master");
$fcm->next_record();
if ($fcm->f("cnt") > 0) {
$fcm->free_result();
$res = $fcm->query("update master set zoneid={$zoneid}");
} else {
$res = $fcm->query("insert into master (zoneid) values ({$zoneid})");
}
if (!$res) {
$fcm->rollback();
echo "<b>Failure updating master: {$res}</b><br>\n";
} else {
$fcm->commit();
echo "Work Committed.<br>\n";
}
?>
<p>
$get_cats = new FC_SQL();
$get_scats = new FC_SQL();
$get_cats->query("select catval,catpath from cat " . "where catzid={$zoneid} and catlid={$lngid} order by catpath");
while ($get_cats->next_record()) {
$patharray = explode(":", $get_cats->f("catpath"));
$catlst = $get_cats->f("catval");
$selected = '';
if ($catlst == $fp_cat) {
$selected = ' selected';
}
print "<option value=\"{$catlst}\"{$selected}>";
while (list($key, $val) = each($patharray)) {
if ($val != "") {
$get_scats->query("select catdescr from cat " . "where catzid={$zoneid} and catlid={$lngid} and catval={$val}");
if ($get_scats->next_record()) {
print '/' . $get_scats->f("catdescr");
$get_scats->free_result();
}
}
}
print "</option>\n";
}
$get_cats->free_result();
?>
</select>
</p>
<p>
Welcome text shown on the front page:<br />
<i>full HTML markup required for proper formatting</i><br />
<input type="checkbox" name="fmtwelcome" value="1" checked> Preserve line break formatting?<br>
<br /><br />
<table border="0" width="500" cellpadding="5">
<tr><td valign="top" colspan="<?php
echo $cats_across;
?>
">
<b><?php
echo fc_text("subcats");
?>
</b>
</td></tr>
<?php
while ($subcats->next_record()) {
$across++;
// starting printing cat results
$catvl = $subcats->f("catval");
$catlogo = $subcats->f("catlogo");
$subdescr = stripslashes($subcats->f("catmast"));
print "<tr><td><a href=\"display.php?cat={$catvl}&zid={$zid}&lid={$lid}&cartid={$cartid}\">";
if ($catlogo != '') {
print "<img src=\"{$catlogo}\" alt=\"{$subdescr}\" border=\"1\">";
}
print "<br>{$subdescr}</a><br /><br /></td></tr>\n";
// new line if across page has been reached
if ($across == $cats_across) {
// print "</tr>\n<tr>";
// reset across page counter;
$across = 0;
}
}
//close table
<p>Please click the "Back" button on your browser
and correct the errors. Thank you.
<?php
exit;
}
$fcl = new FC_SQL();
$fcm = new FC_SQL();
$fct = new FC_SQL();
$fcta = new FC_SQL();
$fctb = new FC_SQL();
$fctc = new FC_SQL();
if ($act == "update") {
//get the old langfppromo
$fcta->query("select langfppromo from lang where langid={$lngid} and " . "langzid={$zoneid}");
if ($fcta->next_record()) {
$oldfppromo = (int) $fcta->f('langfppromo');
}
$fcta->free_result();
// oracle clob
if ($databaseeng == "oracle") {
$res = $fcl->query("update lang set " . "langzid={$langzid}, langdescr='{$langdescr}',langtmpl='{$langtmpl}', " . "langtdsp='{$langtdsp}', langterr='{$langterr}', langshow='{$langshow}', " . "langgeo='{$langgeo}', langordr='{$langordr}', langfinl='{$langfinl}', " . "langproc='{$langproc}', langstmpl='{$langstmpl}',langiso ='{$langiso}', " . "langwelcome='{$langwelcome}',langcopy='{$langcopy}',langterms=empty_clob()," . "langfppromo={$langfppromo} " . "where langid={$lngid}", langterms, $langterms);
} else {
$res = $fcl->query("update lang set " . "langzid={$langzid}, langdescr='{$langdescr}',langtmpl='{$langtmpl}', " . "langtdsp='{$langtdsp}', langterr='{$langterr}', langshow='{$langshow}', " . "langgeo='{$langgeo}', langordr='{$langordr}', langfinl='{$langfinl}', " . "langproc='{$langproc}', langstmpl='{$langstmpl}',langiso ='{$langiso}', " . "langwelcome='{$langwelcome}',langcopy='{$langcopy}',langterms='{$langterms}'," . "langfppromo={$langfppromo} " . "where langid={$lngid}");
}
} elseif ($act == "new") {
$fcm->query('select numlang from master');
$fcm->next_record();
$numl = (int) $fcm->f('numlang');
$fcm->free_result();
$numl += 1;
$fcm->query("update master set numlang={$numl}");
<a href="index.php?zoneid=<?php
echo $zoneid;
?>
&langid=<?php
echo $langid;
?>
" onClick="closehelp()">Return To Central Maintenance Page</a><br>
</td></tr>
<?php
$fckey = new FC_SQL();
$fckey->query("select count(*) as cnt from keyword");
$fckey->next_record();
$ktotal = $fckey->f("cnt");
$fckey->free_result();
?>
<tr><td align=left valign=top colspan=1 bgcolor=#ffffff>
<i>Total keywords logged: <?php
echo $ktotal;
?>
</i>
<p>
Number of Keywords to View:<br>
<i>0 for all keywords</i><br>
<form method=post action="keyqueryrslt.php">
<input name=numkeys size=4>
<input type=hidden name=zoneid value=<?php
$j = 0;
$ccount = 1;
while ($j < $ccount) {
// get the list of categories
$get_cats = new FC_SQL();
$get_scats = new FC_SQL();
$get_cats->query("select catval,catpath from cat " . "where catzid={$zoneid} and catlid={$lid} order by catpath");
while ($get_cats->next_record()) {
$patharray = explode(':', $get_cats->f('catpath'));
$catlst = $get_cats->f('catval');
print '<option value="' . $catlst . '">';
while (list($key, $val) = each($patharray)) {
if ($val != '') {
$get_scats->query("select catdescr from cat " . "where catzid={$zoneid} and catlid={$lid} and catval={$val}");
if ($get_scats->next_record()) {
print '/' . $get_scats->f('catdescr');
$get_scats->free_result();
}
// if( $get_scats->next_record() )
}
// if ($val != '')
}
// while (list($key, $val)=each($patharray))
print '</option>' . "\n";
}
// while ( $get_cats->next_record() )
$get_cats->free_result();
?>
</select>
<?php
$j++;
