|
Yesterday, I managed this... With the indented view open, I used the mouse to highlight (select) the area I wanted to print. Then I right-clicked and selected copy from the pop-up menu and pasted it into a text editor, then printed it. Prior to that, when I had the text highlighted, the Ctl-C key didn't copy and neither did Edit > Copy. Only right-clicking allowed me to copy to the clipboard. John B. >> How can I print an indented view of a program? The printer button is not >> active and neither is the printer selection from the file menu. >> Steve -----Original Message----- From: wdsci-l-bounces@xxxxxxxxxxxx [mailto:wdsci-l-bounces@xxxxxxxxxxxx]On Behalf Of wdsci-l-request@xxxxxxxxxxxx Sent: Tuesday, June 01, 2004 12:01 PM To: wdsci-l@xxxxxxxxxxxx Subject: WDSCI-L Digest, Vol 2, Issue 229 Send WDSCI-L mailing list submissions to wdsci-l@xxxxxxxxxxxx To subscribe or unsubscribe via the World Wide Web, visit http://lists.midrange.com/mailman/listinfo/wdsci-l or, via email, send a message with subject or body 'help' to wdsci-l-request@xxxxxxxxxxxx You can reach the person managing the list at wdsci-l-owner@xxxxxxxxxxxx When replying, please edit your Subject line so it is more specific than "Re: Contents of WDSCI-L digest..." Today's Topics: 1. Re: WDSCI-L Digest, Vol 2, Issue 228 (ewout.boter@xxxxxxxxx) 2. RE: CL Formatting, was WDSc workstation requirements (rob@xxxxxxxxx) 3. RE: CL Formatting, was WDSc workstation requirements (Vern Hamberg) ---------------------------------------------------------------------- message: 1 date: Tue, 1 Jun 2004 15:44:02 +0200 from: ewout.boter@xxxxxxxxx subject: [WDSCI-L] Re: WDSCI-L Digest, Vol 2, Issue 228 Joep, Thanks very much. I had never noticed this GUI-feature! Ewout ------------------------------ Ewout, Like in most trees in a GUI you can use the arrow key (left) to go to the node. Press the arrow key once more and the node is collapsed. Joep Beckeringh ewout.boter@xxxxxxxxx wrote: > Is there a way to collapse an expanded tree node in the Remote Systems > view? When I have expanded a source file with a large number of source > members, and I want to collapse the node, in order to keep the view > manageable, I have to go up to the start of the node, and then click the > minus sign. It would be nice if a node could be collapsed by > right-clicking somewhere in the expanded node and then selecting an option > 'Collapse'. Can this be arranged in some way? > > Ewout ------------------------------ ------------------------------ message: 2 date: Tue, 1 Jun 2004 09:47:56 -0500 from: rob@xxxxxxxxx subject: RE: [WDSCI-L] CL Formatting, was WDSc workstation requirements How would Ernie's program reformat this: SAV DEV(&SAVDEV) + OBJ(('/*') + ('/QSYS.LIB' *OMIT) /* Saved with SAVLIB */ + ('/QDLS' *OMIT) /* Saved with SAVDLO */ + ('/QCA400' *OMIT) /* iSeries access updates */ + ('/QFileSvr.400' *OMIT) /* 400-to-400 mapping */ + ('/QOPT' *OMIT) /* Optical drives */ + ('/QPWX*' *OMIT) + ('/QTCPTMM' *OMIT) + ('/tmp' *OMIT) /* Temp data, avoid conflicts */ + ('/PSF400' *OMIT) + ('/PSFSMTP' *OMIT) + ('/QIBM/ProdData/InfoCenter' *OMIT)) + SAVACT(*YES) SAVACTOPT(*ALWCKPWRT) + OUTPUT(*PRINT) EXPDATE(&EXPDT) + ENDOPT(*LEAVE) UPDHST(*YES) Which got reformatted to the yuck that SEU does? Try pasting that into SEU and reformatting that with F4 and run it through Ernie's program. Basically my point is not to rely on these types of tools. Rob Berendt -- Group Dekko Services, LLC Dept 01.073 PO Box 2000 Dock 108 6928N 400E Kendallville, IN 46755 http://www.dekko.com "SamL" <lennon_s_j@xxxxxxxxxxx> Sent by: wdsci-l-bounces@xxxxxxxxxxxx 05/28/2004 08:02 PM Please respond to Websphere Development Studio Client for iSeries <wdsci-l@xxxxxxxxxxxx> To "'Websphere Development Studio Client for iSeries'" <wdsci-l@xxxxxxxxxxxx> cc Fax to Subject RE: [WDSCI-L] CL Formatting, was WDSc workstation requirements Vern said: "I go back and forth on this. I try to do nice indents and other "pretty-print" stuff, and, of course, that's wiped out if you prompt in SEU. So I give up on "pretty-print". But then the structure is harder to follow." I do a fair amount of CL coding, but I still rely heavily on F4 in SEU. (Why overload my brain with details when command prompting is one of the great facilities of OS/400?) I hate the default formatting that results. Fortunately, many years ago Ernie Malaga (?sp) wrote a CL formatter for Midrange Computing. I like and have grown used to the indented source it creates. If I destroy the formatting by prompting it takes just a couple of seconds to reformat the whole program. It's a REXX program that is quite nippy on RISC machines. It relies on fully prompted CL code, but for me that isn't an issue, though I know some people consider some command keywords as "noise". I run Ernie's command as a PDM user option. Works great for me, since I do most CL programming in SEU because I find the LPEX prompting too slow. I do tidy up and comment the code in LPEX. (In theory I suppose I could run the indenter from RSE as long as the member isn't open in LPEX.) The formatter will stop working at V5R3 when new opcodes are introduced to CL, but I suspect it could be upgraded, though I'm not a REXX expert. Seems to me that something similar could/should be put into the LPEX editor for CL, but auto indenting of RPG Free is probably more important. Sam FWIW, here's a sample of the resulting indented codel: /* If not *ALL, process member immediately */ IF COND(&SRCMBR *NE '*ALL') THEN(DO) RTVMBRD FILE(&SRCFLIB/&SRCF) MBR(&SRCMBR) SRCTYPE(&SRCTYPE) IF COND(&SRCTYPE *NE 'CL' *AND &SRCTYPE *NE 'CLP' *AND + &SRCTYPE *NE 'CLP38') THEN(DO) SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) MSGDTA('Member' + *BCAT &SRCMBR *BCAT 'is not a CL source member') + MSGTYPE(*ESCAPE) RETURN ENDDO ELSE CMD(DO) CALL PGM(INDCLC2) PARM(&SRCMBR &SRCF &SRCFLIB &CVTCASE + &INDRMKS &OUTPUT &SAVOLDSRC &BGNCOL &INDCOL &INDCONT) MONMSG MSGID(CPF0000) EXEC(DO) RCVMSG MSGTYPE(*EXCP) MSGDTA(&MSGDTA) MSGID(&MSGID) + MSGF(&MSGF) MSGFLIB(&MSGFLIB) SNDPGMMSG MSGID(&MSGID) MSGF(&MSGFLIB/&MSGF) + MSGDTA(&MSGDTA) MSGTYPE(*ESCAPE) RETURN ENDDO ENDDO ENDDO >>-----Original Message----- >>From: wdsci-l-bounces+lennon_s_j=hotmail.com@xxxxxxxxxxxx >>[mailto:wdsci-l-bounces+lennon_s_j=hotmail.com@xxxxxxxxxxxx] On >>Behalf Of Vern Hamberg >>Sent: Friday, May 28, 2004 4:28 PM >>To: Websphere Development Studio Client for iSeries >>Subject: Re: [WDSCI-L] CL Formatting, was WDSc workstation >>requirements >> >>Rob >> >>I go back and forth on this. I try to do nice indents and other >>"pretty-print" stuff, and, of course, that's wiped out if you prompt >>in >>SEU. So I give up on "pretty-print". But then the structure is >>harder to >>follow. >> >>jLPEX in RSE has done some (IMO) really bad things. I've reported >>some and >>I think they're on the list for being fixed. I believe the latest >>version >>will/does have better options/customization for formatting CL - hope >>so. >>Because I'd really like to keep indents, etc. Esp. with the new >>structured >>opcodes in V5R3. >> >>Of course, you'll never use those, since you don't use CL, >>right? Ducking!! ;-) >> >>Happy Memorial Day >>Vern >> >>At 01:02 PM 5/28/2004, you wrote: >>>Vern, >>> >>>I detest the CL formatting in SEU. There is too much wasted space >>on the >>>left. And often times I don't want the real estate eaten up by the >>>parameters. For instance I find this much easier to process >>> DCL &USER *CHAR 10 /* User profile >>*/ >>> DCL &EMAILADR *CHAR 50 /* Email address >>*/ >>> >>>Than how SEU would format that, when prompted. >>> >>>Or when I type in the following, and some messes it up by prompting >>it in >>>SEU: >>>SAV DEV(&SAVDEV) + >>> OBJ(('/*') + >>> ('/QSYS.LIB' *OMIT) /* Saved with SAVLIB */ + >>> ('/QDLS' *OMIT) /* Saved with SAVDLO */ + >>> ('/QCA400' *OMIT) /* iSeries access updates */ + >>> ('/QFileSvr.400' *OMIT) /* 400-to-400 mapping */ + >>> ('/QOPT' *OMIT) /* Optical drives */ + >>> ('/QPWX*' *OMIT) + >>> ('/QTCPTMM' *OMIT) + >>> ('/tmp' *OMIT) /* Temp data, avoid conflicts */ + >>> ('/PSF400' *OMIT) + >>> ('/PSFSMTP' *OMIT) + >>> ('/QIBM/ProdData/InfoCenter' *OMIT)) + >>> SAVACT(*YES) SAVACTOPT(*ALWCKPWRT) + >>> OUTPUT(*PRINT) EXPDATE(&EXPDT) + >>> ENDOPT(*LEAVE) UPDHST(*YES) >>> >>>Rob Berendt >>>-- >>>Group Dekko Services, LLC >>>Dept 01.073 >>>PO Box 2000 >>>Dock 108 >>>6928N 400E >>>Kendallville, IN 46755 >>>http://www.dekko.com >>> >>> >>> >>> >>> >>>Vern Hamberg <vhamberg@xxxxxxxxxxxxxxxxxxxxxxxxx> >>>Sent by: wdsci-l-bounces@xxxxxxxxxxxx >>>05/28/2004 12:14 PM >>>Please respond to >>>Websphere Development Studio Client for iSeries <wdsci- >>l@xxxxxxxxxxxx> >>> >>> >>>To >>>Websphere Development Studio Client for iSeries <wdsci- >>l@xxxxxxxxxxxx> >>>cc >>> >>>Subject >>>RE: [WDSCI-L] WDSc workstation requirements >>> >>> >>> >>> >>> >>> >>>Charles, you got me looking again. >>> >>>I don't know about whether to view CODE as a separate product or as >>a >>>feture - IBM does the latter, I'll live with that. >>> >>>Nonetheless, I agree that it should be more explicit. And there is >>even >>>more confusion here -are you guys in Toronto listening? I know you >>are. >>>;-) >>> >>>On the "Features" page for the client is a link to CODE and one to >>VARPG. >>>There is also a link to "Server development tools". The latter >>points to >>>things like the WAS test environment, and there is NO WAY that runs >>in >>>256MB. (The requirements page even says this.) So, the exact same >>phrase >>>is >>>used for completely different aspects of the same product, with >>>contradictory recommendation. It'd be better to say something like >>>"Classic >>>Tools" - 256MB, 233MHz PII on the requirements page, IMO. >>> >>>Now the main reason I believe these minima are for the classic >>tools is, >>>they are the same as the requirements for the separately packaged >>version >>>of those tools in the old WDT, IIRC. >>> >>>So, bottom line, maybe--if all you do is RPG, CL, and DDS, install >>the >>>whole blame package (you have to anyway, until the latest version) >>with >>>classic tools (I forget the name on the install dialog) and do not >>start >>>WDSC itself, rather start the classic tools stand-alone. You will >>not need >>> >>>a monster machine to do this. But the minute you want to try the >>new >>>client >>>(which is getting better and better), get the horsepower - you'll >>need it. >>> >>>And, BTW, I will not use either client for CL- formatting gets >>really >>>strange, compared to SEU. I like what I'm used to, behaviorally and >>the >>>results I get. I understand there are changes in the RSE client >>>forthcoming >>>but not in CODE - deprecation lives. >>> >>>Cheers >>>Vern >> >> >>_______________________________________________ >>This is the Websphere Development Studio Client for iSeries (WDSCI- >>L) mailing list >>To post a message email: WDSCI-L@xxxxxxxxxxxx >>To subscribe, unsubscribe, or change list options, >>visit: http://lists.midrange.com/mailman/listinfo/wdsci-l >>or email: WDSCI-L-request@xxxxxxxxxxxx >>Before posting, please take a moment to review the archives >>at http://archive.midrange.com/wdsci-l. _______________________________________________ This is the Websphere Development Studio Client for iSeries (WDSCI-L) mailing list To post a message email: WDSCI-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/wdsci-l or email: WDSCI-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/wdsci-l. ------------------------------ message: 3 date: Tue, 01 Jun 2004 11:03:44 -0500 from: Vern Hamberg <vhamberg@xxxxxxxxxxxxxxxxxxxxxxxxx> subject: RE: [WDSCI-L] CL Formatting, was WDSc workstation requirements This'll be a mess. it is stated in the article that this will not look good - internal comments, etc. The tool, as many that were provided by MC in those days, is a quick-and-dirty kind of thing. An extension to the tool would be to put list items on separate lines, as you show here. There's a lot of clarity in that arrangement. And to do a few things that'd help scanning, like omit certain keywords. An example could be the COND() keyword of the IF and ELSE commands. The following: if (&lib *eq 'QTEMP') do /* run some code */ enddo else if (&lib &eq 'QSYS') do /* run some other code */ enddo else do /* still another set of commands */ enddo scans better, IMO, than: if cond(&lib *eq 'QTEMP') then(do) /* run some code */ enddo else cmd(if (&lib &eq 'QSYS') then(do)) /* run some other code */ enddo else cmd(do) /* still another set of commands */ enddo And the tool right now does not hadle comments aw well as I'd like, esp. a comment header. But it's a start, and there are enough parameters to control the output that it is pretty useful, I think. None of these magazine items are polished applications, after all. Let's hope the newer RSE editor handles things better. Vern At 09:47 AM 6/1/2004, you wrote: >How would Ernie's program reformat this: >SAV DEV(&SAVDEV) + > OBJ(('/*') + > ('/QSYS.LIB' *OMIT) /* Saved with SAVLIB */ + > ('/QDLS' *OMIT) /* Saved with SAVDLO */ + > ('/QCA400' *OMIT) /* iSeries access updates */ + > ('/QFileSvr.400' *OMIT) /* 400-to-400 mapping */ + > ('/QOPT' *OMIT) /* Optical drives */ + > ('/QPWX*' *OMIT) + > ('/QTCPTMM' *OMIT) + > ('/tmp' *OMIT) /* Temp data, avoid conflicts */ + > ('/PSF400' *OMIT) + > ('/PSFSMTP' *OMIT) + > ('/QIBM/ProdData/InfoCenter' *OMIT)) + > SAVACT(*YES) SAVACTOPT(*ALWCKPWRT) + > OUTPUT(*PRINT) EXPDATE(&EXPDT) + > ENDOPT(*LEAVE) UPDHST(*YES) >Which got reformatted to the yuck that SEU does? Try pasting that into >SEU and reformatting that with F4 and run it through Ernie's program. >Basically my point is not to rely on these types of tools. > >Rob Berendt ------------------------------ _______________________________________________ This is the Websphere Development Studio Client for iSeries (WDSCI-L) digest list To post a message email: WDSCI-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/wdsci-l or email: WDSCI-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/wdsci-l. End of WDSCI-L Digest, Vol 2, Issue 229 ***************************************
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.