I have a SVM called VDISKS the creates and initializes a virtual lock file for 
four VSE guest to use.  After a short time, VDISKS is logged off by the system. 
 All is fine if at least one VSE remains logged on, however if all are logged 
off the virtual lock file goes away also.  How can I keep VDISKS from being 
logged off by the system?

* * * Top of File * * *                                     
USER VDISKS $SECRET$ 4M 4M BG 90                            
*NAME: VIRTUAL_DISKS                                        
   ACCOUNT SYSTEMS SUPPORT                                  
   COMMAND SET RUN ON                                       
   IPL CMS                                                  
   MACH ESA                                                 
   XAUTOLOG AUTOLOG1 MAINT                                  
   CONSOLE 0009 3215 T OPERATOR                             
   SPOOL 000C 2540 READER *                                 
   SPOOL 000D 2540 PUNCH A                                  
   SPOOL 000E 1403 A                                        
   LINK MAINT 0190 0190 RR                                  
   LINK MAINT 019D 019D RR                                  
   LINK MAINT 019E 019E RR                                  
   MDISK 0191 3390 499 001 PKSCMS MR ALL WRITE MULTIPLE     
   MDISK 0222 FB-512 V-DISK 6208 MWV ALL                    
*DVHOPT LNK0 LOG1 RCM1 SMS0 NPW1 LNGAMENG PWC20101121 CRCc  

 PROFILE  EXEC     Z1  V 130  Trunc=130 Size=14 
====>                                           
      |...+....1....+....2....+....3....+....4..
00000 * * * Top of File * * *                   
00001 /* */                                     
00002 'CP SPOOL CONSOLE START MAINT CLASS M'    
00003 Trace I                                   
00004 'EXECIO * CP (STRING Q' USERID()          
00005 PULL @RESPONSE                            
00006 PARSE VAR @RESPONSE @USERID . @TERMID     
00007 IF @TERMID = 'DSC' THEN DO                
00008    EXEC INITVDSK                          
00009    SLEEP 05 SEC                           
00010    'CP SPOOL CONSOLE CLOSE'               
00011    EXIT                                   
00012 END                                       
00013 SET PF12 RETRIEVE                         
00014 EXIT                                      
00015 * * * End of File * * *

 INITVDSK EXEC     Z1  V 130  Trunc=130 Size=8
====>                                         
      |...+....1....+....2....+....3....+....4
00000 * * * Top of File * * *                 
00001 /* EXEC TO INITIALIZE ALL VDISKS    */  
00002 Trace I                                 
00003 ERASE DSFOUT OUTPUT A                   
00004 PUSH 'DSFOUT'                           
00005 PUSH 'INITV222'                         
00006 ICKDSF                                  
00007 'CP LINK * 222 222 RR'                  
00008 EXIT                                    
00009 * * * End of File * * *

 INITV222 INPUT    Z1  F 80  Trunc=80 Size=1 Line=0 Col=1 Alt=0       
====>                                                                 
      |...+....1....+....2....+....3....+....4....+....5....+....6....
00000 * * * Top of File * * *                                         
00001  INIT UNIT(222) NVFY NOMAP PURGE VOLID(VSELOK) FBAVTOC(6200,8)  
00002 * * * End of File * * *         

Thank you,
Scott R Wandschneider
Systems Programmer 3|| Infocrossing, a Wipro Company || 11707 Miracle Hills 
Drive, Omaha, NE, 68154-4457|| : 402.963.8905 || :847.849.7223  ||  : 
scott.wandschnei...@infocrossing.com **Think Green  - Please print responsibly**


Confidentiality Note: This e-mail, including any attachment to it, may contain 
material that is confidential, proprietary, privileged and/or "Protected Health 
Information," within the meaning of the regulations under the Health Insurance 
Portability & Accountability Act as amended.  If it is not clear that you are 
the intended recipient, you are hereby notified that you have received this 
transmittal in error, and any review, dissemination, distribution or copying of 
this e-mail, including any attachment to it, is strictly prohibited. If you 
have received this e-mail in error, please immediately return it to the sender 
and delete it from your system. Thank you.

Reply via email to