cdc:nos2.source:opl.opl871:deck:freedsk
Deck FREEDSK
0 Modifications
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.freedsk +++|.PROC,FREEDSK,DN=0,TRIAL=BFSI/ABFIS,TH=3000,DD=3, 00002 M01S00002.freedsk +++| MN=0,MG=60,SG=60,SM=A,SS=#FILE. 00003 M01S00003.freedsk +++|.*/ 00004 M01S00004.freedsk +++|.*/ PROC,FREEDSK,DN=0,TRIAL=BFSI/ABFIS,TH=3000,DD=3, 00005 M01S00005.freedsk +++|.*/ MN=0,MG=60,SG=60,SM=A,SS=#FILE. 00006 M01S00006.freedsk +++|.*/ 00007 M01S00007.freedsk +++|.*/ THIS PROC WAITS IN THE ROLLOUT QUEUE FOR A LOW DISK SPACE 00008 M01S00008.freedsk +++|.*/ THRESHOLD FLAG TO BE SET BY THE NOS OPERATING SYSTEM. 00009 M01S00009.freedsk +++|.*/ 00010 M01S00010.freedsk +++|.*/ NOTE: THE PROGRAM *PROFULL* /BINNARIES *DKFULL* MUST BE 00011 M01S00011.freedsk +++|.*/ WITH IN THE SYSTEM. 00012 M01S00012.freedsk +++|.*/ 00013 M01S00013.freedsk +++|.*/ FREE UP DISK SPACE OF FILES. 00014 M01S00014.freedsk +++|.*/ IGNORE FILES ACCESSED IN THE 00015 M01S00015.freedsk +++|.*/ LAST DD DAYS. 00016 M01S00016.freedsk +++|.*/ CAN PROCESS BY DEVICE. #DN=DN. 00017 M01S00017.freedsk +++|.*/ 00018 M01S00018.freedsk +++|SETPR(31) 00019 M01S00019.freedsk +++|SETJOB,UJN=MAS. 00020 M01S00020.freedsk +++|NOTE,OUTPUT,NR.+1NOSCLSH FAMILY #SM=SM FREEDSK 00021 M01S00021.freedsk +++|WRITEF,OUTPUT.RFL(60000) 00022 M01S00022.freedsk +++|* 00023 M01S00023.freedsk +++|SET(R1=1) 00024 M01S00024.freedsk +++|SET(R2=2) 00025 M01S00025.freedsk +++|WHILE(R1.LE.R2,COPY) 00026 M01S00026.freedsk +++|DKFULL. 00027 M01S00027.freedsk +++|* 00028 M01S00028.freedsk +++|* ALLOWS ONLY ONE COPY OF SSMOVE TO EXECUTE AT A TIME. 00029 M01S00029.freedsk +++|* 00030 M01S00030.freedsk +++|ATTACH,MASLOCK/UN=SYSTEMX,M=W,NA. 00031 M01S00031.freedsk +++|RFL,60000. 00032 M01S00032.freedsk +++|* FREE UP DISK SPACE OF FILES ON DEVICE DN. 00033 M01S00033.freedsk +++|SSMOVE(I=RLS,PX=TRIAL,#DN=DN) 00034 M01S00034.freedsk +++|RETURN,MASLOCK. 00035 M01S00035.freedsk +++|.IF,$TRIAL$.EQ.$BFIS$.SSUSE,#SM=SM,OP=ABC. 00036 M01S00036.freedsk +++|ROUTE,OUTPUT,DC=PR. 00037 M01S00037.freedsk +++|ENDW,COPY. 00038 M01S00038.freedsk +++|$REVERT. RELEASE COMPLETE 00039 M01S00039.freedsk +++|.DATA,RLS. 00040 M01S00040.freedsk +++|* CHANGE DEFAULT VALUE OF SYSTEM. 00041 M01S00041.freedsk +++|*WM,RL,AG=1. 00042 M01S00042.freedsk +++|*WA,RL,DV=1. 00043 M01S00043.freedsk +++|*PR,RL,M=1. 00044 M01S00044.freedsk +++|* RELEASE DISK SPACE OF FILES BACKED UP ON 860. 00045 M01S00045.freedsk +++|FR,DS,#MN=9999999. 00046 M01S00046.freedsk +++|FR,RL,#DD=DD,#MN=MN,#TH=TH. 00047 M01S00047.freedsk +++|#SM,DA,#MG=MG. 00048 M01S00048.freedsk +++|#SM,DA,#SG=SG.
cdc/nos2.source/opl.opl871/deck/freedsk.txt ยท Last modified: by 127.0.0.1