QMF er på mange måder et godt værktøj, især når man har fået kommandoerne strømlinet som jeg beskrev i uge 35/2004. Der er dog stadig en enkelt rigtig irriterende detalje (ud over at split screen ikke virker direkte), nemlig EDIT QUERY kommandoen. Den EDIT session, man normalt får startet op er simpelthen ikke særlig god. Kommandolinien er i bunden og PF-tasterne er helt forkerte. Hvis man bare kunne få en EDIT-session, der svarer til den, man møjsommelig har sat op under ISPF...

Og det kan godt lade sig gøre. Følgende baserer sig på, at du har læst og fulgt anvisningerne i ovennævnte tip. Først og fremmest skal du oprette en kommando:

INSERT INTO QMF_COMMANDS
(VERB, OBJECT, SYNONYM_DEFINITION, REMARKS)
VALUES
('EQ'
,NULL
,'RUN PROC EQ'
,NULL
);

Så skal du etablere QMF proceduren EQ:

EDIT QUERY (E=MYEQEDIT
MESSAGE (TEXT = 'OK, ISPF EDIT session completed.'

Læg mærke til parameteren (E=MYEQEDIT. Denne parameter bevirker, at QMF vil starte en REXX kaldet MYEQEDIT. Denne REXX skal findes på SYSEXEC eller SYSPROC concateneringen. Og den skal helst se således ud:

/* REXX: MYEQEDIT */
ADDRESS ISPEXEC
"VGET ZAPPLID"
IF ZAPPLID = 'DSQE'
THEN
  "SELECT CMD(%MYEQEDIT) NEWAPPL(ISP)"
ELSE DO
  "LMINIT DATAID(MYDATAID) DDNAME(DSQEDIT)"
  "EDIT DATAID("MYDATAID")"
  "LMFREE DATAID("MYDATAID")"
END
EXIT 0

Denne REXX bevirker, at ISPF editoren bliver startet op under ISPF-applid ISP. Hvis ISPF-applid for din foretrukne ISPF EDIT-session er et andet, så er det selvfølgelig dette ISPF-applid, du skal skrive som parameter til NEWAPPL. Og så lige en advarsel, hvis du for sjov skriver NEWAPPL(DSQE), så loop'er ovenstående REXX. Så lad være med det. Og det er jo netop ideen at slippe væk fra ISPF-applid DSQE, så det er der heller ingen grund til at prøve.

Efter at have lavet ovenstående REXX og gemt den i et dataset på SYSEXEC eller SYSPROC, og forladt QMF efter at have indsat EQ kommandoen, så er du klar til at skrive EQ som kommando i QMF og opleve hvordan det er at have en ISPF editor i QMF, der virker ligesom ISPF editoren alle andre steder.

Som et surt opstød til IBM, så kan jeg endnu engang konstatere, at de mest spændende detaljer er gemt godt af vejen i manualer med den mest kedelige titel. Godbidden i dette tip er gemt af vejen i Installing and managing QMF.