<div dir="ltr">Estimados Colegas.<div><br></div><div>Estoy ejecutando muchos cambios globales en los registros de mi base MARC, la base tiene 164318 registros. Por ejemplo:</div><div><br></div><div>Quiero eliminar todos los subcampos (^y) que tengan la palabra 'Proceso' y los subcampos (^o) que contenga 'ESTANTERÍA CERRADA' del campo v900 sin perder los otros subcampos (abfklmnpqr). Pero necesito hacerlo en dos procesos SEPARADOS ya que son varios cambios en la base y este error me aparece en todos mis cambios.</div><div><br></div><div>Estos son los pasos que realizo:</div><div><br></div><div>1. mx marc
proc=@proceso_900.prc proc='s' copy=marc tell=1 -all now</div><div>El archivo proceso_900.prc tiene:</div><div><p class="MsoNormal"><i><span lang="EN-US"> if (v900^y = 'Proceso') then</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">'d900'</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">'<900>'</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^a) then '^a',v900^a fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^b) then '^b',v900^b fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^f) then '^f',v900^f fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^k) then '^k',v900^k fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^l) then '^l',v900^l fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^m) then '^m',v900^m fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^n) then '^n',v900^n fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^o) then '^o',v900^o fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^p) then '^p',v900^p fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^q) then '^q',v900^q fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">if p(v900^r) then '^r',v900^r fi,</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">'</900>'</span></i></p>
<p class="MsoNormal"><i><span lang="EN-US"> </span></i><i><span lang="EN-US">fi</span></i></p><p class="MsoNormal"><i><span lang="EN-US"><br></span></i></p><p class="MsoNormal"><i><span lang="EN-US">2.</span></i><i><span lang="EN-US">c:\ABCD\www\bases\marc\data> fullinv.bat</span></i></p><p class="MsoNormal"><i><span lang="EN-US"><br></span></i></p><p class="MsoNormal"><i><span lang="EN-US">3. </span></i>mx marc
proc=@estanteria_900.prc proc='s' copy=marc tell=1 -all now</p><p class="MsoNormal">El archivo estanteria_900.prc tiene:</p><p class="MsoNormal"> if (mid(v900^o,12,7) = 'CERRADA') then</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>'d900'</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>'<900>'</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^a) then '^a',v900^a fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^b) then '^b',v900^b fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^f) then '^f',v900^f fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^k) then '^k',v900^k fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^l) then '^l',v900^l fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^m) then '^m',v900^m fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^n) then '^n',v900^n fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if (v900^o = 'ESTANTERIA CERRADA') then else if p(v900^o) then '^oESTANTERIA CERRADA' fi fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^p) then '^p',v900^p fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^q) then '^q',v900^q fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^r) then '^r',v900^r fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>if p(v900^y) then '^y',v900^y fi,</p><p class="MsoNormal"><span class="" style="white-space:pre"> </span>'</900>'</p><p class="MsoNormal"> fi</p><p class="MsoNormal"><br></p><p class="MsoNormal">4. <i><span lang="EN-US">c:\ABCD\www\bases\marc\data> fullinv.bat</span></i></p><p class="MsoNormal"><i><span lang="EN-US"><br></span></i></p><p class="MsoNormal"><i><span lang="EN-US">AQUI EL PROCESO fullinv.bat NO TERMINA Y ME PRESENTA EL SIGUIENTE ERROR en el MFN 83322:</span></i></p><p class="MsoNormal"><i><span lang="EN-US">.</span></i></p><p class="MsoNormal"><i><span lang="EN-US">.</span></i></p><p class="MsoNormal"><i><span lang="EN-US">.</span></i></p><p class="MsoNormal"><i><span lang="EN-US">+++ 83321</span></i></p><p class="MsoNormal"><i><span lang="EN-US">fatal: recread/check/base</span></i></p><p class="MsoNormal"><i><span lang="EN-US"><br></span></i></p><p class="MsoNormal"><i><span lang="EN-US">Cuando veo el registro 83321 está correcto pero el 83222 muestra:</span></i></p><p class="MsoNormal"><span style="color:rgb(0,0,0);font-family:'Trebuchet MS',Arial,Verdana,Helvetica;font-size:13.3333330154419px">WXIS|fatal error|unavoidable|recread/check/base|</span><i><span lang="EN-US"><br></span></i></p><p class="MsoNormal"><span style="color:rgb(0,0,0);font-family:'Trebuchet MS',Arial,Verdana,Helvetica;font-size:13.3333330154419px">y a partir de este todos están dañados.</span></p><p class="MsoNormal"><span style="color:rgb(0,0,0);font-family:'Trebuchet MS',Arial,Verdana,Helvetica;font-size:13.3333330154419px"><br></span></p><p class="MsoNormal"><span style="color:rgb(0,0,0);font-family:'Trebuchet MS',Arial,Verdana,Helvetica;font-size:13.3333330154419px">Revisé los manuales y me dicen que esto sucede al momento de convertir bases para sistemas operativos pero esto no es lo que estoy haciendo, por favor ¿pueden ayudarme con alguna guía de porqué sucede esto?</span></p><p class="MsoNormal"><span style="color:rgb(0,0,0);font-family:'Trebuchet MS',Arial,Verdana,Helvetica;font-size:13.3333330154419px"><br></span></p><p class="MsoNormal"><span style="color:rgb(0,0,0);font-family:'Trebuchet MS',Arial,Verdana,Helvetica;font-size:13.3333330154419px">Saludos y gracias desde ya a todos por su tiempo.</span></p><p class="MsoNormal"><span style="color:rgb(0,0,0);font-family:'Trebuchet MS',Arial,Verdana,Helvetica;font-size:13.3333330154419px">Mauricio</span></p><p class="MsoNormal"><i><span lang="EN-US"><br></span></i></p><p class="MsoNormal"><i><span lang="EN-US"><br></span></i></p><p class="MsoNormal"><span lang="EN-US"></span></p></div><p class="MsoNormal"><span lang="EN-US"></span></p></div>