Hi manolo
z.b.:
------------------------
!CE = !!CE.NAME
VAR !EQUI COLLECT ALL EQUI FOR $!CE
!NUMEQUI=!EQUI.Size()
!Output = object FILE('c:\temp\EQUI.TXT')
!ResultArray = ARRAY()
DO !Line FROM 1 TO $!NUMEQUI
$!EQUI[$!Line]
VAR !POS POS WRT /*
VAR !NAME NAME
VAR !ORI ORI
!Total = |$!NAME | + | $!POS | + | $!ORI |
!ResultArray.Append( !Total.String() )
ENDDO
!Output.WRITEFile('OVERWRITE', !ResultArray)
$!CE
----------------------------------
