OpenTP1 Version 7 Programming Reference COBOL Language

[Contents][Index][Back][Next]

CBLDCMCF('TIMERCAN') - Cancel user timer monitoring

Format

PROCEDURE DIVISION specification

CALL 'CBLDCMCF' USING unique-name-1 unique-name-2.

DATA DIVISION specification

01 unique-name-1.
   02 data-name-A  PIC X(8) VALUE 'TIMERCAN'.
   02 data-name-B  PIC X(5).
   02 FILLER      PIC X(3).
   02 data-name-C  PIC X(16).
01 unique-name-2.
   02 data-name-D  PIC 9(9) COMP.
   02 data-name-E  PIC 9(9) COMP.
   02 data-name-F  PIC X(16).
   02 data-name-G  PIC X(8).
   02 data-name-H  PIC X(8).
   02 data-name-I   PIC X(16).

Description

CBLDCMCF('TIMERCAN') cancels the user timer monitor that was set by CBLDCMCF('TIMERSET').

This program cancels the user timer monitor as soon as CBLDCMCF('TIMERCAN') returns normally.

If the user timer monitor has reached timeout and an MHP has already been started at the time CBLDCMCF('TIMERCAN') is called, CBLDCMCF('TIMERCAN') returns with the error 70910.

Only a user server can call CBLDCMCF('TIMERCAN').

Data areas whose values are set in the UAP

data-name-A

Specify VALUE 'TIMERCAN' for the request code indicating cancellation of user timer monitoring.

data-name-C

Specify LOW-VALUE.

data-name-D

Specify 0.

data-name-E

Specify the same timer request identifier as that specified when the user timer monitor was set by CBLDCMCF('TIMERSET').

data-name-F

Specify LOW-VALUE.

data-name-G

Specify the same logical terminal name as that specified when the user timer monitor was set by CBLDCMCF('TIMERSET'). When specifying a name consisting of fewer than 8 characters, pad the name by entering spaces after the name.

data-name-H

Specify LOW-VALUE.

data-name-I

Specify LOW-VALUE.

Data area to which a value is returned from OpenTP1

data-name-B

A status code of 5 digits is returned.

Status codes

Status code Explanation
00000 Normal termination.
72016 The value specified for data-name-C is invalid.
The value specified for data-name-I is invalid.
72028 The value specified for data-name-A is invalid.
70910 The value specified for data-name-E is invalid.
The timer request identifier specified for data-name-E is not registered.
Timeout already occurred and the application has started, or the user timer monitor was already canceled.
70911 The value specified for data-name-F is invalid.
70912 The value specified for data-name-G is invalid.
70916 The requested facility is not defined in the MCF.
Other than the above An unprecedented error (e.g., program damage) occurred.