The OpenEdge Hive

Tim Townsend wrote:

There's code in tablename.p that excludes unqualified field name references that appear in an EXCEPT clause in a BUFFER-COPY statement. I think it should also exclude a similar clause in a BUFFER-COMPARE statement.

The relevant code looks looks like this:

   /* verify if this EXCEPT node is in a BUFFER-COPY statement */
    IF parserNodeStateHead(theNode, child) <> "BUFFERCOPY":U THEN
      RETURN.

I changed it like this and it does what I want:

   /* verify if this EXCEPT node is in a BUFFER-COPY/COMPARE statement */
    IF parserNodeStateHead(theNode, child) <> "BUFFERCOPY":U and 
       parserNodeStateHead(theNode, child) <> "BUFFERCOMPARE":U THEN
      RETURN.