include ("forixinc.php");
include ("ci_util.php");
include ("bkp.php");
include ("www.php");
include ("util.php");
include ("campo.php");
function ci_notavel($rpa,$ses)
{
extract($GLOBALS);
?>
$SQLQuery="SELECT papi.rpi, papi.rca, papi.rmo, papi.num, papi.cha, pas.*, pin.nabr as pi_nome, can.nome as co_nome, ca.nome as ca_nome, mon.nome as mo_nome, mot.tipo as mo_tipo FROM (((((papi INNER JOIN pas ON papi.rpa=pas.rpa) inner join pin on pin.rpi=papi.rpi) inner join can on papi.rco=can.rco) inner join ca on papi.rca=ca.rca) inner join mon on papi.rma=mon.rma) inner join mot on papi.rmo=mot.rmo where papi.rpa=".$rpa." and pas.ses=".$ses." and can.lin=".$linx." and mon.lin=".$linx;
if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result)))
{
$ano=1900+intval($rpa/100000);
?> echo $ano; ?>
if ($zip==$Zip_CDROM)
{
?> echo $RSList["num"]; ?>
}
else
{
?>&c= echo $cmdPAfic; ?>"> echo $RSList["num"]; ?>
}
if ($RSList["rpi"]==0)
{
?> ( echo $titulo[$N_SHAR]; ?>)
}
else
{
?>
&c= echo $cmdPIfic; ?>"> echo $RSList["pi_nome"]; ?>
}
if ($zip!=$Zip_CDROM && ($ano>=1999 || $super_modo>=$Modo_privado))
{
?> &c= echo $cmdCMfic; ?>"> echo $RSList["co_nome"]; ?> echo $RSList["ca_nome"]; ?>
if (strlen($RSList["cha"])>0)
{
?> ( echo $RSList["cha"]; ?>)
}
?>
&c= echo $cmdCMfic; ?>"> echo $RSList["mo_nome"]; ?> echo $RSList["mo_tipo"]; ?>
}
else
{
?> echo $RSList["co_nome"]; ?> echo $RSList["ca_nome"]; ?>
echo $RSList["mo_nome"]; ?> echo $RSList["mo_tipo"]; ?>
}
?> echo $RSList["tim"]; ?>
echo $RSList["med"]; ?>
}
?> |
return $function_ret;
}
function CIfic($rci)
{
extract($GLOBALS);
fxhead("Forix: ".$ci_nome);
$SQLQuery="SELECT ci.*, nc.cpais FROM nc inner join ci on nc.rnc=ci.rnc where ci.rci=".$rci;
if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result)))
{
tab_ini();
tab_bar(2);
$rnc=$RSList["rnc"];
?>
if ($zip!=$Zip_CDROM)
{
www_logo($REF_NC,$rnc);?> echo $ci_nome; ?>
}
else
{
?> echo $ci_nome; ?>
}
?> |
tab_bar(4);
tab_bor();
?>
echo $titulo[$N_PERI]; ?> echo $RSList["perim"]/10; ?> m
|
echo $titulo[$N_GPRIS]; ?> echo $RSList["ngp"]; ?>
if ($RSList["ngp"]>0)
{
if ($RSList["rgpi"]==$RSList["rgpf"])
{
?> ( echo 1900+intval($RSList["rgpi"]/100); ?>)
}
else
{
?> ( echo 1900+intval($RSList["rgpi"]/100); ?> - echo 1900+intval($RSList["rgpf"]/100); ?>)
}
}
?> | |
tab_bor();
?>
// Novos mapas ?
$SQLQuery="SELECT fotos.foto FROM fotos WHERE fotos.ref=".$rci." and fotos.cref=".$REF_CI;
if (($result = mysql_query($SQLQuery)) and ($RSFoto = mysql_fetch_array($result)))
{
?>" ALT=" echo $titulo[$N_CIMAP]; ?>">
}
else
{
?>
}
?> |
// Comments
if ($zip!=$Zip_CDROM)
{
$SQLQuery="Select notes.id, notes.titulo, notes.texto, contactos.copynote FROM notes, contactos Where notes.lin=".$lin." and notes.cref=".$REF_CI." and notes.ref=".$rci." and notes.page=0 and notes.tipo=".$No_tipo_S." and notes.modo<=".$super_modo." and notes.autor=contactos.sig order by notes.dat desc";
if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0)
{
while ($RStriv= mysql_fetch_array($result))
{
tab_bor();
?> echo $RStriv["texto"]; ?> ( echo $RStriv["copynote"]; ?>)
if ($super_modo==$Modo_total)
{
?> [&c=14">Edit]
}
?> |
|
}
}
// A flying lap with...
$SQLQuery="SELECT notes.id, notes.titulo, notes.texto, contactos.copynote FROM notes inner join contactos on contactos.sig=notes.autor Where notes.lin=".$lin." and notes.cref=".$REF_CI." and notes.ref=".$rci." and notes.page=1 and notes.tipo=".$No_normal." and notes.modo<=".$super_modo." order by notes.dat desc";
if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0)
{
$n=0;
while($RStriv= mysql_fetch_array($result) and ($n==0))
{
tab_bor();
?> echo $titulo[$N_AFLW]; ?> "> echo $RStriv["titulo"]; ?> echo $RStriv["copynote"]; ?> |
echo $RStriv["texto"]; ?>
if ($super_modo==$Modo_total)
{
?> [&c=14">Edit]
}
?> |
|
if ($super_modo!=$Modo_total)
{
$n=1;
}
}
}
}
// Records
if ($RSList["ngp"]>0)
{
tab_bor();
?>
echo $titulo[$N_RECS]; ?> |
|
echo $titulo[$N_WIN]; ?> |
echo $titulo[$N_POLE]; ?> |
echo $titulo[$N_FLAP]; ?> |
echo $titulo[$N_YEAR]; ?>
echo $titulo[$N_NUMB]; ?>
echo $titulo[$N_DRIV]; ?>
echo $titulo[$N_CAR]; ?>
echo $titulo[$N_ENG]; ?>
echo $titulo[$N_TIME]; ?>
km/h
|
ci_notavel($RSList["p_rec"],1);
ci_notavel($RSList["g_rec"],2);
ci_notavel($RSList["v_rec"],3);
?>
|
}
if ($zip!=$Zip_CDROM)
{
Bkp($REF_NC,$rnc,$lin);
www($REF_NC,$rnc);
}
}
tab_fim();
fxtail();
return $function_ret;
}
function CIlis()
{
extract($GLOBALS);
fxhead("Forix: Circuits versions");
$SQLQuery="SELECT ci.*, truncate(ci.rci/100,0)+1900 as ano, ncn.nome as nc_nome FROM ncn inner join ci on ncn.rnc=ci.rnc where ncn.lin=".$lin." order by ncn.nome,ci.rci";
if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0)
{
tab_ini();
tab_bar(2);
?> echo $titulo[$N_CIRCS]; ?> |
tab_bar(4);
tab_bor();
?>
echo $titulo[$N_ASEQ]; ?> |
echo $titulo[$N_NAME]; ?> |
echo $titulo[$N_YEAR]; ?> |
echo $titulo[$N_PERI]; ?> |
$seq=0;
$rci=0;
$BGC=$TR2_BGC;
while ($RSList= mysql_fetch_array($result))
{
if ($BGC==$TR1_BGC)
{
$BGC=$TR2_BGC;
}
else
{
$BGC=$TR1_BGC;
}
?>
include ("seq.php");
include ("ci_nome.php"); ?>
echo $RSList["ano"]; ?> |
echo $RSList["perim"]/10; ?> |
}
?>
|
}
tab_fim();
fxtail();
return $function_ret;
}
function CIlap()
{
extract($GLOBALS);
$pub_part=0;
fxhead("Forix: ".$titulo[$N_AFLW]);
tab_ini();
tab_bar(2);
?> echo $titulo[$N_AFLW]; ?> |
tab_bar(4);
/*
tab_bor();
?>
echo $titulo[$N_ASEQ]; ?> |
echo $titulo[$N_CIRC]; ?> |
Version |
Language |
$seq=0;
$BGC=$TR2_BGC;
// $fs is of type "Scripting.FileSystemObject"
$f=readfile($base_dir."/txt/ci");
foreach (;
// unknown filesystem method as $item)
{
$nome=$item->name;
$i2=(strpos(1,$nome,"_") ? strpos(1,$nome,"_")+1 : 0);
$rrci=intval(substr($nome,0,$i2-1))-190000;
$ling=intval(substr($nome,$i2+1-1,1));
if ($BGC==$TR1_BGC)
{
$BGC=$TR2_BGC;
}
else
{
$BGC=$TR1_BGC;
}
?>
include ("seq.php"); ?>
echo CInome($rrci); ?> |
echo intval($rrci/100)+1900; ?> |
echo $Lingua[$ling]; ?> |
} ?> |
*/
tab_fim();
fxtail();
return $function_ret;
}
$rci=intval(get_arg("r"));
$cmd=intval(get_arg("c"));
if ($cmd==$cmdCIfic)
{
log_page($REF_CI,$rci,$cmd);
$ci_nome= CInome($rci);
CIfic($rci);
}
else
if ($cmd==$cmdCIlis)
{
CIlis();
}
else
if ($cmd==91)
{
CIlap();
}
?>