<?php
date_default_timezone_set('America/Argentina/Buenos_Aires');
global $w_fecha; 
global $w_fecha_dmy;
global $w_hora;

$w_fecha = date("Y-m-d");
$w_fecha_dmy = date("d/m/Y"); 

/*// Si se quiere correr para otra fecha 
$w_fecha = '2017-09-01';
$w_fecha_dmy = '01/09/2017';
*/
$w_hora = date("Y-m-d H:i:s"); 
echo "\n", $w_hora; 
echo " - Inicio del Proceso\n";   

$connection = new PDO('dblib:host=192.168.10.15;dbname=Fidelitas;charset=utf8','sa','KraDQlo');

$w_hora = date("Y-m-d H:i:s"); 
echo "\n", $w_hora;  

$stmt  = $connection->prepare("EXEC balances_a_informix '$w_fecha'");
$stmt->setFetchMode(PDO::FETCH_OBJ); 
if ($stmt) {
  $stmt->execute();
}

$balances = $stmt->fetchAll();
$file = '';
foreach($balances as $info){
        $line =
        trim($info->id_balance) . '|' .
        trim($info->cuit) . '|' .
        trim($info->codigo) . '|' .
        trim($info->fecha_balance) . '|' .
        trim($info->bal_manifestacion) . '|' .
        trim($info->ejercicio) . '|' .
        trim($info->periodo) . '|' .
        trim($info->monedaifx) . '|' .
        trim($info->moneda) . '|' .
        trim($info->ac_cajban) . '|' .
        trim($info->ac_inver) . '|' .
        trim($info->ac_crevta) . '|' .
        trim($info->ac_otrcre) . '|' .
        trim($info->ac_biecam) . '|' .
        trim($info->ac_otract) . '|' .
        trim($info->ac_bietan) . '|' .
        trim($info->ac_total) . '|' .
        trim($info->anc_crevta) . '|' .
        trim($info->anc_otrcre) . '|' .
        trim($info->anc_inver) . '|' .
        trim($info->anc_actint) . '|' .
        trim($info->anc_otract) . '|' .
        trim($info->anc_bieuso) . '|' .
        trim($info->anc_bieusovo) . '|' .
        trim($info->anc_depacu) . '|' .
        trim($info->anc_total) . '|' .
        trim($info->act_total) . '|' .
        trim($info->pc_ctapag) . '|' .
        trim($info->pc_presta) . '|' .
        trim($info->pc_remune) . '|' .
        trim($info->pc_carfis) . '|' .
        trim($info->pc_antcli) . '|' .
        trim($info->pc_otrpas) . '|' .
        trim($info->pc_total) . '|' .
        trim($info->pnc_cuepag) . '|' .
        trim($info->pnc_previ) . '|' .
        trim($info->pnc_presta) . '|' .
        trim($info->pnc_otrpas) . '|' .
        trim($info->pnc_deufis) . '|' .
        trim($info->pnc_total) . '|' .
        trim($info->pas_total) . '|' .
        trim($info->capsoc) . '|' .
        trim($info->resacu) . '|' .
        trim($info->res_noasig) . '|' .
        trim($info->patrimonio) . '|' .
        trim($info->res_vtanet) . '|' .
        trim($info->res_compras) . '|' .
        trim($info->res_cosmer) . '|' .
        trim($info->amortiza) . '|' .
        trim($info->res_gascom) . '|' .
        trim($info->res_gasadm) . '|' .
        trim($info->res_gasfin) . '|' .
        trim($info->res_otrosing) . '|' .
        trim($info->res_otrosegr) . '|' .
        trim($info->res_resfin) . '|' .
        trim($info->res_iva) . '|' .
        trim($info->ganancia) . '|' .
        trim($info->ebitda) . '|' .
        trim($info->ajucap) . '|' .
        trim($info->notas) . '|' .
        trim($info->comentarios) . '|' .
        trim($info->ind_liqcorr) . '|' .
        trim($info->ind_liqseca) . '|' .
        trim($info->ind_endeu) . '|' .
        trim($info->ind_solvencia) . '|' .
        trim($info->ind_endeuact) . '|' .
        trim($info->ind_captra) . '|' .
        trim($info->ind_cappro) . '|' .
        trim($info->ind_invbu) . '|' .
        trim($info->ind_inmact) . '|' .
        trim($info->ind_inmpat) . '|' .
        trim($info->ind_marbru) . '|' .
        trim($info->ind_utilfin) . '|' .
        trim($info->ind_retpat) . '|' .
        trim($info->ind_rotvta) . '|' .
        trim($info->ind_rotvta_dias) . '|' .
        trim($info->ind_rotact) . '|' .
        trim($info->ind_rotact_dias) . '|' .
        trim($info->ind_rentabilidad) . '|' .
        trim($info->ind_indrot) . '|' .
        trim($info->ind_indrot_dias) . '|' .
        trim($info->ind_rotinv) . '|' .
        trim($info->ind_rotinv_dias) . '|' .
        trim($info->ind_prest_pn) . '|' .
        trim($info->ind_prest_vtas) . '|' .
        trim($info->ind_solvencia_pat) . '|' .
        trim($info->fecha_act) . '|' .
        trim($info->usuario) . '|' .
        trim($info->idifx) . '|' .
        trim($info->created) . '|' .
        trim($info->created_by) . '|' .
        trim($info->modified) . '|' .
        trim($info->modified_by) . '|' .
        trim($info->visible) . '|' .
        trim($info->estado) . '|' .
        trim($info->id_padron) . '|' .
        trim($info->ind_ebipas) . '|' .
        trim($info->task_id) . '|' .
        trim($info->c01_codigo) . '|' .
        trim($info->procesado) . '|';
        $file .= $line."\n";
}
$file_txt  = '/var/www/html/fidelitas/public/documentos/temp/ainformix/balances.txt';
file_put_contents($file_txt, $file);
$file_txt2 = '/var/www/html/fidelitas/public/documentos/temp/ainformix/balances_'.date("Ymd").'.txt';
file_put_contents($file_txt2, $file);

$w_hora = date("Y-m-d H:i:s"); 
echo "\n\n", $w_hora; 
echo " - Fin del Proceso\n\n"; 

?>