|
Thank you -----Original Message----- From: midrange-l-request@xxxxxxxxxxxx [mailto:midrange-l-request@xxxxxxxxxxxx] Sent: Tuesday, January 20, 2004 4:35 PM To: midrange-l@xxxxxxxxxxxx Subject: MIDRANGE-L Digest, Vol 3, Issue 84 Send MIDRANGE-L mailing list submissions to midrange-l@xxxxxxxxxxxx To subscribe or unsubscribe via the World Wide Web, visit http://lists.midrange.com/mailman/listinfo/midrange-l or, via email, send a message with subject or body 'help' to midrange-l-request@xxxxxxxxxxxx You can reach the person managing the list at midrange-l-owner@xxxxxxxxxxxx When replying, please edit your Subject line so it is more specific than "Re: Contents of MIDRANGE-L digest..." Today's Topics: 1. Re: Can I view a PMR via the web? (IEckes@xxxxxxxxxxxxxxxxxx) 2. RE: 5250 Data Streams WAS: Arrow keys + scroll keys (Pete Helgren) 3. RE: Journaling... Help me understand (Walden H. Leverich III) 4. 3 letter abbrevations for OS/400 Commands (Don.McCully@xxxxxxxxxxxxx) 5. RE: Embedded Sql problem (Pete Helgren) 6. RE: Embedded Sql problem (Elvis Budimlic) 7. draft-murphy-iser-telnet-01.txt (Jeff Stevens) 8. opendir(), getcwd (rick.baird@xxxxxxxxxxxxxxx) 9. Re: IFS object attributes (Scott Klement) 10. Re: Journaling... Help me understand (G Armour) ---------------------------------------------------------------------- message: 1 date: Tue, 20 Jan 2004 14:32:23 -0600 from: IEckes@xxxxxxxxxxxxxxxxxx subject: Re: Can I view a PMR via the web? When I do this it shows only our old account number. We have since changed our account number. How do we get to see the ones under our new account? ------------------------------ message: 2 date: Tue, 20 Jan 2004 13:29:17 -0700 from: "Pete Helgren" <pete@xxxxxxxxxx> subject: RE: 5250 Data Streams WAS: Arrow keys + scroll keys The short answer here is that I don't have enough info at the time to "report in" although when I have a more functional prototype I can share here, I'll actually point back to the tn5250j site at Sourceforge where I'll post the code. Scott Klement, who responded earlier, actually brought me full circle: I had started at tn5250j, wandered over to the OS-OHIO site, built a shell prototype of a 5250 HTML servlet, needed more information on using and formatting 5250 data and then James and Booth's knowledgeable-looking posts about 5250 data sparked the thought that they may have an easier to understand set of documentation for 5250. So around and around we go. For the list's benefit, I am working on the perhaps Quixotic idea that a 5250 emulator can be built using HTML. NOT like WSG (which was both ugly and slow) and not screen scraping, just a good, basic, no bells and whistles 5250 emulator. The reason: iSeries access is bloatware at its best (or worst), Mochasoft TN5250 is excellent and cheap but can't be easily integrated into the HTML and java apps we are working with, tn5250j is an excellent, open source TN5250 java applet/application but using a heavy, client-side JVM gives me the "support willies" so rolling my own for HTML was the option I arrived at. The lack of open source, "pure" HTML-based Telnet clients (plenty of applets) tells me that this is probably a fools errand but, that hasn't stopped me in the past. The quick impression of OS-OHIO is: If *I* can write a 5250 servlet prototype in just a few hours, it must be easy. Completing the project will be the true test of it's usefulness though. Pete Helgren > -----Original Message----- > From: midrange-l-bounces@xxxxxxxxxxxx > [mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Nathan M. Andelin > Sent: Tuesday, January 20, 2004 11:13 AM > To: midrange-l@xxxxxxxxxxxx > Subject: RE: 5250 Data Streams WAS: Arrow keys + scroll keys > > > Hi Pete, > > It might help the list to know some of your impressions of the OHIO > interface at: > > http://os-ohio.sourceforge.net/ > > The OHIO interface evidently insulates developers from intricate > details of > the 5250 Data Stream. How about that approach? > > Nathan. > ------------------------------ message: 3 date: Tue, 20 Jan 2004 15:38:31 -0500 from: "Walden H. Leverich III" <WaldenL@xxxxxxxxxxxxxxx> subject: RE: Journaling... Help me understand Think of them as an _efficient_ copy of every change you make to a file. They're required for commitment control (without it how would the machine know what the row used to look like), and useful for other things. There are two reasons people usually use journals: 1) Support commitment control and access path rebuilds and 2) Audit In the first case I'd setup journaling so the machine attaches new receivers as needed and deletes the old ones. You don't care that they exist, it's the machine that needs them. In the second case I'd still setup journaling so the machine attaches a new journal receiver as needed but obviously you can't delete it until it's saved somewhere. Oh, that brings up the difference between journals and journal receivers. The journal is a big funnel that the system throws things into. The Receiver is the bucket that the funnel dumps stuff into. You can put new buckets under the funnel when the old buckets are full, that's called changing the receiver. -Walden ------------ Walden H Leverich III President & CEO Tech Software (516) 627-3800 x11 (208) 692-3308 eFax WaldenL@xxxxxxxxxxxxxxx http://www.TechSoftInc.com Quiquid latine dictum sit altum viditur. (Whatever is said in Latin seems profound.) -----Original Message----- From: Wills, Mike N. (TC) [mailto:MNWills@xxxxxxxxxxxxxx] Sent: Tuesday, January 20, 2004 2:59 PM To: Midrange Systems Technical Discussion Subject: Journaling... Help me understand Is there a book, a class, or just get general help about journals? I don't understand them enough and now that we are starting to use them I feel I should understand how to maintain and use them. I know that they record what is changed in the file so that you can "back out" of a problem, but beyond that I know little about them. Can anyone help me out on this? Thanks. Mike Wills Lawson Programmer/Administrator Taylor Corporation Email: mnwills AT taylorcorpNOSPAM DOT com AIM: iSeriesCodePoet _______________________________________________ This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/midrange-l or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l. ------------------------------ message: 4 date: Tue, 20 Jan 2004 15:42:28 -0500 from: Don.McCully@xxxxxxxxxxxxx subject: 3 letter abbrevations for OS/400 Commands A couple weeks ago there was a question about the 3 letter abbreviations for OS/400 Commands. Someone answered with a manual where you could look up the logic involved in figuring out what a particular command might be. I misplaced that E-mail. If that someone is still watching these E-mails, would you please re-send that information. Thanks ------------------------------ message: 5 date: Tue, 20 Jan 2004 13:38:35 -0700 from: "Pete Helgren" <pete@xxxxxxxxxx> subject: RE: Embedded Sql problem My example is similar but it works (OPM though) In the input specs : 0031.00 I B 52 530NMIND In the calcs: 0035.00 C MOVE *ZERO NMIND Then the SQL statement: 0037.00 C/EXEC SQL DECLARE C1 CURSOR FOR 0038.00 C+ SELECT EMLNAM,EMFNAM,EMMNAM,PCCK#,PCRUN#,EMLOC,LCNAME,PRCKDT 0039.00 C+ FROM PPAI612S INNER JOIN PPAY600H ON PCRUN# = PRRUN# 0040.00 C+ INNER JOIN PEIS301 ON PCSSN = EMSSAN 0041.00 C+ LEFT OUTER JOIN PEIS127 ON EMLOC = LCCODE 0041.01 C+ WHERE PCTYP = '1' 0042.00 C+ ORDER BY EMLOC,EMLNAM,EMFNAM,EMMNAM 0043.00 C/END-EXEC then the fetch: 0054.00 C/EXEC SQL 0055.00 C+ FETCH C1 INTO :LAST,:FIRST,:MIDDLE,:CHECK,:RUN,:LOC,:LCNAM:NMIND 0056.00 C+ :CKDAT 0057.00 C/END-EXEC Took me a while to get it right, like Rob said: It IS a tad finicky about such things Pete Helgren Timpanogos Technologies > -----Original Message----- > From: midrange-l-bounces@xxxxxxxxxxxx > [mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of rob@xxxxxxxxx > Sent: Tuesday, January 20, 2004 11:18 AM > To: Midrange Systems Technical Discussion > Subject: RE: Embedded Sql problem > > > 1) SQL can be a little b!tchy about qualified data structures. The SQL > precompiler team is coming to life and this may change in the future. > 2) there is NO comma between the variable and the indicator variable for > example > FETCH Next From CtlCurs INTO :SMSO#,:SMSCD,:SMCRW,:UPRTE, > :UPSAD,:SCEST, :NullIND > becomes > FETCH Next From CtlCurs INTO :SMSO#,:SMSCD,:SMCRW,:UPRTE, > :UPSAD,:SCEST :NullIND > > Rob Berendt > -- > Group Dekko Services, LLC > Dept 01.073 > PO Box 2000 > Dock 108 > 6928N 400E > Kendallville, IN 46755 > http://www.dekko.com > > > > > > "Smith, Mike" <Mike_Smith@xxxxxxxxxxxxxxxx> > Sent by: midrange-l-bounces+rob=dekko.com@xxxxxxxxxxxx > 01/20/2004 12:33 PM > Please respond to > Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx> > > > To > "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx> > cc > > Fax to > > Subject > RE: Embedded Sql problem > > > > > > > Rob, > I tried that. However, I'm now getting the unusual message SQL0303 that > is telling me the > Host variable PRMDS.UPSAD not compatible. > SQLCOD = -000000303. > > My fetch statement now looks like > FETCH Next From CtlCurs INTO :SMSO#,:SMSCD,:SMCRW,:UPRTE, > :UPSAD,:SCEST, :NullIND > > I've switched locations in the list for the NullInd, because I wasn't > sure exactly where it needs to go. No difference. > I've tried making using host variable names. No difference. > > I've written hundreds of programs like these(however not usually with a > specific Outer join.) and never had a problem like this. > > I have a feeling it has to do with the fact, that the record that isn't > showing up doesn't have a record with the UPRM file so that UPSAD and > UPRTE are blank. However, I kind of thought that was what the indicator > variable was handling. > -----Original Message----- > From: rob@xxxxxxxxx [mailto:rob@xxxxxxxxx] > Sent: Tuesday, January 20, 2004 11:26 AM > To: Midrange Systems Technical Discussion > Subject: RE: Embedded Sql problem > > > Mike, in your earlier desired result you listed two columns. Is that > all > you really want? If so, then drop the SELECT * and instead just select > the two desired columns. > then it would be, (assuming that only the first column supports null > values): > C/EXEC SQL > C+ Fetch NEXT FROM CTLCURS Into :ColA :indA ,:ColB > C/END-EXEC > > Rob Berendt > -- > Group Dekko Services, LLC > Dept 01.073 > PO Box 2000 > Dock 108 > 6928N 400E > Kendallville, IN 46755 > http://www.dekko.com > > > > > > "Smith, Mike" <Mike_Smith@xxxxxxxxxxxxxxxx> > Sent by: midrange-l-bounces@xxxxxxxxxxxx > 01/20/2004 11:07 AM > Please respond to > Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx> > > > To > "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx> cc > > Fax to > > Subject > RE: Embedded Sql problem > > > > > > > Well, I've found that I'm getting an -SQL0305 error which indicates that > I need a Indicator Variable. > > Some snippets of the code > > * DATA STRUCTURES > D SODS E DS EXTNAME(SCMS) INZ > D PrmDS E DS EXTNAME(UPRM) INZ > D CodDS E DS EXTNAME(SOCD) INZ > > C Eval SelectOne = %TRIM(SQLARY(1)) + ' ' + > C %TRIM(SQLARY(2)) + ' ' + > C %TRIM(SQLARY(3)) + ' ' + > C %TRIM(SQLARY(4)) + ' ' + > C %TRIM(SQLARY(5)) + ' ' + > C %TRIM(SQLARY(6)) + ' ' + > C %TRIM(SQLARY(7)) + ' ' + > C %TRIM(SQLARY(8)) + ' ' + > C %TRIM(SQLARY(9)) + ' ' + > C Where + ' ' + > C 'Order By ' + %trim(OrderBy) > > C/EXEC SQL > C+ PREPARE SEL FROM :SelectOne > C/END-EXEC > C/EXEC SQL > C+ Declare CTLCURS SCROLL Cursor For SEL > C/END-EXEC > > *OPEN THE CURSOR > C/EXEC SQL > C+ Open CTLCURS using :sodat > C/END-EXEC > > > I fetch using the following > C/EXEC SQL > C+ Fetch NEXT FROM CTLCURS Into :SoDS ,:prmDS, :CodDS > C/END-EXEC > > > > I can't figure out how to incorporate a indicator variable the way I > have it set up > > > > > > > _______________________________________________ > This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing > list > To post a message email: MIDRANGE-L@xxxxxxxxxxxx > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/mailman/listinfo/midrange-l > or email: MIDRANGE-L-request@xxxxxxxxxxxx > Before posting, please take a moment to review the archives > at http://archive.midrange.com/midrange-l. > > > _______________________________________________ > This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing > list > To post a message email: MIDRANGE-L@xxxxxxxxxxxx > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/mailman/listinfo/midrange-l > or email: MIDRANGE-L-request@xxxxxxxxxxxx > Before posting, please take a moment to review the archives > at http://archive.midrange.com/midrange-l. > > > _______________________________________________ > This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing > list > To post a message email: MIDRANGE-L@xxxxxxxxxxxx > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/mailman/listinfo/midrange-l > or email: MIDRANGE-L-request@xxxxxxxxxxxx > Before posting, please take a moment to review the archives > at http://archive.midrange.com/midrange-l. > > > _______________________________________________ > This is the Midrange Systems Technical Discussion (MIDRANGE-L) > mailing list > To post a message email: MIDRANGE-L@xxxxxxxxxxxx > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/mailman/listinfo/midrange-l > or email: MIDRANGE-L-request@xxxxxxxxxxxx > Before posting, please take a moment to review the archives > at http://archive.midrange.com/midrange-l. > ------------------------------ message: 6 date: Tue, 20 Jan 2004 14:48:58 -0600 from: "Elvis Budimlic" <ebudimlic@xxxxxxxxxxxxxxxxxxxxxxxxx> subject: RE: Embedded Sql problem This is from the SQL Reference book: IFNULL IFNULL ( expression , expression ) The IFNULL function is identical to the COALESCE scalar function with two arguments. For more information, see "COALESCE" on page 152. Example When selecting the employee number (EMPNO) and salary (SALARY) from all the rows in the EMPLOYEE table, if the salary is missing (that is, null), then return a value of zero. SELECT EMPNO, IFNULL(SALARY,0) FROM EMPLOYEE Elvis ------------------------------ message: 7 date: Tue, 20 Jan 2004 14:45:20 -0600 from: Jeff Stevens <jstevens@xxxxxxxxxxxx> subject: draft-murphy-iser-telnet-01.txt New draft updates to TN5250E RFC...with Kerberos clarifications and other minor editing. http://www.ietf.org/internet-drafts/draft-murphy-iser-telnet-01.txt -- Jeff Steven/Paul Rieth/Tom Murphy Jr. ------------------------------ message: 8 date: Tue, 20 Jan 2004 16:14:31 -0500 from: rick.baird@xxxxxxxxxxxxxxx subject: opendir(), getcwd hey all, given the following (very incomplete) code using the ifs unix style functions... C eval LocalDir = '/HTTP/ITC ' C eval dh = opendir(%trimr(LocalDir)) C if dh <> *NULL C if getcwd(%addr(RetVal): 256) <> *NULL ... shouldn't RetVal = '/HTTP/ITC' ? i'm gettin very spotty results - sometimes I can get it to work, sometimes not. I'm not at all sure of what the problem is, but I've made several changes, and i've gotten myself lost as to what i changed to break it. Thanks, Rick "... any man who can hitch the length and breadth of the galaxy and still know where his towel is is clearly a man to be reckoned with". - Ford Prefect ------------------------------ message: 9 date: Tue, 20 Jan 2004 15:13:43 -0600 (CST) from: Scott Klement <klemscot@xxxxxxxxxxxx> subject: Re: IFS object attributes On Tue, 20 Jan 2004, Rick Klopfer wrote: > Cannot find a native command that will list the attributes of objects in > IFS, especially date-created. WRKLNK, option 8 shows these attributes. It's a native command... is that what you're looking for, or did you mean something that will list them to a file? or are you trying to retrieve them into a program, or what? > Does one exist? If not, anyone have something available? In addition to WRKLNK, there's various commands that can do this sort of thing in QShell, though I don't know if you consider QShell to be a "native command" or not. Aside from that, there's the stat(), fstat() and lstat() APIs which give you a lot of the attributes about the files, though I don't know if the date created is one of them... The Qp0lGetAttr() API should also give you this information... ------------------------------ message: 10 date: Tue, 20 Jan 2004 13:34:18 -0800 (PST) from: G Armour <garmour400m@xxxxxxxxx> subject: Re: Journaling... Help me understand Before v5r2, there was entire chapter or "unit" devoted to journaling and commitment control in the Backup & Recovery manual. Now, just search for "journaling" in InfoCenter. Also, there's a redbook, "Striving for Optimal Journal Performance on DB2 Universal Database for iSeries" (SG246286) in PDF format. HTH, GA --- "Wills, Mike N. (TC)" <MNWills@xxxxxxxxxxxxxx> wrote: > Is there a book, a class, or just get general help about journals? I > don't > understand them enough and now that we are starting to use them I feel I > should understand how to maintain and use them. I know that they record > what > is changed in the file so that you can "back out" of a problem, but > beyond > that I know little about them. Can anyone help me out on this? Thanks. > > Mike Wills __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus ------------------------------ _______________________________________________ This is the Midrange Systems Technical Discussion (MIDRANGE-L) digest list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/midrange-l or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l. End of MIDRANGE-L Digest, Vol 3, Issue 84 *****************************************
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.
midrange.com
