HPlogo Using KSAM XL and KSAM 64 > Appendix A COBOL Intrinsics

CKCLOSE

MPE documents

Complete PDF
Table of Contents
Index

E0300 Edition 4 ♥
E0394 Edition 3

A call to CKCLOSE terminates file processing for the specified KSAM file.

  CALL "CKCLOSE" USING filetable, status

When processing is completed, a KSAM file should be closed with a call to CKCLOSE. No further processing is allowed on the file until a CKOPEN procedure call opens the file.

CKCLOSE can be executed only for a file that is open.

Parameters


filetable

An 8 halfword record containing: the name of the file, its input/output type, access mode, the file number given the file when it was last opened, and a code indicating whether the previous operation on the file was successful and if so what it was. (Refer to Filetable Parameter discussion earlier in this section.)

status

One-halfword (two 8-bit characters) set to a pair of values upon completion of the call to CKCLOSE. It indicates whether or not the file was successfully closed and if not, why not. The left character is set to 0 if CKCLOSE is successful, to 9 if not. The right character is set to 0 if CKCLOSE is successful, to the file system error code if not. (Refer to Status Parameter discussion earlier in this section.)

Operation Notes


Upon successful completion of CKCLOSE, the file identified by filetable is no longer available for processing. Note that a KSAM file can be closed and then reopened in order to specify a different access mode or input/output type.

  FINISH.
    CALL "CKCLOSE" USING FILETABLE, STAT.
    IF STATUS-KEY-1 = "9" THEN
      CALL "CKERROR" USING STAT, RESULT
      DISPLAY "CKCLOSE ERROR NO. ", RESULT;
    ELSE DISPLAY "CKCLOSE SUCCESSFUL".




KSAM Logical Record Pointer


CKDELETE