This is what you can do at the time LOGON script/clist is executed which create 
the ISPF environment.
Basically check if for the userid alias exist if no then create the log dataset 
and also the alias.

"LISTC ENT('"uid"') ALIAS"                                           
   if rc=4 then do                                   
      ldrc=LISTDSI("'"uid".xxx.LOG'")                                   
      if ldrc<5 then do                                                 
         "DEL '"uid".xxx.LOG'"                                          
         end                                      
      "CREATEALS ANYALL"                         =====> THIS IS A ROUTINE WHICH 
CREATE THE ALIAS                        
      if ldrc<5 then do                           
         a1='SPACE(1 2) TRACKS'                                         
         a2='RECFM(F B)'                                                
         a3='LRECL('syslrecl')'                                         
         a4='BLKSIZE('sysblksize')'                                     
         a5='DSORG('sysdsorg')'                                         
         "ALLOC DA('"uid".xxx.LOG') NEW CATALOG "a1" "a2" "a3" "a4" "a5 
         end

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to