Can't map fields in DATA-SOURCE when using Business Entity

Field mapping, using the existing Business Entity template provides no direct method for passing and setting the mapped fields to map between the target TEMP-TABLE object and the DATA-SOURCE table.

Jan 17, 2019
Knowledge

Title

URL Name

can-t-map-fields-in-data-source-when-using-business-entity

Article Number

000113947

Environment

Product: OpenEdge Version: 11.x OS: All Supported Platforms

Question/Problem Description

Using the Business Entity for data access in an application and sometimes the fields in the target are differently named than the fields in the data-source (database table), however there is no means to do this exposed in the Business Entity template and inheritance.

Steps to Reproduce

Clarifying Information

Error Message

Defect Number

Defect ADAS-13636

Enhancement Number

Cause

This is a defect as this was never completely implemented. An overload for AttachDataSource was created that allows passing an array of mapped fields, however this is not called by any ReadData overload.

Resolution

None at this time.

Workaround

Define an array variable/property at the class level to store field mappings for each buffer in the Business Entity. You only need one extent for this example.

DEFINE PROTECTED PROPERTY cMapping AS CHARACTER EXTENT 1 NO-UNDO
    GET.
    SET.

Define an override method for AttachDataSources to call AttachDataSources in SUPER, passing in the mapping. This will use the existing overload of AttachDataSources.

METHOD OVERRIDE PROTECTED VOID AttachDataSources( ):

    SUPER:AttachDataSources(cMapping).

END METHOD.

Create an overload of the ReadBe<table></table> method which includes the mapped fields and assign the mapped fields for each table to the cMapping array defined above.
```
METHOD PUBLIC VOID ReadBeCust( INPUT pcFilter AS CHARACTER,
                                                               INPUT pcFields AS CHARACTER,
                                                               OUTPUT DATASET dsCustomer ):
    cMapping[1] = pcFields.
    SUPER:ReadData(pcFilter).

    RETURN.

END METHOD.
```
Attached is a set of example programs that demonstrate this using the Sports2000 database. To use the attachment, connect to a copy of sports2000 and run test.p. See beCust.cls for the code.

Notes

Keyword Phrase

Last Modified Date

1/17/2019 10:54 PM

Can't map fields in DATA-SOURCE when using Business Entity

Files(1)

Was this article helpful?

Was this article helpful?

Can't map fields in DATA-SOURCE when using Business Entity

Information

Related Articles