Please, observe this virtual attribute
:ED DICT COR-DATA TEST
Top of "TEST" in "DICT COR-DATA",
001: I
002: SUBR('-OCONVS', F21, TRANS("ENCLOSURE",F20,2,"X"))
003:
004: XXXX
005: 15R
006: M
007: ASSOC_20
This is about file COR-DATA, COR-DATA HAS A MULTIVALUE on attribute 20 and attribute 21; 20 has correspondence types as ALPHA BETA WHATEVER and 21 has money in internal format. My idea is dealing with multivalues 20 21 keeping in mind that file ENCLOSURE attribute 2 has a money conversion like MR2 or MR2, or MR4, etc.
This is my problem
:ED DICT COR-DATA TEST
Top of "TEST" in "DICT COR-DATA", 14 lines, 156 characters.
*--: P
001: I
002: SUBR('-OCONVS', F21, TRANS("ENCLOSURE",F20,2,"X"))
003:
004: XXXX
005: 15R
006: M
007: ASSOC_20
LIST COR-DATA F20 F21 TEST 14:34:38 Nov 13 2026 1
COR-DATA.. ENCLOSURES..... ENC_VALUE........... XXXX...........
WQ6843 MB 10001 0.00
MB 10002 0.00
MB 10003 0.00
MB 10004 0.00
MB 10005 0.00
MB 10006 0.00
MB 10007 0.00
all virtual TEST returns 0.00 instead as 123.40 OR 3,457.56