КРАБ
А 2
И SАРФАЗ  
РЛБ  
!!! ШAБЛОH ДЛЯ ЗAПИCИ B APФУ   
!!! CKОMПИЛИPОBAHHОЙ ПACKAЛЬ-ПPОГPAMMЫ   
!!! ПEPEД BЫПОЛHEHИEM:      
!!! ПEPEПИШИTE MACCИB B CBОЙ HОMEP    
!!! УДAЛИTE CTPОKИ C '!!!'   
!!! ЗAMEHИTE 'ИMЯОБЛ' HA ИMЯ MACCИBA B APФE   
!!! ДОБABTЬTE TEKCT ПACKAЛЬ-ПPОГPAMMЫ   
!!! ДЛЯ ЗAПИCИ HУЖHО ИMETЬ БЮДЖET B APФE И   
!!! CООTBETCTBУЮЩИE ОБЛACTИ C ПPABAMИ ЗAПИCИ   
ШИФP <ШИФР ПОЛЬЗ. С ПРАВОМ ЗАПИСИ В ОБЛ. АРФЫ> <ПАСП МС "ДУБНА">^  
ОЗУ 32^  
AЦП 64^  
ЛИCT 0-37^  
ЛEH 32(ИMЯОБЛ-ЗП)^   
EEB1A3
!!! Проверить отсутствие пробелов в конце предыдущей строки во избежание
!!! ошибки
*NAME  
*CALL FICMEMОRУ    
*NО LI    
*PASCAL  
*LIBRA:13  
PRОGRAM NОPRОG(ОUTPUT);  
BEGIN  
END.  
*EXECUTE  
*TО PERSО:320000  

//В КРАБЕ ФОРМИРУЕМ ЗАДАЧУ КОМАНДОЙ
Ф ПАК 
//ПРОВЕРЯЕМ АЦПУ ЛИБО ОБРАЩАЕМСЯ К АДМИНИСТРАТОРУ:
СЕРП 4103  
 Ф001 
ИTM И BT. C E P П: BEP.15/ 23.02.88 
ЧTО- С.  
- ВЫДАЙ СВОДКУ АРФЫ!  
// Оператор получает сообщение
CM1П:41.51.ЭBM-3  ДATA:26.08.23 BPEMЯ:16.01.56  135.03

      BЫДAЙ CBОДKУ APФЫ!
       TEPM=03    ШИФP  410300

// подтверждает факт внесения области устно, или
// размещает документ в общем доступе в КРАБе.:


           АРХИВНЫЙ ТОМ  ****.  СВОБОДНО:  ****
              ФАКТИЧЕСКИ  СВОБОДНО:  ****
             ГРУППА:  0.     ВИД:  ДИСК


           ИНФОРМАЦИЯ С ТОМА **** / ****


     |    10  |   104-   113  |        |  ИМЯОБЛ   /999999

//Желательно размещать конфиденциально и открывать на чтение для
нужного пользователя директивой ОТК. 
      Д И P E K T И B A  - О T K - 
    ПО ДAHHОЙ ДИPEKTИBE ПPОИЗBОДИTCЯ ОTKPЫTИE ФAЙЛA, ИMЯ 
 KОTОPОГО УKAЗAHHО B ПAPAMETPE ДИPEKTИBЫ, HA ЗAПИCЬ И 
 УHИЧTОЖEHИE. 
 ФОPMA ОБPAЩEHИЯ: 
      ОTK [<ИMЯ>] [<XОЗЯИH>] 
 ECЛИ ПAPAMETP <ИMЯ> ОTCУTCTBУET, ОTKPЫBAETCЯ TEKУЩИЙ 
 ФAЙЛ. 

При этом остальные не могут
прочитать информацию если не знают номера архива и имени массива(файла),
а также шифра пользователя его разместившего.

Пользователь уведомляется через сообщение в КРАБе по директиве ПОЧ:

      Д И P E K T И B A  - П О Ч - 
    ПО ДAHHОЙ ДИPEKTИBE ПPОИЗBОДИTCЯ ОБMEH CООБЩEHИЯMИ 
 MEЖДУ ПОЛЬЗОBATEЛЯMИ CИCTEMЫ KPAБ. 
 ФОPMA ОБPAЩEHИЯ: 
      ПО[Ч] <AДPECAT> [<УB>] 
 ГДE: 
  <AДPECAT> - AДPECAT ДAHHОГО CООБЩEHИЯ 
  <УB>      - ПPИЗHAK HEОБXОДИMОCTИ B УBEДОMЛEHИИ ОTПPA- 
  BИTEЛЯ CООБЩEHИЯ B TОM, ЧTО AДPECAT ДAHHОE CООБЩEHИE 
  ПPИHЯЛ. 
 ПAPAMETP <AДPECAT> MОЖET БЫTЬ CЛEДУЮЩИM: 
 -   T:<NN>  :  HОMEP TEPMИHAЛA ПОЛУЧATEЛЯ 
 -   <ШИФP>  :  ШИФP ПОЛУЧATEЛЯ