Учебники

CICS — Операции управления

Сентябрь 19, 2018

Программа управления программами CICS (PCP) управляет потоком прикладных программ. Все прикладные программы должны иметь запись в Таблице обработки программ. Ниже приведены команды, которые используются для служб управления программами:

  • XCTL
  • Ссылка на сайт
  • нагрузка
  • Релиз
  • Вернуть

Программные логические уровни

Прикладные программы, которые выполняются в CICS, имеют различные логические уровни. Первая программа, которая получает управление напрямую, находится на самом высоком логическом уровне, то есть на уровне 1. Связанная программа находится на следующем логическом уровне от программы связывания. Программы XCTL работают на одном уровне. Будет ясно, когда мы пройдем через Link и XCTL, позже в этом модуле. На следующем рисунке показаны логические уровни —

CICS Control Operations

XCTL

Основное объяснение XCTL заключается в следующем —

  • Команда XCTL используется для передачи управления от одной программы к другой на том же уровне.

  • Не ожидает контроля назад.

  • Это похоже на оператор GO TO.

  • Программа XCTL может быть псевдо-разговорной.

Команда XCTL используется для передачи управления от одной программы к другой на том же уровне.

Не ожидает контроля назад.

Это похоже на оператор GO TO.

Программа XCTL может быть псевдо-разговорной.

пример

В следующем примере показано, как использовать команду XCTL для передачи элемента управления другой программе. 

IDENTIFICATION DIVISION.                                         
PROGRAM-ID. PROG1.  
WORKING-STORAGE SECTION.
01 WS-COMMAREA    PIC X(100).                                             
PROCEDURE DIVISION.

EXEC CICS XCTL
   PROGRAM ('PROG2')
   COMMAREA (WS-COMMAREA)
   LENGTH (100)
END-EXEC.

Эта команда передает управление, которое должно быть передано программе PROG2 со 100 байтами данных. COMMAREA является необязательным параметром и представляет собой имя области, содержащей данные для передачи или область, в которую должны быть возвращены результаты.

Ссылка на сайт

Команда Link используется для передачи управления в другую программу на более низком уровне. Ожидает контроля обратно. Связанная программа не может быть псевдоговорящей.

пример

В следующем примере показано, как использовать команду Link для передачи элемента управления другой программе. 

IDENTIFICATION DIVISION.                                         
PROGRAM-ID. PROG1.  
WORKING-STORAGE SECTION.
01 WS-COMMAREA    PIC X(100).                                             
PROCEDURE DIVISION.

EXEC CICS LINK
   PROGRAM ('PROG2')
   COMMAREA (WS-COMMAREA)
   LENGTH (100)
END-EXEC.

нагрузка

Команда загрузки используется для загрузки программы или таблицы. Ниже приведен синтаксис команды загрузки: 

EXEC CICS LOAD
   PROGRAM ('name')
END-EXEC.

Релиз

Команда Release используется для освобождения программы или таблицы. Ниже приводится синтаксис команды Release — 

EXEC CICS RELEASE
   PROGRAM ('name')
END-EXEC.

Вернуть

Команда возврата используется для возврата управления на следующий более высокий логический уровень. Ниже приведен синтаксис команды возврата — 

EXEC CICS RETURN
   PROGRAM ('name')
   COMMAREA (data-value)
   LENGTH (data-value)
END-EXEC.

Интервальные контрольные операции

Операции интервального контроля бывают следующих двух типов:

ASKTIME

ASKTIME используется для запроса текущего времени и даты или метки времени. Затем мы перемещаем это значение в рабочую переменную хранилища внутри программы. Ниже приведен синтаксис команды ASKTIME — 

EXEC CICS ASKTIME
   [ABSTIME(WS-TIMESTAMP)]
END-EXEC.

FormatTime

FORMATTIME форматирует отметку времени в требуемый формат на основе параметров, которые могут быть YYDDD, YYMMDD или YYDDMM для даты. DATESEP указывает разделитель для DATE, как и переменная TIMESEP для TIME. Ниже приведен синтаксис команды FORMATTIME —

49
Share: