isCOBOL Evolve : Appendices : Library Routines : C$OPENSAVEBOX : OPENSAVE-NEXT
OPENSAVE-NEXT
The OPENSAVE-NEXT function returns the next item selected by the user when multiple selection was allowed. This function should be called multiple times after OPENSAVE-OPEN-BOX-MULTI and OPENSAVE-BROWSE-FOLDER-MULTI in order to retrieve the list of selected items. When no more items are available, -1 is returned as exit status.
Syntax:
 CALL "C$OPENSAVEBOX" USING OPENSAVE-NEXT 
                            OPENSAVE-DATA
                     GIVING returnCode
Parameters:
OPENSAVE-NEXT
Constant
 
OPENSAVE-DATA
Group Item
When the OPENSAVE-NEXT function returns successfully, this structure receives information about the user's selection. This group item, defined in isopensave.def, has the following structure:
 
01  opensave-data.
    03 opnsav-filename       pic x(256).
    03 opnsav-flags          pic 9(4) comp-x value 0.
    03 opnsav-default-ext    pic x(12).
    03 opnsav-title          pic x(80).
    03 opnsav-filters        pic x(512).
    03 opnsav-default-filter pic 9(4) comp-x value 0.
    03 opnsav-default-dir    pic x(128).
    03 opnsav-basename       pic x(128).
 
opnsav-filename
Specifies the default filename. When the OPENSAVE-BROWSE-FOLDER function returns successfully, it receives the drive designator and path of the first selected directory.
 
opnsav-flags
Not used
 
opnsav-default-ext
Not used.
 
opnsav-title
String to be placed in the title bar of the dialog box. If this member is spaces, the system uses the default title.
 
opnsav-filters
Not used.
 
opnsav-default-filter
Not used.
 
opnsav-default-dir
Specifies the initial directory.
 
opnsav-basename
Not used.
Return code:
returnCode can be any signed numeric data item and provides additional information:
1
The next item has been returned.
-1
No more items available.