XML COBOL FILE-NAME

This statement has the following parameters:

Parameter	Description
[FileName]	Optional. A nonnumeric literal or an identifier of an alphanumeric data item, the value of which specifies the default ModelFileName value (the string before the #) in the ModelFileName#DataName 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.

Parameter

Description

[FileName]

Optional. A nonnumeric literal or an identifier of an alphanumeric data item, the value of which specifies the default ModelFileName value (the string before the #) in the ModelFileName#DataName 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#DataName parameter of various subsequent XML Extensions statements. The default value will be used when the ModelFileName string is not specified in the ModelFileName#DataName parameter of those subsequent statements.

Example

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