Return to Mainframe Utilities Page
Module
PROC 1 DATA_SET_NAME_OR_GO
/*********************************************************************/
/* COMPUWARE CORPORATION FARMINGTON HILLS, MICHIGAN */
/* F1 - INVOKE FILE-AID BROWSE (F.1) DIRECTLY */
/*********************************************************************/
CONTROL MSG
SET &FUNCVAR = &STR(1)
SET &DSNVAR = &STR(&DATA_SET_NAME_OR_GO)
IF &SUBSTR(1:1,&DSNVAR) = &STR(') -
THEN SET "E = &STR(QUOTE)
ELSE SET "E = &STR()
/*********************************************************************/
/* PASS PARMS TO FADYNALC TO SET LIBS AND INVOKE FILE-AID */
/*********************************************************************/
ISPEXEC SELECT -
CMD(%FADYNALC &FUNCVAR DSN(&DSNVAR) "E) NEWAPPL(FAXX)
END
Documentation
When you place $FB in front of a dataset name on the ISPF DSLIST screen (a.k.a. ISPF option 3.4) and press, you will be taken directly into File-Aid Browse and the dataset name will already be "pre-populated" in the "Dataset Name ===>" field. See "$F" for more information.

0 Comments