Skip to main content
Question

Virtual Attribute Does Not Work for me

  • Nov 13, 2026 7:37 PM UTC
  • 1 reply
  • 20 views

EliasFernandez

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   

1 reply

Jon Card
Forum|alt.badge.img+2
  • Inspiring
  • Nov 13, 2026 8:27 PM UTC

it looks to me like you this incorrect

SUBR('-OCONVS', F21, TRANS("ENCLOSURE",F20,2,"X"))

try this

TRANS("ENCLOSURE",F20,2,"X");SUBR('-OCONVS', F21, @1)