Exemplo n.º 1
0
<?php

//Se incluye la clase que maneja la combinación masiva
include "{$ruta_raiz}/radsalida/masiva/OpenDocText.class.php";
//Se abre archivo de insumo para lectura de los datos
$fp = fopen("{$ruta_raiz}/bodega/masiva/{$archInsumo}", 'r');
if ($fp) {
    $contenidoCSV = file("{$ruta_raiz}/bodega/masiva/{$archInsumo}");
    fclose($fp);
} else {
    exit("No hay acceso para crear el archivo {$archInsumo}");
}
$accion = false;
$odt = new OpenDocText();
//Modo debug en false, para pruebas poner true y saldran mensajes de lo que está pasando con la combinacion
$odt->setDebugMode(false);
//$odt->debug = true;
//Se carga el archivo odt Original
$odt->cargarOdt("{$ruta_raiz}/bodega/masiva/{$arcPlantilla}", $arcPlantilla);
$odt->setWorkDir(WORKDIR);
$accion = $odt->abrirOdt();
if (!$accion) {
    die("<center>\n          <table class='borde_tab'>\n            <tr>\n              <td class='titulosError'>\n                Problemas en el servidor abriendo archivo ODT para combinaci&oacute;n.\n              </td>\n            </tr>\n          </table>");
}
$odt->cargarContenido();
//Se recorre el archivo de insumo
foreach ($contenidoCSV as $line_num => $line) {
    if ($line_num == 4) {
        //Esta línea contiene las variables a reemplazar
        $cadaVariable = explode(',', $line);
    } else {
 include "{$ruta_raiz}/radsalida/masiva/OpenDocText.class.php";
 define('WORKDIR', '../../bodega/tmp/workDir/');
 define('CACHE', WORKDIR . 'cacheODT/');
 //Se abre archivo de insumo para lectura de los datos
 $fp = fopen("{$ruta_raiz}/bodega/masiva/{$archInsumo}", 'r');
 if ($fp) {
     $contenidoCSV = file("{$ruta_raiz}/bodega/masiva/{$archInsumo}");
     fclose($fp);
 } else {
     exit("No hay acceso para crear el archivo {$archInsumo}");
 }
 $accion = false;
 $odt = new OpenDocText();
 //Se establede el modo Debug, poner en true para pruebas y muestra mensajes de lo que va ocurriendo
 if ($krd == 'JOHNNYPRUEBAS') {
     $odt->setDebugMode(true);
 } else {
     $odt->setDebugMode(false);
 }
 //Se carga el archivo odt Original
 $odt->cargarOdt("{$ruta_raiz}/bodega/masiva/{$arcPlantilla}", $arcPlantilla);
 $odt->setWorkDir(WORKDIR);
 $accion = $odt->abrirOdt();
 if (!$accion) {
     die("<CENTER><table class=borde_tab><tr><td class=titulosError>Problemas en el servidor abriendo archivo ODT para combinaci&oacute;n.</td></tr></table>");
 }
 $odt->cargarContenido();
 //Se recorre el archivo de insumo
 foreach ($contenidoCSV as $line_num => $line) {
     //En el archivo de Insumo la línea 4 contiene el nombre de las variables
     if ($line_num == 4) {