/*------------------------------------------------------------*/
/* PROGRAM NAME : PROFILE.CMD                                 */
/* VERSION      : 1.00                                        */
/* AUTHOR       : David Kelsey                                */
/* CMD FORMAT   : PROFILE                                     */
/* CALLED FROM  : user logon to the LAN server                */
/* PURPOSE      : to transfer control to LOGON resource which */
/*              : has all the code needed to run logon prgs   */
/* PRE-REQS     : REXXSAA on the requester                    */
/* INPUT        : none                                        */
/* OUTPUT       : none                                        */
/*                                                            */
/*                                                            */
/*                   Maintenance log                          */
/*   date      time                           action          */
/*   ----      ----                           ------          */
/* 11/09/92    16:35                       initial coding     */
/*------------------------------------------------------------*/

alias = 'LOGON'
drive = 'U'
start = '/WIN logonprf'

'@ECHO OFF'
'NET USE' drive':' alias '> NUL'
if rc = 0 then do
  drive':'
  'START' start drive   /*    this program must release the   */
end                     /* resource and close it's own window */
exit 0                  /* exit 0 to stop any problems        */