FWD » Core Development » Base Language

start.p

def var obj as Test3.

def buffer bBook2 for book2. 

obj = new Test3(BUFFER book2).

Test3.cls

USING Progress.Lang.*.

BLOCK-LEVEL ON ERROR UNDO, THROW.

CLASS Test3: 
    CONSTRUCTOR PUBLIC Test3 (BUFFER bBook2 FOR book2):

    END.
END CLASS. 

It converts to :
start.p

RecordBuffer.openScope(book2);
obj.assign(ObjectOps.newInstance(com.goldencode.hotel.Test3.class, "I", book2));

Test3.java

@LegacySignature(type = Type.CONSTRUCTOR, name = "Test3", parameters = 
{
   @LegacyParameter(type = "BUFFER", buffer = "bBook2", bufferFor = "book2")
})
public void __test3_constructor__(final Book2.Buf _bbook2)

As you can see the constructor definition has, a parameter of type BUFFER. While the caller tries to instantiate an object with a parameter of type INPUT.

I have modified the code to contain some buffer usage:

start.pstart.p

def var obj as Test3.

def buffer buf for adaptivept9.

obj = new Test3(BUFFER buf).
MESSAGE AVAILABLE buf.
MESSAGE buf.k1.
RELEASE buf.

FIND FIRST buf WHERE k1 = 2.
MESSAGE AVAILABLE BUF.

FOR EACH adaptivept9:
    DELETE adaptivept9.
END.

Test3Test3

CLASS Test3:
    CONSTRUCTOR PUBLIC Test3 (BUFFER buf FOR adaptivept9):
        CREATE buf.
        buf.k1 = 2.
    END.
END CLASS.

The expected output is yes, 2, yes, which also happens on FWD.