XML COBOL FILE-NAME

This statement has the following parameters:

Parameter Description
[filename] An optional string value that specifies the default ModelFileName value (the string before the #) in the ModelFileName#DataFileName parameter for subsequent statements that do not explicitly specify a ModelFileName. If omitted or specified with a value of spaces, the default ModelFileName value is reset to spaces, eliminating any previously set default ModelFileName value. If the parameter value is #, the name of the COBOL object file for the currently running COBOL program is used to set the default ModelFileName value. Otherwise, the current value of the parameter is used " as is" to set the default ModelFileName value.

Description

The XML COBOL FILE-NAME statement allows the developer to set the default ModelFileName (the string before the #) in the ModelFileName#DataFileName parameter of various subsequent XML Extensions statements. The default value will be used when the ModelFileName string is not specified in the ModelFileName#DataFileName parameter of those subsequent statements. This statement has the following parameters:

Example

XML COBOL FILE-NAME 
            MY-FILE. 
IF NOT XML-OK GO TO Z.