[Isis-users] Fwd: Ayuda con formato para proc

[Claudio Fuhr]

Hola Alberto,

trate de reproducir tu ejemplo creando una BD como esta:
mx bd1
mfn=     1
 40  "dato1"
 40  "dato2"
 40  "dato3"
 40  "dato4"
 40  "dato5"
 40  "dato6"
..
mfn=     2
 40  "dato1"
 40  "dato2"
 40  "dato3"
 40  "dato4"
 40  "dato5"
 40  "dato6"
 40  "dato7"
 40  "dato8"


Luego la siguiente línea y funcionó como el resultado que vos esperas:

mx bd1 "proc='d40',(if iocc<6 then
'<400>',v40,'</400>',else,'<800>',v40,'</800>',fi,/)"
mfn=     1
400  "dato1"
400  "dato2"
400  "dato3"
400  "dato4"
400  "dato5"
800  "dato6"
..
mfn=     2
400  "dato1"
400  "dato2"
400  "dato3"
400  "dato4"
400  "dato5"
800  "dato6"
800  "dato7"
800  "dato8"
..


Espero que haya sido de utilidad.

Saludos


-- 
Claudio M. Fuhr
claudiofuhr at gmail.com
CNEA-IB



El 15 de abril de 2016, 15:20, Alberto Rosenberg <licrosenberg at yahoo.com.ar>
escribió:

> Hola estoy armando un formato para un proc de mx, que separa las
> ocurrencias de un campo, pero tengo un problema, el formato es (lo arme de
> acuerdo al manual de formato de cisis):
>
> ,if p(v40) then
>     e1:=1,
>     e2:=nocc(v40),
>     while e1<=e2
>     ( f(e1,1,0),
>                     ,if e1<6 then '<400>',v40[e1],'</400>' ,else,
> '<800>',v40[e1],'</800>' fi,
>                     e1:=e1+1,
>     ),
> ,fi,
>
> Lo que quiero hacer es que las primeras 5 ocurrencias del campo 40 pasen
> al campo 400 y las siguientes al campo 800, pero me da error, y no estoy
> seguro si el error es por "e1<6" o por "v40[e1]"
>
> Puede alguien darme alguna guía/ayuda
> Saludos
> Alberto
>
>
>
>
>
>
> _______________________________________________
> 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
>
>






-- 
Claudio M. Fuhr
claudiofuhr at gmail.com
Tel. (0294) 15466-5605
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.iccisis.org/pipermail/isis-users/attachments/20160415/d096bf86/attachment.html>