Looks a bit complex... For my purposes, I just took 2 lines from the ISC code. If I got it correct, and it's just a reading of Credentials.

If '$ISOBJECT(..%CredentialsObj) Do ..CredentialsSet(..Credentials) If '$ISOBJECT(..%CredentialsObj) { Set tSC=$$$EnsError($$$EnsErrNoCredentials,..Credentials) Quit }

w ..%CredentialsObj.Username

Update: Oh, your function works outside of the business host, okay 🙂

For me, it was a surprise that COS has no priority for the match (and logical) operation. I mean 3+3*2 = 12, not 9.

Done! 😁