PRGNAME$で取得できるみたいです。