)F FUNCTION -                                                           00000010
  THE $$IPL COMMAND IS USED TO AUTOMATE THE PROCESS OF                  00000020
  REGULARLY ACCESSING DATASETS IN ORDER TO PREVENT THEIR                00000030
  ARCHIVAL.                                                             00000040
  THE $$IPL COMMAND USES THE "ACCESS" CMMAND.                           00000050
  YOU SHOULD ALSO ISSUE                                                 00000060
              HELP ACCESS                                               00000070
                                                                        00000080
  FOR RELATED INFORMATION                                               00000090
                                                                        00000100
  $$IPL REQUIRES THAT TWO DATASETS BE PRESENT IN YOUR LIBRARY           00000110
  IN ORDER TO FUNCTION.  THE FIRST, NAMED "IPL" (WITH YOUR PREFIX)      00000120
  MUST CONTAIN ONE RECORD, WITH A DATE (IN MM/DD/YY FORMAT) IN          00000130
  ITS FIRST 8 COLUMNS.  THIS DATE IS REPLACED EACH TIME $$IPL           00000140
  ACTIVATES ITS DATASET ACCESS CYCLE, AND IS CHECKED TO DETERMINE       00000150
  WHEN TO NEXT ACTIVATE THE DATASET ACCESS CYCLE.                       00000160
                                                                        00000170
  THE SECOND DATASET, NAMED "IPLDSN" (WITH YOUR PREFIX), CONTAINS       00000180
  ONE LINE FOR EACH DATASET TO BE ACCESSED VIA $$IPL.  THE DATASET      00000190
  NAMES, MINUS THE USERID-ACCOUNT PREFIX, MUST APPEAR STARTING          00000200
  IN COLUMN ONE.  AN INVALID OR NON-EXISTENT DATASET NAME WILL          00000210
  FAIL THE $$IPL COMMAND.  YOU MAY PUT AS MANY DATASETS HERE AS         00000220
  YOU WISH.                                                             00000230
                                                                        00000240
  EACH TIME THE COMMAND "$$IPL" IS ISSUED, IT QUERIES THE DATASET       00000250
  "IPL" UNDER YOUR PREFIX, AND READS OUT THE DATE.  IT COMPUTES THE     00000260
  ELAPSED TIME SINCE THAT DATE, AND COMPARES IT WITH THE "CYCLE"        00000270
  VALUE (WHICH BY DEFAULT IS 15).  IF AT LEAST THAT MANY DAYS HAVE      00000280
  ELAPSED, IT THEN QUERIES THE DATASET "IPLDSN" FOR NAMES OF DATASETS   00000290
  AND ACCESSES EACH ONE IN TURN.  UPON SUCCESSFUL COMPLETION, IT        00000300
  POSTS THE CURRENT DATE BACK INTO THE "IPL" DATASET, AND THE CYCLE     00000310
  STARTS OVER.                                                          00000320
                                                                        00000330
  IF FEWER DAYS HAVE ELAPSED THAN THE SPECIFIED CYCLE, THE COMMAND      00000340
  SAYS SO AND TERMINATES WITHOUT ACCESSING ANY DATASETS.                00000350
                                                                        00000360
)X SYNTAX -                                                             00000370
       $$IPL                                                            00000380
             CYCLE('DAYS')                                              00000390
  REQUIRED - NONE.                                                      00000400
  DEFAULTS - CYCLE(15)    (I.E. 15 DAYS BETWEEN ACCESSES)               00000410
)O OPERANDS -                                                           00000420
))CYCLE     - THE NUMBER OF DAYS WHICH MUST HAVE ELAPSED SINCE          00000430
              YOUR MOST RECENT "$$IPL" BEFORE A NEW ROUND OF DATASET    00000440
              ACCESSES WILL OCCUR.                                      00000450
