Objects can be run as standalone objects, which are part of the project or they can run as macros, CALLed from other objects. There is no identical global parameter to chack this.

!»» Check for standalone or CALLed run
nameM=" " : sts=REQUEST("name_of_main","",nameM)
IF NOT(nameM="") THEN
  PRINT nameM+" is CALLing me!"
  ELSE
  PRINT "I am free!"
  ENDIF