cdisco - Contingency-Routine abmelden (BS2000)

Definition

#include <cont.h>

void cdisco(struct enacop *enacopar);

Beschreibung

cdisco() meldet eine mit cenaco() definierte Contingency-Routine (TU bzw. P1) ab. Ausführliche Informationen zu Contingency-Routinen finden Sie im Abschnitt "Contingency- und STXIT-Routinen“ und im Handbuch „Makroaufrufe an den Ablaufteil“ [10].

Die Struktur enacop ist wie folgt in cont.h definiert:

struct enacop
{
  char resrv1 [7];        /* reserved for int. use   */
  char coname [54];       /* name of cont. routine   */
  char resrv2 [15];       /* reserved for int. use   */
  char level;             /* priority of cont.rout.  */
  int  (*econt)();        /* start adr of cont.rout. */
  int  comess;            /* contingency message     */
  char coidret [4];       /* contingency identifier  */
  errcod secind;          /* secondary indicator     */
  char resrv3 [2];        /* reserved for int. use   */
  errcod rcode1;          /* return code             */
};
#define errcod     char
#define _norm      0      /* normterm                */
#define _abnorm    4      /* abnormend               */
#define _enabled   4      /* codefenabled            */
#define _preven    12     /* coprevenabled           */
#define _parerr    16     /* coparerror              */
#define _maxexc    24     /* comaxexceed             */

cdisco() wertet nur die Strukturkomponente coidret (Kurzkennung des Contingency-Prozesses) aus.

Strukturkomponenten, die von cdisco() versorgt werden: 

secind	"Secondary Indicator", wie er nach Ausführung des ENACO-Makros im höchstwertigen Byte des Register 15 abgelegt wird (Werte 4 oder 20).
rcode1	"Return Code", wie er nach Ausführung des ENACO-Makros im niedrigstwertigen Byte des Register 15 abgelegt wird (Werte 0 oder 4).

Siehe auch

cenaco().