New systax encountered

Hi,
I have encountered the following code in a program

If +Top-fourgous=‘’
+Top-fourgous=‘N’

End-if

What does it means ? Does it implies an AND or OR between the 2 conditions ? Or does it means something else ?

Thanks
Mishra

This code is not compilable.

define data independent
1 +top-fourgous (A1)
end-define
If +Top-fourgous=''   /* <-- NAT0356
+Top-fourgous='N'     /* <-- NAT0220
  ignore
End-if
end

The important point of Matthias’s answer, which I do not believe Mishra understood when asking the question, is that old global variables, always started with plus signs. Their new counterpart; variables in GDA’s and AIV’s may also start with plus signs.

Thus, +Top-fourgous is just some form of a global variable.

That said, the code excerpt is still rather strange. There should probably be a blank between two apostrophes in the IF (checking for a blank value), then a colon before the equal sign in the implicit ASSIGN. Thus the following code checks:

DEFINE DATA INDEPENDENT
1 +TOP-FOURGOUS (A1)
END-DEFINE
IF +TOP-FOURGOUS=’ ’
+TOP-FOURGOUS:=‘N’
END-IF
END

steve