{
{    The purpose of this request is to get a pointer to the job management work
{ area.  If the work area does not exist it will be created.
{
{       JMP$GET_JM_WORK_AREA (JM_WORK_AREA_P, STATUS)
{
{ JM_WORK_AREA_P: (output)  This parameter is a pointer to a sequence that is
{       the job management work area.
{
{ STATUS: (output)  This parameter specifies the request status.
{       CONDITIONS:
{             none
{
