![]() |
Enhanced Procedure Mode
The enhanced procedure mode allows all kinds of file processing, as well as the ability to create and control Connections from a procedure. This mode provides the full functional scope of CFS in procedure mode. This is achieved by trapping all WRTRD calls (screen input requests) and supplying the input from SYSDTA records. The screen message headers are managed by CFS itself.
CFS behaves in enhanced procedure mode in exactly the same way as it does for the user in dialog mode. This means that the procedure must be created with very careful regard to the program flow. Unforeseen CFS requests, such as whether or not a a file should be overwritten will affect the normal program run. The NQx command can be used to suppress any queries from the outset.
Terminating CFS in enhanced procedure mode is achieved in the same way as under dialog. There is no single, unique terminating condition. Instead, the different ways to terminate it are based on the situation that the program is in at the time. The END command can be used (* cannot be used, since it would be interpreted as a remark), or the CFS termination query can be answered with T (Terminate).
The task switch 11 may not be set if the enhanced procedure mode is to be used. In contrast to the basic procedure mode, the keyword records for file selection must have a *002 header. This causes CFS to accept the following commands and mask input from SYSDTA. The *002 records have the same format as *001 records.