Dynamic query referencing 2 tables throws error (7331) on REPOSITION-TO-ROWID

Reposition fails with MSSQL database when 2 tables are used.
 

DEFINE VARIABLE hOrgQuery        AS HANDLE            NO-UNDO.
DEFINE VARIABLE hNewQuery        AS HANDLE            NO-UNDO.
DEFINE VARIABLE hOrgBuffer       AS HANDLE            NO-UNDO.
DEFINE VARIABLE hBuffer          AS HANDLE EXTENT 10  NO-UNDO.
DEFINE VARIABLE rRowIdArray      AS ROWID  EXTENT 10  NO-UNDO.
DEFINE VARIABLE cRepositionQuery AS CHARACTER         NO-UNDO.
DEFINE VARIABLE iCount           AS INTEGER           NO-UNDO.
DEFINE VARIABLE lRepoIsOke       AS LOGICAL           NO-UNDO.
                                    
DISABLE TRIGGERS FOR DUMP of table2.
DISABLE TRIGGERS FOR LOAD OF table2.
DISABLE TRIGGERS FOR DUMP of table1.
DISABLE TRIGGERS FOR LOAD OF table1.

CREATE QUERY hOrgQuery.
hOrgQuery:SET-BUFFERS( BUFFER table1:HANDLE, BUFFER table2:HANDLE ).
hOrgQuery:QUERY-PREPARE( "FOR EACH table1 WHERE TRUE  NO-LOCK  ,EACH table2 WHERE table2.field2 = table1.field2 NO-LOCK BY table1.field1  INDEXED-REPOSITION" ).
hOrgQuery:QUERY-OPEN(). 
 
/*cRepositionQuery = "FOR EACH table1 WHERE TRUE  AND table1.field1 >= 'ww'  NO-LOCK, EACH table2 WHERE table2.field2 = table1.field2 NO-LOCK BY table1.field1  INDEXED-REPOSITION". */
cRepositionQuery = "FOR EACH table1 WHERE TRUE  AND table1.field1 >= 'ww'  NO-LOCK, EACH table2 WHERE table2.field2 = table1.field2 OUTER-JOIN NO-LOCK BY table1.field1  INDEXED-REPOSITION".

CREATE QUERY hNewQuery.
hNewQuery:CACHE = 1.

DO iCount = 1 TO hOrgQuery:NUM-BUFFERS:
   ASSIGN hOrgBuffer = hOrgQuery:GET-BUFFER-HANDLE (iCount).
   CREATE BUFFER hBuffer [iCount] FOR TABLE hOrgBuffer.
   hNewQuery:ADD-BUFFER( hBuffer[iCount] ).
END.
 

lRepoIsOke = hNewQuery:QUERY-PREPARE (cRepositionQuery) NO-ERROR.
IF lRepoIsOke THEN DO:
  hNewQuery:QUERY-OPEN ().
  IF hNewQuery:GET-FIRST () THEN
  DO:
    DO iCount = 1 TO hNewQuery:NUM-BUFFERS:

      rRowIdArray [iCount] = hBuffer [iCount]:ROWID.
    END.

    hOrgQuery:REPOSITION-TO-ROWID (rRowIdArray[1],rRowIdArray[2]).
  END.

  /* release resources */
  hNewQuery:QUERY-CLOSE().
END.

DO iCount = 1 TO hNewQuery:NUM-BUFFERS :
   DELETE OBJECT hBuffer[iCount].
END.

DELETE OBJECT hNewQuery.

 

Upgraded from OpenEdge 10.2B to OpenEdge 11.x.

Server-side join was introduced in OpenEdge 11 as part of the DataServer query engine performance optimization.

The changes introduced in the DataServer query engine in OpenEdge 11 caused a regression issue where the current use case is not properly evaluated on the server side. 

None at this time

Start the client session with the -nojoinbysqldb parameter.

When -nojoinbysqldb startup parameter , the query join is performed on the client reverting to the pre-OpenEdge 11 behavior.