• Abstract / Synopsis of RIOGEN
• Latest Source of RIOGEN
• Fixes Applied : 1
• Latest Source Date : Friday, December 8, 1978
• Last Fix ID : [R10074DK]

CMS File Input : RIOGEN MACRO
Date : 12/8/1978 4:37:00 PM
VM Context : MAINT(394)
File Name : RIOGEN.MACRO.Z1.txt
Modified : 1/16/2021 7:31:49 AM
Created : 1/16/2021 7:31:49 AM

1. R10074DK 604 CHANNEL SET SWITCHING AND MULTIPLE SRF SUPPORT

Date Thursday Jul 05, 1979 04:08:00 PM
Loaded from MAINT(294)

       R10074DK: ./ R 7000 $ 7150                                                        RIO00010
       R10074DK:          LCLA  &INDEX,&SRFCNT,&ALTCNT                                   RIO00020
       R10074DK: ./ I 12100 $ 12150 100                                                  RIO00030
       R10074DK: &SRFCNT  SETA  N'&SRF                                                   RIO00040
       R10074DK: ./ D 70237                                                              RIO00050
       R10074DK: ./ R 70252 70267 $ 70240 5                                              RIO00060
       R10074DK:          DC    F'&SRFCNT'                                               RIO00070
       R10074DK: &INDEX   SETA  1                                                        RIO00080
       R10074DK: .LSRF    AIF   (&INDEX GT N'&SRF).MEND                                  RIO00090
       R10074DK:          DC    AL2((RDV&SRF(&INDEX)-DMKRIODV)/8)                        RIO00100
       R10074DK:          DC    XL2'&SRF(&INDEX)'                                        RIO00110
       R10074DK: &INDEX   SETA  &INDEX+1                                                 RIO00120
       R10074DK:          AGO   .LSRF                                                    RIO00130
       R10074DK: ./ D 70282 70297                                                        RIO00140
       R10074DK: ./ I 74000 $ 74100 100                                                  RIO00150
       R10074DK:          AIF   (N'&SRF GT 32).ERR1                                      RIO00160
       R10074DK:          MEXIT                                                          RIO00170
       R10074DK: .ERR1    MNOTE 0,'MORE THAN 32 SRF DEVICES SPECIFIED'                   RIO00180
 BEGIN APPLY >>> ./ R 7000 $ 7150                                                        RIO00010
   END APPLY >>> ./ R 7000 $ 7150                                                        RIO00010
 BEGIN APPLY >>> ./ I 12100 $ 12150 100                                                  RIO00030
   END APPLY >>> ./ I 12100 $ 12150 100                                                  RIO00030
 BEGIN APPLY >>> ./ D 70237                                                              RIO00050
   END APPLY >>> ./ D 70237                                                              RIO00050
 BEGIN APPLY >>> ./ R 70252 70267 $ 70240 5                                              RIO00060
   END APPLY >>> ./ R 70252 70267 $ 70240 5                                              RIO00060
 BEGIN APPLY >>> ./ D 70282 70297                                                        RIO00140
   END APPLY >>> ./ D 70282 70297                                                        RIO00140
 BEGIN APPLY >>> ./ I 74000 $ 74100 100                                                  RIO00150
   END APPLY >>> ./ I 74000 $ 74100 100                                                  RIO00150
Update Succeeded
Update Execution Time 8 milliseconds.