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"); } global $user, $db, $conf; $zona_horaria = $conf->global->CFDIMX_HUSO_HORARIO; date_default_timezone_set($zona_horaria); require_once(DOL_DOCUMENT_ROOT."/core/lib/company.lib.php"); require_once DOL_DOCUMENT_ROOT.'/core/lib/functions.lib.php'; dol_include_once("/cfdimx/class/societe.class.php"); dol_include_once('/cfdimx/class/complementos.class.php'); dol_include_once("/cfdimx/lib/societe.lib.php"); $action = GETPOST('action'); $id = (GETPOST('socid','int') ? GETPOST('socid','int') : GETPOST('id','int')); $domicilio_id = GETPOST('domicilio_id','int') ? GETPOST('domicilio_id','int') : 0; $validaciones = array(); $ban_validaciones = 0; $object = new Societe($db); $object->fetch($id); $societe = new SocieteCFDIMX($db); // print 'llega 1222'; // die; // $num_domicilios = $societe->getNumDomicilios($id); // $list_regimen = $societe->getInfoCatalogos(2); // $list_residecia = $societe->getInfoCatalogos(1); // $list_pais = $societe->getInfoCatalogos(1); // $objCCE = new CCE($db); // $objCCE->fetchheadCCE_receptor($id); $complemento = new ComplementosCFDIMX($db); $titulo_tab = "Domicilio Fiscal"; $arrayofjs = array('/cfdimx/js/societecfdimx.js.php'); llxHeader('', $title, $help_url, '', 0, 0, $arrayofjs); $form = new Form($db); if(GETPOST("action") == "create"){ $societe->info_head_cce = null; $societe->fk_soc = $id; $societe->info_head_cce = array( "motivo_traslado" => GETPOST("motivo"), "tipo_operacion" => 2, "clv_pedimento" => GETPOST("clave_ped"), "no_exportador" => trim(GETPOST("num_exp_conf")), "incoterm" => GETPOST("incoterm"), "observaciones" => trim(GETPOST("observaciones")), "certificadoorigen" => trim(GETPOST("cert_org")), "num_certificadoorigen" => GETPOST("num_cert_org"), "subdivision" => GETPOST("subdivision"), "num_identificacion" => trim(GETPOST("numregidtrib")) ); $res = $societe->createHeadCCE(); if($res > 0){ setEventMessage('Datos de Comercio Exterior guardados correctamente.', 'mesgs'); }else{ setEventMessage($societe->errors, 'errors'); } } if(GETPOST("action") == "update"){ $societe->info_head_cce = null; $societe->fk_soc = $id; $societe->info_head_cce = array( "rowid" => GETPOST("rowid"), "motivo_traslado" => GETPOST("motivo"), "tipo_operacion" => GETPOST("tipo_operacion"), "clv_pedimento" => GETPOST("clave_ped"), "no_exportador" => trim(GETPOST("num_exp_conf")), "incoterm" => GETPOST("incoterm"), "observaciones" => trim(GETPOST("observaciones")), "certificadoorigen" => trim(GETPOST("cert_org")), "num_certificadoorigen" => GETPOST("num_cert_org"), "subdivision" => GETPOST("subdivision"), "num_identificacion" => trim(GETPOST("numregidtrib")) ); $res = $societe->updateHeadCCE(); if($res > 0){ setEventMessage('Datos de Comercio Exterior actualizados correctamente.', 'mesgs'); }else{ setEventMessage($societe->errors, 'errors'); } } $societe->fetchHeadCCE($id); $head = societe_prepare_head($object); print dol_get_fiche_head($head, 'tabCFDIMXSociete', $langs->trans("ThirdParty"), -1, 'company'); $linkback = ''.$langs->trans("BackToList").''; dol_banner_tab($object, 'socid', $linkback, ($user->socid ? 0 : 1), 'rowid', 'nom'); dol_fiche_head(); $head_societe = cfdimxSocietePrepareHead(); print dol_get_fiche_head($head_societe, 'datos_cce', $langs->trans("ThirdParty"), -1, 'contact'); print '
'; print "
"; if((int)DOL_VERSION > 15){ print ''; } print ''; $action = ($societe->info_head_cce["rowid"] > 0 ? "update" : "create"); print ''; print ''; print ''; print ''; print ''; print '
'; print ''; print ' '; print 'Datos del Comprobante'; print '
'; print '
'; print ''; print ''; print ''; print ''; print ''; // print ''; // print ''; // print ''; // print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print '
Motivo de Traslado'; print $form->selectarray('motivo', $complemento->getCatalogo(1000), $societe->info_head_cce["motivo_traslado"], 'Selecciona Motivo Traslado', 0, 0, '', 0, 0, 0, '', 'minwidth175'); print '
Tipo de operacion'; // print $form->selectarray('tipo_operacion', $complemento->getCatalogo(1001), $societe->info_head_cce["tipo_operacion"], 'Selecciona Tipo Operación', 0, 0, '', 0, 0, 0, '', 'minwidth175 style="display: none"'); // print '
Clave de pedimento'; print $form->selectarray('clave_ped', $complemento->getCatalogo(1002), $societe->info_head_cce["clv_pedimento"], 'Selecciona Clave Pedimento', 0, 0, '', 0, 0, 0, '', 'minwidth175'); print '
'; print 'Certificado Origen'; print $form->textwithpicto('', $langs->transnoentities("CCECertOrg"), 1, 'help', '', 0, 3); print ''; print $form->selectarray('cert_org', array(0, 1), $societe->info_head_cce["certificadoorigen"], 'Selecciona Certificado Origen', 0, 0, '', 0, 0, 0, '', 'minwidth175'); print '
'; print 'Num. Certificado Origen'; print $form->textwithpicto('', $langs->transnoentities("CCENumCertOrg"), 1, 'help', '', 0, 3); print ''; print ''; print '
'; print 'Num. Exportador Confiable'; print $form->textwithpicto('', $langs->transnoentities("CCENumExpConf"), 1, 'help', '', 0, 3); print ''; print ''; print '
'; print '
'; print '
'; print ''; print ''; print ""; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ""; print ''; print ''; print ''; print ''; print ''; print ''; // print ''; // print ''; // print ''; // print ''; // print ''; // print ''; // print ''; // print ''; print '
Incoterm'; print $form->selectarray('incoterm', $complemento->getCatalogo(1003), $societe->info_head_cce["incoterm"], 'Selecciona Incoterm', 0, 0, '', 0, 0, 0, '', 'minwidth175'); print '
'; print 'Subdivisión'; print $form->textwithpicto('', $langs->transnoentities("CCESubdivision"), 1, 'help', '', 0, 3); print ''; print $form->selectarray('subdivision', array(0, 1), $societe->info_head_cce["subdivision"], 'Selecciona Subdivisión', 0, 0, '', 0, 0, 0, '', 'minwidth175'); print '
Observaciones'; print ''; print '
Número de identificacion (NumRegIdTrib)'; print ''; print '
Tipo de Cambio'.$object->info_cce["tipo_cambio"].'
Conversión '.$object->info_cce["divisa1"].' a '.$object->info_cce["divisa1"].': '.$object->info_cce["conv_divisa"].''.$object->info_cce["conversion"].'
'; print '
'; print ''; print ""; print ""; print ""; print "
"; print ""; print "
"; print '
'; print '
'; dol_fiche_end(); llxFooter(); ?>