[Isis-users] Extraer ocurrencia de un campo y cargarla en otro

[spinaker]

Daniel
La solución podría ser usando un proc como el siguiente
Nota: además le agregué una parte extra de manera de eliminar la última 
ocurrencia del v20 dado que la has pasado al v900, eso es opcional por 
lo que la marqué en color rojo

*'d20d900'**
**e1:=0,**
**e2:=nocc(v20)-1,**
** '<900>',v20[LAST],'</900>'**
**
**(if e1 < e2 then**
** '<20>',v20,'</20>'**
**  e1:=e1+1,**
** fi)*

Saludos y buen año
Ernesto Spinak




El 25/12/2018 a las 19:59, daniel biset escribió:
> Estimados/as:
> Me encuentro procesando con MX una base denominada lector.
> Esta base tiene un campo v20 con varias ocurrencias, por ejemplo:
> ....
> ^f17/03/2017^p65^lBiblioteca^u31/03/2017
> ^f03/05/2017^p65^lBiblioteca^u30/04/2017
> ^f29/05/2017^p65^lBiblioteca^u31/05/2017
> ^f21/06/2017^p65^lBiblioteca^u30/06/2017
>
> Debo sacar, extraer, la última ocurrencia de cada registro y cargarla 
> en otro campo
> (proc='d20', '<900>' ùltima ocurrencia del 20 '</900>').
> Intenté con MX algunas fórmulas que he utilizado en Winisis, por ejemplo:
>
> mx lector "pft=v20[nocc(v20)]"
>
> Siendo el resultado:
> *** fmt_error=8
> fatal: nocc(v20)]
>
> O esta otra:
> mx lector "pft=s1:=(f(nocc(v20),1,0)),v20[s1]"
>
> Pero obtengo el mismo error, al igual que con otras alocadas y 
> frustantes fórmulas.
>
> Agradecería alguna sugerencia al respecto.
>
> Saludos!
>
> Daniel H. Biset
>
>
>
>
>
>
>
> _______________________________________________
> isis-users mailing list
> isis-users at iccisis.org
> To manage your own subscription options go to: http://lists.iccisis.org/listinfo/isis-users
> Or contact Henk Rutten: hlrutten at xs4all.nl


-- 
   .^.                                .^.
   ( )                                ( )
   ===                                ===
  =[=]================================[=]=
   | |  Ernesto Spinak                | |
   | |  spinaker at adinet.com.uy        | |
   | |  Montevideo, Uruguay           | |
   | |  tel/fax  (598) 2622-3352      | |
   | |  celular  (598) 99612238      | |
  =[=]================================[=]=
   ===                                ===
   ( )                                ( )
    V                                  V

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.iccisis.org/pipermail/isis-users/attachments/20181225/ab08b59b/attachment.html>