OpenTP1 Version 7 Programming Reference COBOL Language
CBLDCADM ('COMPLETE') - Report the completion of user server start processing
Format
PROCEDURE DIVISION specification
CALL 'CBLDCADM' USING unique-name-1 |
DATA DIVISION specification
01 unique-name-1. 02 data-name-A PIC X(8) VALUE 'COMPLETE'. 02 data-name-B PIC X(5). 02 FILLER PIC X(3). 02 data-name-Z PIC S9(9) COMP VALUE ZERO. |
Description
CBLDCADM('COMPLETE') notifies OpenTP1 that SUP activation has been completed. SUP activation is completed when CBLDCADM('COMPLETE') returns normally.
For SPPs and MHPs, the normal termination of CBLDCRSV('MAINLOOP') and CBLDCMCF('MAINLOOP') is regarded as the completion of activation. Therefore, there is no need for calling CBLDCADM('COMPLETE').
CBLDCADM('COMPLETE') cannot be called from a UAP that handles offline work.
Data areas whose values are set in the UAP
data-name-A
VALUE 'COMPLETE' is assigned to the request code indicating the report that user server activation has been completed.
data-name-Z
Specify 0.
Data areas to which values are returned from OpenTP1
data-name-B
A status code of 5 digits is returned.
Status codes
Status code | Explanation |
---|---|
00000 | Normal termination |
01802 | The request code (data-name-A) is invalid. |
01830 | An error occurred during communication between processes. |
01831 | The value specified for the data name is invalid. |
01832 | A status information input/output error occurred. |
01833 | The user server is not being started/restarted normally. |
All Rights Reserved. Copyright (C) 2006, 2010, Hitachi, Ltd.