RE: Optimisation ?
Did you know the Americans weren't even the first to build a successful aeroplane? The first aircraft built that flew successfully (note my strange word order :-) was built in 1896, in England. Unfortunately, it had to be rebuilt, and the first successful flight was (iirc) 1912. Cheers, Wol -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Ken Wallis Sent: 26 March 2004 01:17 To: 'U2 Users Discussion List' Subject: RE: Optimisation ? PS. Why do you think the Americans on this list felt the need to change the spelling of Optimisation from the original English (Scots?). The rest of us put up with enough centers and realizes from you yanks! Did anyone else get the monthly jBASE Did you know? email from Kerri Duffy? In it she says: Did you know...? Charles Lindbergh was not the first man to fly nonstop across the Atlantic Ocean. Two men had achieved the same goal eight years earlier! Flying for sixteen and a half hours from June 14-15, 1919, Captain John Alcock and Lieutenant Arthur Whitten-Brown had copiloted a Vichers-Vimy twin-engine plane nonstop from Newfoundland across the Atlantic to Ireland. Lindbergh was just the first person to do it alone. She could just as easily have said Lindbergh was just the first American to do it. I think most non-yanks would have known that Alcock and Brown's was the first crossing of the Atlantic by air. /grrr -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users *** This transmission is intended for the named recipient only. It may contain private and confidential information. If this has come to you in error you must not act on anything disclosed in it, nor must you copy it, modify it, disseminate it in any way, or show it to anyone. Please e-mail the sender to inform us of the transmission error or telephone ECA International immediately and delete the e-mail from your information system. Telephone numbers for ECA International offices are: Sydney +61 (0)2 9911 7799, Hong Kong + 852 2121 2388, London +44 (0)20 7351 5000 and New York +1 212 582 2333. *** -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users
Re: Optimisation ?
LOL, thank you gentlemen you are all scholars, because of your sage advice I have cut my estimated time to do a clear down from an estimated 45 days (of 8 hours) to 4 hours. The version of Unidata I use assumes the R option if no third parameter is given to the TRIM function. - Original Message - From: Jonathan Leckie [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Thursday, March 25, 2004 12:29 PM Subject: Optimisation ? I have the following piece of code : IF REC1 £ '' THEN MAX=DCOUNT(REC1,VM) FOR LOP=1 TO MAX IF REC1,LOP = '' THEN REC=DELETE(REC,1,LOP,0) IF LOP = MAX THEN GO 300 LOP=LOP-1 END NEXT LOP END I wonder could this simply be replaced with : IF REC1 £ '' THEN REC1=TRIM(REC1,@VM) GO 300 END Can anyone see any problems with using TRIM to remove trailing, repeated and initial value markers and therefore achieving the same effect without looping through each multi-value? This is on Unidata 3.3.2 incidentally. -- * This message has been scanned for viruses and dangerous content by * Blairs of Scotland MailScanner, and is believed to be clean. * * This email and any files transmitted with it are confidential and * intended solely for the use of the individual or entity to which they * are addressed. * * If you have received this email in error please notify us at Blairs * of Scotland via email at [EMAIL PROTECTED] -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users
RE: Optimisation ?
I knew this!!! I believe there was also a New Zealander, Richard Pearce, who is eye witnessed to have flown in March 1903. Check out: http://www.nzedge.com/heroes/pearse.html At 03:02 AM 03/26/2004, you wrote: Did you know the Americans weren't even the first to build a successful aeroplane? The first aircraft built that flew successfully (note my strange word order :-) was built in 1896, in England. Unfortunately, it had to be rebuilt, and the first successful flight was (iirc) 1912. -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users
[OT] Airplane flights and stuff was Re: Optimisation ?
The Russians flew an aircraft in 1857! No no the Japanese had one flying in 1831! So? The Chinese flew one in 731 In a message dated 3/26/2004 9:10:14 AM Eastern Standard Time, [EMAIL PROTECTED] writes: I knew this!!! I believe there was also a New Zealander, Richard Pearce, who is eye witnessed to have flown in March 1903. Check out: http://www.nzedge.com/heroes/pearse.html At 03:02 AM 03/26/2004, you wrote: Did you know the Americans weren't even the first to build a successful aeroplane? The first aircraft built that flew successfully (note my strange word order :-) was built in 1896, in England. Unfortunately, it had to be rebuilt, and the first successful flight was (iirc) 1912. -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users
RE: Optimisation ?
LOL... I can't get this to get out of the loop!!! the trim crt'ed pretty quick... neat! : L23 0001: PETE = 'THIS}IS }}}A TEST}}}' 0002: CRT TRIM( PETE , @VM ) 0003: REC = PETE 0004: MAX = DCOUNT( REC 1 , @VM ) 0005: FOR LOP=1 TO MAX 0006: IF REC1,LOP = '' THEN 0007: REC=DELETE(REC,1,LOP,0) 0008: IF LOP = MAX THEN GO 300 0009: LOP=LOP-1 0010: END 0011: NEXT LOP 0012: 300: 0013: CRT REC -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Jonathan Leckie Sent: Thursday, March 25, 2004 7:29 AM To: [EMAIL PROTECTED] Subject: Optimisation ? I have the following piece of code : IF REC1 £ '' THEN MAX=DCOUNT(REC1,VM) FOR LOP=1 TO MAX IF REC1,LOP = '' THEN REC=DELETE(REC,1,LOP,0) IF LOP = MAX THEN GO 300 LOP=LOP-1 END NEXT LOP END I wonder could this simply be replaced with : IF REC1 £ '' THEN REC1=TRIM(REC1,@VM) GO 300 END Can anyone see any problems with using TRIM to remove trailing, repeated and initial value markers and therefore achieving the same effect without looping through each multi-value? This is on Unidata 3.3.2 incidentally. -- * This message has been scanned for viruses and dangerous content by * Blairs of Scotland MailScanner, and is believed to be clean. * * This email and any files transmitted with it are confidential and * intended solely for the use of the individual or entity to which they * are addressed. * * If you have received this email in error please notify us at Blairs * of Scotland via email at [EMAIL PROTECTED] -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users Notice of Confidentiality: The information included and/or attached in this electronic mail transmission may contain confidential or privileged information and is intended for the addressee. Any unauthorized disclosure, reproduction, distribution or the taking of action in reliance on the contents of the information is prohibited. If you believe that you have received the message in error, please notify the sender by reply transmission and delete the message without copying or disclosing it. -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users
RE: Optimisation ?
After you decrement LOP, you need to decrement MAX. Otherwise the loop will be unable to get beyond 4. Think about it - as soon as you delete a null value, you are guaranteeing that if null will be true on your last pass, thereby decrementing LOP and requiring another pass, which will do the same, which will do the same ... That's why I ALWAYS do a FOR I = MAX TO 1 STEP -1 style loop when coding this sort of stuff ... Bit slower, but far harder to mess up ... Cheers, Wol -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Peter Olson Sent: 25 March 2004 12:41 To: 'U2 Users Discussion List' Subject: RE: Optimisation ? LOL... I can't get this to get out of the loop!!! the trim crt'ed pretty quick... neat! : L23 0001: PETE = 'THIS}IS }}}A TEST}}}' 0002: CRT TRIM( PETE , @VM ) 0003: REC = PETE 0004: MAX = DCOUNT( REC 1 , @VM ) 0005: FOR LOP=1 TO MAX 0006: IF REC1,LOP = '' THEN 0007: REC=DELETE(REC,1,LOP,0) 0008: IF LOP = MAX THEN GO 300 0009: LOP=LOP-1 0010: END 0011: NEXT LOP 0012: 300: 0013: CRT REC -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Jonathan Leckie Sent: Thursday, March 25, 2004 7:29 AM To: [EMAIL PROTECTED] Subject: Optimisation ? I have the following piece of code : IF REC1 £ '' THEN MAX=DCOUNT(REC1,VM) FOR LOP=1 TO MAX IF REC1,LOP = '' THEN REC=DELETE(REC,1,LOP,0) IF LOP = MAX THEN GO 300 LOP=LOP-1 END NEXT LOP END I wonder could this simply be replaced with : IF REC1 £ '' THEN REC1=TRIM(REC1,@VM) GO 300 END Can anyone see any problems with using TRIM to remove trailing, repeated and initial value markers and therefore achieving the same effect without looping through each multi-value? This is on Unidata 3.3.2 incidentally. -- * This message has been scanned for viruses and dangerous content by * Blairs of Scotland MailScanner, and is believed to be clean.* * This email and any files transmitted with it are confidential and * intended solely for the use of the individual or entity to which they * are addressed. * * If you have received this email in error please notify us at Blairs * of Scotland via email at [EMAIL PROTECTED] -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users Notice of Confidentiality: The information included and/or attached in this electronic mail transmission may contain confidential or privileged information and is intended for the addressee. Any unauthorized disclosure, reproduction, distribution or the taking of action in reliance on the contents of the information is prohibited. If you believe that you have received the message in error, please notify the sender by reply transmission and delete the message without copying or disclosing it. -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users *** This transmission is intended for the named recipient only. It may contain private and confidential information. If this has come to you in error you must not act on anything disclosed in it, nor must you copy it, modify it, disseminate it in any way, or show it to anyone. Please e-mail the sender to inform us of the transmission error or telephone ECA International immediately and delete the e-mail from your information system. Telephone numbers for ECA International offices are: Sydney +61 (0)2 9911 7799, Hong Kong + 852 2121 2388, London +44 (0)20 7351 5000 and New York +1 212 582 2333. *** -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users
RE: Optimisation ?
i did a cut and paste with the code. by the way, it's still running! so i think in some cases the trim would be a little quicker :) -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Anthony Youngman Sent: Thursday, March 25, 2004 7:47 AM To: U2 Users Discussion List Subject: RE: Optimisation ? After you decrement LOP, you need to decrement MAX. Otherwise the loop will be unable to get beyond 4. Think about it - as soon as you delete a null value, you are guaranteeing that if null will be true on your last pass, thereby decrementing LOP and requiring another pass, which will do the same, which will do the same ... That's why I ALWAYS do a FOR I = MAX TO 1 STEP -1 style loop when coding this sort of stuff ... Bit slower, but far harder to mess up ... Cheers, Wol -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Peter Olson Sent: 25 March 2004 12:41 To: 'U2 Users Discussion List' Subject: RE: Optimisation ? LOL... I can't get this to get out of the loop!!! the trim crt'ed pretty quick... neat! : L23 0001: PETE = 'THIS}IS }}}A TEST}}}' 0002: CRT TRIM( PETE , @VM ) 0003: REC = PETE 0004: MAX = DCOUNT( REC 1 , @VM ) 0005: FOR LOP=1 TO MAX 0006: IF REC1,LOP = '' THEN 0007: REC=DELETE(REC,1,LOP,0) 0008: IF LOP = MAX THEN GO 300 0009: LOP=LOP-1 0010: END 0011: NEXT LOP 0012: 300: 0013: CRT REC -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Jonathan Leckie Sent: Thursday, March 25, 2004 7:29 AM To: [EMAIL PROTECTED] Subject: Optimisation ? I have the following piece of code : IF REC1 £ '' THEN MAX=DCOUNT(REC1,VM) FOR LOP=1 TO MAX IF REC1,LOP = '' THEN REC=DELETE(REC,1,LOP,0) IF LOP = MAX THEN GO 300 LOP=LOP-1 END NEXT LOP END I wonder could this simply be replaced with : IF REC1 £ '' THEN REC1=TRIM(REC1,@VM) GO 300 END Can anyone see any problems with using TRIM to remove trailing, repeated and initial value markers and therefore achieving the same effect without looping through each multi-value? This is on Unidata 3.3.2 incidentally. -- * This message has been scanned for viruses and dangerous content by * Blairs of Scotland MailScanner, and is believed to be clean.* * This email and any files transmitted with it are confidential and * intended solely for the use of the individual or entity to which they * are addressed. * * If you have received this email in error please notify us at Blairs * of Scotland via email at [EMAIL PROTECTED] -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users Notice of Confidentiality: The information included and/or attached in this electronic mail transmission may contain confidential or privileged information and is intended for the addressee. Any unauthorized disclosure, reproduction, distribution or the taking of action in reliance on the contents of the information is prohibited. If you believe that you have received the message in error, please notify the sender by reply transmission and delete the message without copying or disclosing it. -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users *** This transmission is intended for the named recipient only. It may contain private and confidential information. If this has come to you in error you must not act on anything disclosed in it, nor must you copy it, modify it, disseminate it in any way, or show it to anyone. Please e-mail the sender to inform us of the transmission error or telephone ECA International immediately and delete the e-mail from your information system. Telephone numbers for ECA International offices are: Sydney +61 (0)2 9911 7799, Hong Kong + 852 2121 2388, London +44 (0)20 7351 5000 and New York +1 212 582 2333. *** -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users Notice of Confidentiality: The information included and/or attached in this electronic mail transmission may contain confidential or privileged information and is intended
RE: Optimisation ?
Jonathan: Despite the digression about your code, I think the TRIM() function should work just fine. On D3, however, no matter how many leading or trailing @VMs exist, a single @VM remains at the beginning and/or end of the string. This is true even with Glenn's suggestion, TRIM(REC1, @VM, R). This works fine on U2, but if you need to port to D3 you'd need to revert to a modified version of the code you included below. Hope this helps. Bill -Original Message- Behalf Of Jonathan Leckie Sent: Thursday, March 25, 2004 4:29 AM To: [EMAIL PROTECTED] Subject: Optimisation ? I have the following piece of code : IF REC1 £ '' THEN MAX=DCOUNT(REC1,VM) FOR LOP=1 TO MAX IF REC1,LOP = '' THEN REC=DELETE(REC,1,LOP,0) IF LOP = MAX THEN GO 300 LOP=LOP-1 END NEXT LOP END I wonder could this simply be replaced with : IF REC1 £ '' THEN REC1=TRIM(REC1,@VM) GO 300 END Can anyone see any problems with using TRIM to remove trailing, repeated and initial value markers and therefore achieving the same effect without looping through each multi-value? This is on Unidata 3.3.2 incidentally. -- u2-users mailing list [EMAIL PROTECTED] http://www.oliver.com/mailman/listinfo/u2-users
