SK
/*server parametreleri*/
$servern=$servername;
$suser=$ulogin;
$spass=$upass;
$spfile=$reportfile;
//Zaman açımı
set_time_limit(30*60);
function writeCellLine($fout,$str){
fputs($fout,sprintf("%-1022.1022s\r\n",$str));
}
function writeLine($fout,$str) {fputs($fout,sprintf("%-1022.1022s\r\n",sprintf("<%d|%s",$c,$hl)));
}
/*rapor dosyasını açalım içinme rapor yaqzıcazzzz*/
$fout=fopen($reportfile,"w");
/*rapor kolonlarin basliklari ne olacak*/
$str[0]="Kodu"; $str[1]="Adı"; $str[2]="Birim";
writeHeaderNames($fout,$str);
$tarih1='D|Başlangıç tarih:|30|2|';
$tarih2='D|Bitiş tarih:|30|2|';
$bolgekodu='S|Bolge kodu:|30|2|';
$kusurat=0;
$str1=sprintf("
select distinct code from invtrans where invtrans.code>'' and
invtrans.fdate>='%s 00:00:00' and invtrans.fdate<='%s 23:59:59'
%s
",
$tarih1,$tarih2,
$bolgekodu? sprintf(" and invtrans.siteid='%s' ",$bolgekodu):"");
echo $str1."\n";
$str2=sprintf("
select ic.code,ic.name,ic.unit from invcards ic
where %s
","SK"
);
echo $str2."\n";
$dbh = ibase_connect ($servern, $suser, $spass,'WIN1254');
if($dbh)
{
//get sales cards...
$sth = ibase_query ($dbh, $str1);
if($sth){
$toplam1=0;
while ($row = ibase_fetch_row ($sth))
//$itvals[$toplam1++]=trim($row[0]);
$itvals[trim($row[0])]=1;
}
$sth = ibase_query ($dbh, $str2);
if($sth)
{
$toplam1=0;
$t_g=0.0; $t_c=0.0;
while ($row = ibase_fetch_row ($sth))
{
if($itvals[trim($row[0])])continue;
writeCellLine($fout,sprintf("%s|%s|%s|||||||||||",
trim($row[0]),trim($row[1]),
trim($row[2])
));
$toplam1++;
}
writeLine($fout,sprintf("Toplam kayıt : %s",$toplam1));
}
ibase_close ($dbh);
}
fclose($fout);
?>