IBM Mainframe Forum

[chinkump]

Hi,

We were earlier using FileAid but now we have moved to FileManger. Now F1,F2,F33 keys are not working for filemanager.I am trying to code same F1,F2,F33 key for filemanger.

I have written below clist which is throwing errors. Details are as below.
******************************************************************************************
ISPN106
DDname not allocated
DDname 'FALLIB' specified on LIBDEF service not allocated

Current dialog statement:
ISPEXEC LIBDEF ISPLLIB ID(FALLIB)
*******************************************************************************************

Below is the code that I have written for the invocation of F1 key
*******************************************************************************************
PROC 1 DATA_SET_NAME_OR_GO
CONTROL MSG
SET &FUNCVAR = &STR(3.1)
SET &dsnvar = &STR(&DATA_SET_NAME_OR_GO)
IF &SUBSTR(1:1,&DSNVAR) = &STR(') -
THEN SET &QUOTE = &STR(QUOTE)
ELSE SET &QUOTE = &STR()
ISPEXEC SELECT -
CMD(%FMN2INIT &FUNCVAR DSN(&DSNVAR) &QUOTE) NEWAPPL(FMNPDSV)
END
*********************************************************************************************
FMNPDSV::This is the name of the view panel in Filemanger
FMN2INIT::This invokes filemanager

Please suggest me how can I resolve this problem. Any alternate solution is also most welcome.

Thanks,
Chinkump

[Akatsukami]

Talk to IBM about this.

[NicC]

Just a couple of note - Nothing is "thrown" on the mainframe = errors are encountered/met/displayed/issued etc. but NEVER thrown.
F1 is usually reserved for application help so you want to avoid changing this key's assignment
Rexx is, nowadays, the preferred language rather than CLIST.

[Pedro]

Try adding PASSLIB to your SELECT statement.

[Giridhar]

Hi,

Plz let me know if any one is able to use F33 for File Manager

Thanks,
Giridhar

[Akatsukami]

1. No such thing is "F33".
2. Don't revive a years-old thread.

[NicC]

And the word is "Please" not 'Plz'