Platform

x64, Win32

Purpose

To return the name of the current program.

Syntax

SUBROUTINE GET_PROGRAM_NAME@(NAME)
CHARACTER (LEN=*) NAME