Subcampos repetibles en Isis
Una manera de implementar el acceso a todas las ocurrencias de un subcampo repetible en una base Isis
$ mx tmp "proc='a100|1#^aBorges, Jorge Luis,^d1899-^4trl^4aui|'" "proc='a1000|',replace(v100*3,'^','|a1000|'),'|','a1000|##|'"
mfn= 1
100 «1#^aBorges, Jorge Luis,^d1899-^4trl^4aui»
1000 «aBorges, Jorge Luis,»
1000 «d1899-»
1000 «4trl»
1000 «4aui»
1000 «##»
..x
$ mx tmp "proc='a100|1#^aBorges, Jorge Luis,^d1899-^4trl^4aui|'" "proc='a1000|',replace(v100*3,'^','|a1000|'),'|','a1000|##|'" "pft=(if v1000.1='4' then v1000*1/ fi)"
trl
aui