Well you are quite innovative! :) What you are saying is that I in the )INIT section should read the dynarea data, "zap" I with my text" and save it in the same variable? (Your example as such will not work - as I want it to (seamlessly with FA).)
Best Regards, Thomas Berg ___________________________________________________________________ Thomas Berg Specialist zOS/RQM/IT Delivery Swedbank AB (Publ) Interactive is 'manual.' Batch is 'automatic.' > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of > Steve Coalbran > Sent: Thursday, June 04, 2015 6:55 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Fault Analyzer experts? > > Hej Thomas, > > Aha! Now I understand. > Can you copy the panel to your own library and add a *REXX section in the > )INIT for info? > > *REXX(*,dynarea,dynshad) > DO i = 1 BY 80 WHILE(SUBSTR(dynarea,i)<>"" ) > QUEUE SUBSTR(dynarea,i,80) > END > *ENDREXX > Substitute the dynarea & dynshad variables. > (Process the dynshad separately if you wish?) > (Assumes screen-width of 80) > > After the execution (I have a utility to do this called QBROWSE) > Command ===> QBROWSE > > /*REXX(QBROWSE) very cut down UNtested version (from memory, CITRIX > died!) */ > q = QUEUED() > CALL BPXWDYN "ALLOC RTDDN(TDD) RTDSN(TDS) SPACE(3,3)TRACK LRECL(80) > RECFM(FB) " > DO q > ADDRESS TSO "EXECIO 1 DISKW" tdd "(STEM R " > END > ADDRESS TSO "EXECIO 0 DISKW" tdd "(FINIS " > ADDRESS ISPEXEC "LMINIT DATAID(TD) DDNAME("tdd") " > ADDRESS ISPEXEC "VIEW DATAID(&TD) DDNAME("tdd") " > ADDRESS ISPEXEC "LMFREE DATAID(&TD) " > EXIT > > /Steve > > > > From: Thomas Berg <thomas.b...@swedbank.se> > To: IBM-MAIN@LISTSERV.UA.EDU > Date: 2015-06-04 16:56 > Subject: Re: Fault Analyzer experts? > Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> > > > > I know the panel in question but as the content is dynamically created (in > a dynamic area) I'm not helped by that. > > > > Best Regards, > Thomas Berg > ___________________________________________________________________ > Thomas Berg Specialist zOS/RQM/IT Delivery Swedbank AB (Publ) > > Interactive is 'manual.' Batch is 'automatic.' > > > > -----Original Message----- > > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of > > Steve Coalbran > > Sent: Thursday, June 04, 2015 4:22 PM > > To: IBM-MAIN@LISTSERV.UA.EDU > > Subject: Re: Fault Analyzer experts? > > > > Hej Thomas, > > Sorry I missed the bulk of the answers and this may be a duplicate. > > Does PANEL(IDIPIDAD) display? > > If so TYPE command DDLIST M IDIPIDAD to see the PANEL source --- if that > > helps. :-/ > > /Steve > > > > > > > > From: Thomas Berg <thomas.b...@swedbank.se> > > To: IBM-MAIN@LISTSERV.UA.EDU > > Date: 2015-06-04 16:10 > > Subject: Re: Fault Analyzer experts? > > Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> > > > > > > > > > -----Original Message----- > > > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] > On > > Behalf Of > > > Thomas Conley > > > Sent: Thursday, June 04, 2015 4:01 PM > > > To: IBM-MAIN@LISTSERV.UA.EDU > > > Subject: Re: Fault Analyzer experts? > > > > > > Thomas, > > > > > > i can't speak to all your issues, but for the PDSE's, make sure you > have > > > the latest maintenance applied. There have been a few HIPER's the > past > > > few months for PDSE corruption, so make sure you have the most current > > > PDSE maintenance. > > > > > > On the panel question, issue the PANELID comnmand, and the panel > member > > > name should appear in the upper left hand corner. You can use DDLIST > to > > > search for the member name, most likely in the IDIPENU dataset. You > > > should be able to create an SMP/E usermod to change that panel to say > > > anything you want for option 6. > > > > > > Regards, > > > Tom Conley > > > > > > Unfortunately the panel in question (IDIPIDAD) is dynamically created > (the > > content it is). > > So no cigar. > > (It seems to be quite common now to use dynamic panels. Although it > have > > its advantages for the developer it complicates customization...) > > (AFAIK we have all relevant PTFs.) > > > > > > > > Best Regards, > > Thomas Berg > > ___________________________________________________________________ > > Thomas Berg Specialist zOS/RQM/IT Delivery Swedbank AB (Publ) > > > > Interactive is ?manual.? Batch is ?automatic.? > > > > > > > > > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > > > > > > > Såvida annat inte anges ovan: / Unless stated otherwise above: > > IBM Svenska AB > > Organisationsnummer: 556026-6883 > > Adress: 164 92 Stockholm > > > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > > > > Såvida annat inte anges ovan: / Unless stated otherwise above: > IBM Svenska AB > Organisationsnummer: 556026-6883 > Adress: 164 92 Stockholm > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
