* Copyright (C) 2023 SuperAdmin
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see .
*/
/**
* \file cfdimx/admin/webservices.php
* \ingroup cfdimx
* \brief Web Services page of module CFDIMX.
*/
// Load Dolibarr environment
$res = 0;
// Try main.inc.php into web root known defined into CONTEXT_DOCUMENT_ROOT (not always defined)
if (!$res && !empty($_SERVER["CONTEXT_DOCUMENT_ROOT"])) {
$res = @include $_SERVER["CONTEXT_DOCUMENT_ROOT"]."/main.inc.php";
}
// Try main.inc.php into web root detected using web root calculated from SCRIPT_FILENAME
$tmp = empty($_SERVER['SCRIPT_FILENAME']) ? '' : $_SERVER['SCRIPT_FILENAME']; $tmp2 = realpath(__FILE__); $i = strlen($tmp) - 1; $j = strlen($tmp2) - 1;
while ($i > 0 && $j > 0 && isset($tmp[$i]) && isset($tmp2[$j]) && $tmp[$i] == $tmp2[$j]) {
$i--; $j--;
}
if (!$res && $i > 0 && file_exists(substr($tmp, 0, ($i + 1))."/main.inc.php")) {
$res = @include substr($tmp, 0, ($i + 1))."/main.inc.php";
}
if (!$res && $i > 0 && file_exists(dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php")) {
$res = @include dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php";
}
// Try main.inc.php using relative path
if (!$res && file_exists("../../main.inc.php")) {
$res = @include "../../main.inc.php";
}
if (!$res && file_exists("../../../main.inc.php")) {
$res = @include "../../../main.inc.php";
}
if (!$res && file_exists("../../../../main.inc.php")) {
$res = @include "../../../../main.inc.php";
}
if (!$res) {
die("Include of main fails");
}
// Libraries
require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
dol_include_once('/cfdimx/class/admin.class.php');
dol_include_once('/cfdimx/lib/cfdimxadmin.lib.php');
// Translations
$langs->loadLangs(array("errors", "admin", "cfdimx@cfdimx"));
// Access control
if (!$user->admin) {
accessforbidden();
}
// Parameters
$action = GETPOST('action', 'aZ09');
$backtopage = GETPOST('backtopage', 'alpha');
$config = new ConfiguracionCFDIMX($db);
/*
* Actions
*/
if($action == "configuracion"){
$config->webservices_modo = GETPOST('modo_ws');
$config->webservices_passtimbrado = (trim(GETPOST('passtimbrado')) != "" ? trim(GETPOST('passtimbrado')) : -1);
$res = $config->createModoTimbrado($user);
if($res > 0){
setEventMessage("Se actualizo correctamente el Web Services.", 'mesgs');
}else{
setEventMessage($config->errors, 'errors');
}
if($config->webservices_passtimbrado != -1){
// setEventMessage("otro proceso.", 'warnings');
if(GETPOST('num_config') == 0){
$res = $config->createConfigWebServices($user);
if($res > 0){
setEventMessage("Se agrego correctamente la Configuración del Web Services.", 'mesgs');
}else{
setEventMessage($config->errors, 'errors');
}
}else{
$res = $config->updateConfigWebServices($user);
if($res > 0){
setEventMessage("Se actualizo correctamente la Configuración del Web Services.", 'mesgs');
}else{
setEventMessage($config->errors, 'errors');
}
}
}
}
/*
* View
*/
$config->getModosTimbrado();
$config->fetchModoTimbrado();
$form = new Form($db);
$help_url = '';
$page_name = "CFDIMX - Web Services";
$arrayofjs = array('/cfdimx/js/cfdimx.js.php');
llxHeader('', $langs->trans($page_name), $help_url, '', 0, 0, $arrayofjs);
// Subheader
$linkback = ''.$langs->trans("BackToModuleList").'';
print load_fiche_titre($langs->trans($page_name), $linkback, 'title_setup');
// Configuration header
$head = cfdimxAdminPrepareHead();
print dol_get_fiche_head($head, 'cfdimx', $langs->trans($page_name), 0, 'fa-globe');
$head = cfdimxAdminConfigPrepareHead();
print dol_get_fiche_head($head, 'web_services', $langs->trans($page_name), 0, 'fa-globe');
print '
';
print '
';
print '
';
$texto = "registran";
if($config->webservices_modo > 0){
$texto = "actualizan";
$config->getInfoSellos($config->webservices_url);
print '
';
print '';
print '| ';
print '';
print ' ';
print 'Sellos Digitales';
print ' - ';
print $conf->global->MAIN_INFO_SIREN;
print ' ';
print ''.utf8_encode($config->webservices_mensaje_csd).'';
print ' | ';
print '
';
if($config->webservices_file_cer != ""){
print '';
print '| Archivo .cer | ';
print ''.$config->webservices_file_cer.' | ';
print '
';
}
if($config->webservices_file_key != ""){
print '';
print '| Archivo .key | ';
print ''.$config->webservices_file_key.' | ';
print '
';
}
if($config->webservices_file_fecha_inicial != ""){
print '';
print '| Fecha Inicial de Vigencia | ';
print ''.$config->webservices_file_fecha_inicial.' | ';
print '
';
}
if($config->webservices_file_fecha_final != ""){
print '';
print '| Fecha Final de Vigencia | ';
print ''.$config->webservices_file_fecha_final.' | ';
print '
';
}
print '
';
}
$url_plataforma_timbrado = "https://demo.dolibarr.mx/produc/cfdi/";
print '
';
print '
';
print '
Nota: Los Sellos Digitales se '.$texto.' en la plataforma
Gestión de Timbrado, en caso de no contar con los accesos solicitarlos al área de
Soporte de Auribox Consulting.';
print '
';
print '
';
print '
';
// Page end
print dol_get_fiche_end();
llxFooter();
$db->close();