call "CBL_CREATE_CORE" using by value flags by value core-param by reference filename returning status-code
|Using call prototype (see Key)||Picture|
|flags||cblt-x4-comp5.||pic x(4) comp-5.|
|core-param||cblt-x4-comp5.||pic x(4) comp-5.|
|status-code||See Library Routines - Key|
This is a null-terminated string representing the name of the core file.
You can specify the following strings within the filename, which will be substituted when the core file is created.
If a filename is not supplied (that is, this parameter is set to a NULL pointer), then the core_filename tunable value is used for the name of the file. If that tunable is not set either, the filename defaults to a platform default of core or core.<pid>.
|1||Bad command line|
|2||Invalid process ID|
|3||Need to enable full core support|
|4||Not supported on this platform|
|5||Cannot execute OS core dump command|
|6||Cannot create core file|
|7||Invalid core file produced|
The following example will create a core file for the current process. The file will be called "myDump":
01 flags pic x(4) comp-5 value 0. 01 process pic x(4) comp-5 value 0. 01 filename pic x(7) value "myDump" & x"00". call "CBL_CREATE_CORE" using by value flags by value process by reference filename.
This example will create a core file for COBOL application running in a separate process, though started by the same user, with process id 18655, called "myDump.18655":
01 flags pic x(4) comp-5 value 0. 01 process pic x(4) comp-5 value 18655. 01 filename pic x(100) value "myDump.%p" & x"00". call "CBL_CREATE_CORE" using by value flags by value process by reference filename.