SQR - How can I create an environment variable that will contain the name of DB? Or does one already

SQR - How can I create an environment variable that will contain the name of Database? Or, does a variable already exist that can return the name of the DB?

DETAILS: Variable I'm trying to create should be PSDBENV = "PSHRDEV1". I want to create it the same way PS_HOME is created. I have SQR that is run only in NT and I need to pass it the name of the database ( SQR : Let $Env = getenv('PSDBENV') ). I know that when i do this with PS_HOME ( SQR : Let $Home = getenv('PS_HOME') ) it returns the right value for environment im in.   When the SQR is running I need to know which environment it's in, because depending on the environment there is conditions that I need