[Isis-users] Formato para campos repetibles
Guilda Ascencio
guildaa at gmail.com
Fri Sep 18 20:00:23 CEST 2015
Esta construcción debe producir el mismo resultado y no da error de
sintaxis:
if p(v852^i) then
proc('a1999~'v852^i'~'),
(if iocc=val(v1999) then
if p(v853) then |vol.|v853^a|:|, |n.|v853^b,| (|v853^i|)|
break fi, fi,
)
fi
Se coloca en la variable 1999 el contenido de v852^i luego al interior del
grupo repetible de la variable v853 se produce la salida solo cuando el
número de la ocurrencia coincida con el valor de v1999[1] (se referencia
siempre la primera ocurrencia), que a su vez contiene a v852^i
También podrías escribirlo así:
if p(v852^i) then
(if iocc=val(v852^i[1]) then
if p(v853) then |vol.|v853^a|:|, |n.|v853^b,| (|v853^i|)|
break fi, fi,
)
fi
O sea, utilizando el valor de la primera ocurrencia de v852^i directamente
en el grupo repetible
2015-09-17 10:59 GMT-05:00 Julio B. Naranjo <julio.bohorquez at invemar.org.co>
:
> Hola,
>
> Me pueden ayudar con esto,por favor..
>
> Este formato funciona muy bien en desktop CDISIS, para estos campos que
> son repetibles.
>
> if p(v852^i) then e1:= val(v852^i),
>
> if p(v853[e1]) then |vol.|v853[e1]^a|:|,
> |n.|v853[e1]^b,| (|v853[e1]^i|)|fi, fi,
>
> pero con wxis.exe, genera error de syntaxis, al indicar una ocurrencia
> especifica, si reemplazo el e1 en el subindice de ocurrencia por un entero
> ejemplo
>
> if p(v852^i) then e1:= val(v852^i),
>
> if p(v853[2]) then |vol.|v853[2]^a|:|,
> |n.|v853[2]^b,| (|v853[2]^i|)|fi, fi,
>
> funciona bien, pero como se requiere es que sea dinámico...
>
> Gracias,
>
>
>
> _______________________________________________
> 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
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.iccisis.org/pipermail/isis-users/attachments/20150918/2054141a/attachment.html>
More information about the isis-users
mailing list