Re: [U2] QSORT (Or something like that)
I probably ought to qualify the importance of speed here. We use QSORT to sort thousands of entries, with a dozen or more associated arrays. QSORT's relative speed doesn't drop with heavy volume as some sort routines can. We've all probably written sort routines, implementing various algorithms, and most work well if the load is light. It's when the load is heavy that the best algorithms really shine. No, I don't work for Tony, and he's not paying me to say this. I wouldn't mind a beer if our paths cross, though, Tony. Charlie On 05-24-2010 6:15 PM, Charlie Noah wrote: Shawn, Betcha Tony's is faster ;^) (it's scary fast). Charlie On 05-24-2010 2:40 PM, Shawn Hayes wrote: Thanks Rex... I just created a little routine to do this also. I thought that it might have been built in to the Unibasic language. Anyways, here is the code I came up with (not fully tested) if anyone is interested... SUBROUTINE QSORT(ARRAY, ATTRIBUTE.LIST, MAIN.SORT, SORT.TYPE, ERR) * * ARRAY - This is the dynamic array iwth the attributes that needs to be sorted. * ATTRIBUTE.LIST - This is a list of attributes to sort. * MAIN.SORT - This is the main sort attribute position * SORT.TYPE - This is the sort type AL, AR, DL, DR * ERR - This allows the calling routine to handle any errors. * MAIN PROGAM: * * Initialization HOLD.ARRAY = ARRAY ERR = "" * * Setup checks. LOCATE MAIN.SORT IN ATTRIBUTE.LIST<1> SETTING POS ELSE ERR = "Your MAIN.SORT must be included in the ATTRIBUTE.LIST" RETURN END SORT.LIST = "AL":@VM:"AR":@VM:"DL":@VM:"DR" LOCATE SORT.TYPE IN SORT.LIST<1> SETTING POS ELSE ERR = "Your SORT.TYPE must be 'AL', 'AR', 'DL', OR 'DR'" RETURN END * * Clear the values in the HOLD.ARRAY. The HOLD.ARRAY is going to be where we * rebuild the array. NUM.OF.LIST.ATT = DCOUNT(ATTRIBUTE.LIST,@VM) FOR ATTRIBUTE.CNT = 1 TO NUM.OF.LIST.ATT ATTRIBUTE.POS = ATTRIBUTE.LIST<1,ATTRIBUTE.CNT> HOLD.ARRAY = "" NEXT ATTRIBUTE.POS * * Restructuring ARRAY to HOLD.ARRAY. NUM.OF.MAIN.SORT.VALUES = DCOUNT(ARRAY,@VM) FOR SORT.VALUE.POS = 1 TO NUM.OF.MAIN.SORT.VALUES * * Get the first value from the main sorting list and locate it in the new list (HOLD.ARRAY). MAIN.SORT.VALUE = ARRAY LOCATE MAIN.SORT.VALUE IN HOLD.ARRAY BY SORT.TYPE SETTING INSERT.POS ELSE NULL * * Loop through the ATTRIBUTE.LIST and load values in HOLD.ARRAY in their new positions. NUM.OF.ATTRIBUTES = DCOUNT(ATTRIBUTE.LIST,@VM) FOR ATTRIBUTE.NUM = 1 TO NUM.OF.ATTRIBUTES ATTRIBUTE.POS = ATTRIBUTE.LIST<1,ATTRIBUTE.NUM> ATTRIBUTE.VALUE = ARRAY HOLD.ARRAY = INSERT(HOLD.ARRAY,ATTRIBUTE.POS,INSERT.POS,0,ATTRIBUTE.VALUE) NEXT ATTRIBUTE.NUM NEXT SORT.VALUE.POS * * Load sorted array. IF NOT(ERR) THEN ARRAY = HOLD.ARRAY END * RETURN * * END OF QSORT 'We act as though comfort and luxury were the chief requirements of life, when all that we need to make us happy is something to be enthusiastic about.' - Original Message From: Rex Gozar To: U2 Users List Sent: Mon, May 24, 2010 1:27:32 PM Subject: Re: [U2] QSORT (Or something like that) You can find these subroutines on PickWiki.com: CALL ROW2COL(A) ;* flip fields to values CALL QUICKSORT(A, 1, "AR") ;* sort on first value CALL ROW2COL(A) ;* flip back rex ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] QSORT (Or something like that)
Shawn, Betcha Tony's is faster ;^) (it's scary fast). Charlie On 05-24-2010 2:40 PM, Shawn Hayes wrote: Thanks Rex... I just created a little routine to do this also. I thought that it might have been built in to the Unibasic language. Anyways, here is the code I came up with (not fully tested) if anyone is interested... SUBROUTINE QSORT(ARRAY, ATTRIBUTE.LIST, MAIN.SORT, SORT.TYPE, ERR) * * ARRAY - This is the dynamic array iwth the attributes that needs to be sorted. * ATTRIBUTE.LIST - This is a list of attributes to sort. * MAIN.SORT - This is the main sort attribute position * SORT.TYPE - This is the sort type AL, AR, DL, DR * ERR - This allows the calling routine to handle any errors. * MAIN PROGAM: * * Initialization HOLD.ARRAY = ARRAY ERR = "" * * Setup checks. LOCATE MAIN.SORT IN ATTRIBUTE.LIST<1> SETTING POS ELSE ERR = "Your MAIN.SORT must be included in the ATTRIBUTE.LIST" RETURN END SORT.LIST = "AL":@VM:"AR":@VM:"DL":@VM:"DR" LOCATE SORT.TYPE IN SORT.LIST<1> SETTING POS ELSE ERR = "Your SORT.TYPE must be 'AL', 'AR', 'DL', OR 'DR'" RETURN END * * Clear the values in the HOLD.ARRAY. The HOLD.ARRAY is going to be where we * rebuild the array. NUM.OF.LIST.ATT = DCOUNT(ATTRIBUTE.LIST,@VM) FOR ATTRIBUTE.CNT = 1 TO NUM.OF.LIST.ATT ATTRIBUTE.POS = ATTRIBUTE.LIST<1,ATTRIBUTE.CNT> HOLD.ARRAY = "" NEXT ATTRIBUTE.POS * * Restructuring ARRAY to HOLD.ARRAY. NUM.OF.MAIN.SORT.VALUES = DCOUNT(ARRAY,@VM) FOR SORT.VALUE.POS = 1 TO NUM.OF.MAIN.SORT.VALUES * * Get the first value from the main sorting list and locate it in the new list (HOLD.ARRAY). MAIN.SORT.VALUE = ARRAY LOCATE MAIN.SORT.VALUE IN HOLD.ARRAY BY SORT.TYPE SETTING INSERT.POS ELSE NULL * * Loop through the ATTRIBUTE.LIST and load values in HOLD.ARRAY in their new positions. NUM.OF.ATTRIBUTES = DCOUNT(ATTRIBUTE.LIST,@VM) FOR ATTRIBUTE.NUM = 1 TO NUM.OF.ATTRIBUTES ATTRIBUTE.POS = ATTRIBUTE.LIST<1,ATTRIBUTE.NUM> ATTRIBUTE.VALUE = ARRAY HOLD.ARRAY = INSERT(HOLD.ARRAY,ATTRIBUTE.POS,INSERT.POS,0,ATTRIBUTE.VALUE) NEXT ATTRIBUTE.NUM NEXT SORT.VALUE.POS * * Load sorted array. IF NOT(ERR) THEN ARRAY = HOLD.ARRAY END * RETURN * * END OF QSORT 'We act as though comfort and luxury were the chief requirements of life, when all that we need to make us happy is something to be enthusiastic about.' - Original Message From: Rex Gozar To: U2 Users List Sent: Mon, May 24, 2010 1:27:32 PM Subject: Re: [U2] QSORT (Or something like that) You can find these subroutines on PickWiki.com: CALL ROW2COL(A) ;* flip fields to values CALL QUICKSORT(A, 1, "AR") ;* sort on first value CALL ROW2COL(A) ;* flip back rex ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] QSORT (Or something like that)
Shawn, It looks like QSORT is exactly what you want. I'm sure Tony will share it, or with his permission, I'll be happy to pass along our slightly modified copy. Charlie On 05-24-2010 12:30 PM, Shawn Hayes wrote: I read a post from Charlie thanking Tony for the QSORT tip. I remember using something like this a long time ago... What I am looking for is a way to sort the values of a dynamic array. Lets say that attributes 1,2,3 of the variable "A" are all associated. I want to sort the values of "A<1>" and ensure the associated values follow... For example, I want to take this array... A<1> = 1:@VM:2:@VM:4:@VM:3 A<2> = "INFO1":@VM"INFO2"@VM"INFO4"@VM"INFO3" A<3> = "MORE.INFO1":@VM"MORE.INFO2"@VM"MORE.INFO4"@VM"MORE.INFO3" and end up with this array A<1> = 1:@VM:2:@VM:3:@VM:4 A<2> = "INFO1":@VM"INFO2"@VM"INFO3"@VM"INFO4" A<3> = "MORE.INFO1":@VM"MORE.INFO2"@VM"MORE.INFO3"@VM"MORE.INFO4" Is there a function out there that does this? Thanks - Shawn 'We act as though comfort and luxury were the chief requirements of life, when all that we need to make us happy is something to be enthusiastic about.' ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
[U2] AUTO: Haydon Bishop is out of the office. (returning 26/05/2010)
I am out of the office until 26/05/2010. I will respond to your message when I return. Note: This is an automated response to your message "U2-Users Digest, Vol 13, Issue 17" sent on 24/05/2010 20:00:01. This is the only notification you will receive while this person is away. ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] QSORT (Or something like that)
Thanks Rex... I just created a little routine to do this also. I thought that it might have been built in to the Unibasic language. Anyways, here is the code I came up with (not fully tested) if anyone is interested... SUBROUTINE QSORT(ARRAY, ATTRIBUTE.LIST, MAIN.SORT, SORT.TYPE, ERR) * * ARRAY - This is the dynamic array iwth the attributes that needs to be sorted. * ATTRIBUTE.LIST - This is a list of attributes to sort. * MAIN.SORT - This is the main sort attribute position * SORT.TYPE - This is the sort type AL, AR, DL, DR * ERR - This allows the calling routine to handle any errors. * MAIN PROGAM: * * Initialization HOLD.ARRAY = ARRAY ERR = "" * * Setup checks. LOCATE MAIN.SORT IN ATTRIBUTE.LIST<1> SETTING POS ELSE ERR = "Your MAIN.SORT must be included in the ATTRIBUTE.LIST" RETURN END SORT.LIST = "AL":@VM:"AR":@VM:"DL":@VM:"DR" LOCATE SORT.TYPE IN SORT.LIST<1> SETTING POS ELSE ERR = "Your SORT.TYPE must be 'AL', 'AR', 'DL', OR 'DR'" RETURN END * * Clear the values in the HOLD.ARRAY. The HOLD.ARRAY is going to be where we * rebuild the array. NUM.OF.LIST.ATT = DCOUNT(ATTRIBUTE.LIST,@VM) FOR ATTRIBUTE.CNT = 1 TO NUM.OF.LIST.ATT ATTRIBUTE.POS = ATTRIBUTE.LIST<1,ATTRIBUTE.CNT> HOLD.ARRAY = "" NEXT ATTRIBUTE.POS * * Restructuring ARRAY to HOLD.ARRAY. NUM.OF.MAIN.SORT.VALUES = DCOUNT(ARRAY,@VM) FOR SORT.VALUE.POS = 1 TO NUM.OF.MAIN.SORT.VALUES * * Get the first value from the main sorting list and locate it in the new list (HOLD.ARRAY). MAIN.SORT.VALUE = ARRAY LOCATE MAIN.SORT.VALUE IN HOLD.ARRAY BY SORT.TYPE SETTING INSERT.POS ELSE NULL * * Loop through the ATTRIBUTE.LIST and load values in HOLD.ARRAY in their new positions. NUM.OF.ATTRIBUTES = DCOUNT(ATTRIBUTE.LIST,@VM) FOR ATTRIBUTE.NUM = 1 TO NUM.OF.ATTRIBUTES ATTRIBUTE.POS = ATTRIBUTE.LIST<1,ATTRIBUTE.NUM> ATTRIBUTE.VALUE = ARRAY HOLD.ARRAY = INSERT(HOLD.ARRAY,ATTRIBUTE.POS,INSERT.POS,0,ATTRIBUTE.VALUE) NEXT ATTRIBUTE.NUM NEXT SORT.VALUE.POS * * Load sorted array. IF NOT(ERR) THEN ARRAY = HOLD.ARRAY END * RETURN * * END OF QSORT 'We act as though comfort and luxury were the chief requirements of life, when all that we need to make us happy is something to be enthusiastic about.' - Original Message From: Rex Gozar To: U2 Users List Sent: Mon, May 24, 2010 1:27:32 PM Subject: Re: [U2] QSORT (Or something like that) You can find these subroutines on PickWiki.com: CALL ROW2COL(A) ;* flip fields to values CALL QUICKSORT(A, 1, "AR") ;* sort on first value CALL ROW2COL(A) ;* flip back rex ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] QSORT (Or something like that)
You can find these subroutines on PickWiki.com: CALL ROW2COL(A) ;* flip fields to values CALL QUICKSORT(A, 1, "AR") ;* sort on first value CALL ROW2COL(A) ;* flip back rex ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Question on Dictionary Items
> From: Brian Leach > Jim wrote: > >Last value: > > 002 9 > > 008 F;9;P;S;_ > > Not sure what you're trying to achieve here. It's equivalent > to @RECORD<9> - SUM(@RECORD<9>).. > > Or am I missing something? Explained: nospamNebula-RnD.com/blog/tech/mv/2010/05/lastmv.html Tony Gravagno Nebula Research and Development TG@ remove.pleaseNebula-RnD.com Nebula R&D sells mv.NET and other Pick/MultiValue products worldwide, and provides related development services remove.pleaseNebula-RnD.com/blog Visit PickWiki.com! Contribute! http://Twitter.com/TonyGravagno ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] receiving error message XX record corrupt on logto
Stuart, I have commented out the WW.SB.RB from the LOGIN on that account, and when we do an MM, we get the menu minus the first system - all the other systems appear to be working normally. At least this way, they can get most of their work done on the account while I am trying to figure this out. Susan Lynch F. W. Davison & Company, Inc. - Original Message - From: "Boydell, Stuart" To: "U2 Users List" Sent: 05/22/2010 6:34 PM Subject: Re: [U2] receiving error message XX record corrupt on logto Susan, Can you try logging into the account using the SYSID parameter to go to the second system. LOGTO ACCOUNT,SYSID2 - does this invoke the corruption message? If not, then it may be the XXCONTROL or other XX item which needs to be checked. Cheers Stuart Boydell -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Susan Lynch Sent: Sunday, 23 May 2010 01:48 To: U2 Users List Subject: Re: [U2] receiving error message XX record corrupt on logto Kevin, XX is the first system (first menu option) on the account. Different letters, but that is how U2 TechConnect always refers to this message. I did re-file the menu also, just to be sure it was not confused. Susan Lynch F. W. Davison & Company, Inc. - Original Message - From: "Kevin King" To: "U2 Users List" Sent: 05/22/2010 11:38 AM Subject: Re: [U2] receiving error message XX record corrupt on logto To recap: you logged in as the SB user, refiled all of the groups, and you're still getting the XX message corrupt message? XX is a system? user? group? account? Just trying to clear my head and understand what SB+ "thinks" is incorrect. I wouldn't think this would be much of an issue, but if the XX is a system you might bring up the SBSYSMENU menu in /MD and refile that also. ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] re ceiving error message XX record corrupt on logto
I tried this - it did not seem to help. Thanks for the idea, though. And thanks to all who have tried to help on this one. Susan Lynch F. W. Davison & Company, Inc. - Original Message - From: "inquieti" To: Sent: 05/24/2010 4:26 AM Subject: Re: [U2] re ceiving error message XX record corrupt on logto Hi Susan In your logto script try adding CLEARCOMMON then LOGIN so that you go in cleanly. You can add a Logto subroutine in SB+, go to the Admin screen, SB+ Setup, SB+ Control Parameters, F9 Logto Sub. I've experienced this error when logging between accounts from different versions of SB+ (different COMMON blocks). Regards David Susan Joslyn wrote: I have this happening at a client site and I've been all through the re-file everything and it won't quit. It happens *consistently* if I have more than one session open, but still happens intermittently when I don't. If you do come up with a fix for this I'd be very keen to learn it! Thanks, Susan Joslyn SJ+ Systems Associates, Inc. PRC - IT Governance for U2/Multivalue. From: "Susan Lynch" To: "U2 Users List" Subject: Re: [U2] receiving error message XX record corrupt on logto Message-ID: <004b3459d050475daf942cfccd93c...@susanhome> Content-Type: text/plain; format=flowed; charset="iso-8859-1"; reply-type=original Kevin, yes, ROOT was the first one I did! Susan Lynch F. W. Davison & Company, Inc. ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users -- View this message in context: http://old.nabble.com/receiving-error-message-XX-record-corrupt-on-logto-tp28646451p28654669.html Sent from the U2 - Users mailing list archive at Nabble.com. ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Print Wizard on Linux
It is not a rhetorical question. It's ok to be not be in favor of certain technologies and methodologies. By way of analogy, come election day, the voting machine only tallies who I voted for, not who (or what) I am against. Thus, people asking for help and insight (on this list) probably want to know why others choose to go (or not go) in certain directions. Yet, in the end, what they really want is a recommended fix. Of course, a recommendation usually has more value than a dis(paragement). --Bill -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Jeff Powell Sent: Monday, May 24, 2010 12:59 PM To: U2 Users List Subject: Re: [U2] Print Wizard on Linux Is this a rhetorical question? On 05/24/2010 09:44 AM, Brutzman, Bill wrote: > I mostly agree with Jeff's "philosophy" but... What alternative does > Jeff recommend as the fix? > ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
[U2] QSORT (Or something like that)
I read a post from Charlie thanking Tony for the QSORT tip. I remember using something like this a long time ago... What I am looking for is a way to sort the values of a dynamic array. Lets say that attributes 1,2,3 of the variable "A" are all associated. I want to sort the values of "A<1>" and ensure the associated values follow... For example, I want to take this array... A<1> = 1:@VM:2:@VM:4:@VM:3 A<2> = "INFO1":@VM"INFO2"@VM"INFO4"@VM"INFO3" A<3> = "MORE.INFO1":@VM"MORE.INFO2"@VM"MORE.INFO4"@VM"MORE.INFO3" and end up with this array A<1> = 1:@VM:2:@VM:3:@VM:4 A<2> = "INFO1":@VM"INFO2"@VM"INFO3"@VM"INFO4" A<3> = "MORE.INFO1":@VM"MORE.INFO2"@VM"MORE.INFO3"@VM"MORE.INFO4" Is there a function out there that does this? Thanks - Shawn 'We act as though comfort and luxury were the chief requirements of life, when all that we need to make us happy is something to be enthusiastic about.' ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Print Wizard on Linux
On 05/24/2010 10:10 AM, Bob Rasmussen wrote: On Mon, 24 May 2010, Brutzman, Bill wrote: I mostly agree with Jeff's "philosophy" but... What alternative does Jeff's recommend as the fix? I understand it as well. However, the dearth of device-independent printer support in Linux/Unix environments limits the options. Let me sugget some modifications to your philosophy. 1) You have already removed some tasks from your server, most likely, into freestanding "appliances", such as routers, firewalls, and possibly network storage devices. In fact, one could argue that this creates a MORE robust approach, because changes to your AIX system, for instance, are less likely to inadverantly affect their operation. That's a bit of a stretch isn't it? Our AIX machine has gone through hardware upgrades but we've always used our "mksysb" tape to transfer the operating system to the new box and then upgraded AIX to stay compatible with the newest UniData. Again, not a single infestation or root-kit since it's installation in 2001. So we have nine years of solid 24/7 performance from our AIX platform. I have Linux machines that have run as web servers and desktops and there has not been one infection since 2000 when I got my first RedHat liunx CD. Even my children only have linux Desktops. On the other hand, our windows PC have been infected and reinfected with various viruses and spyware programs that, among other things, cripple normal network connections. We do have network filtering and Symantec but there are so many exploits for Windows that it's impossible to avoid. Our systems manager routinely has to do fresh windows installations to eliminate the viruses. The latest outbreak propagated itself through the default share on the target PC by assuming System user privileges. Our systems manager is still cleaning this up. He's manually upgrading every PC in the company to SP3. We are considering making more changes to Print Wizard in order to make it more able to function as a "printing appliance", sitting between the server and the printer. For totally non-interactive tasks, this could be an option. Great idea. Create a rack-mount unit that is completely secure and you'll have a product that could be vertically integrated. 2) If you are running Windows PCs as clients, using either terminal emulation or a GUI front end, then consider the possibility of a print job as a client task. Maybe not for printing thousands of invoices, but for more personalized jobs. We have most of our forms going to networked printers. Picking tickets print in the appropriate warehouse office, Packing lists print near the people who prepare the shipping documents for the customer and our invoices go to either the corporate office invoice printer, a pdf email, a flat file transfer or a text email. For example, some of our users will generate a purchase order on the server, feed it to the client, through Print Wizard, to generate a PDF of the PO. Print Wizard creates an email message with the PO as an attachment, and might also attach other files and documents to the email. Then it opens the email (in Outlook or in our own window) and allows the user to customize and personalize the email. They can enter recipient information, subject, body text, additional recipients, etc., and also attach other files. A similar process can be used for faxing. It seems like your product is really geared for the small office environment but wouldn't scale well to a company with hundreds of users. I figured out years ago that there are MANY ways, combinations, and permuations people want to do print-related tasks, and we continue to expand the number of them that Print Wizard can address. Regards, Bob Rasmussen, President, Rasmussen Software, Inc. personal e-mail: r...@anzio.com company e-mail: r...@anzio.com voice: (US) 503-624-0360 (9:00-6:00 Pacific Time) fax: (US) 503-624-0760 web: http://www.anzio.com street address: Rasmussen Software, Inc. 10240 SW Nimbus, Suite L9 Portland, OR 97223 USA ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Print Wizard on Linux
Is this a rhetorical question? On 05/24/2010 09:44 AM, Brutzman, Bill wrote: I mostly agree with Jeff's "philosophy" but... What alternative does Jeff's recommend as the fix? ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] receiving error message XX record corrupt on logto
Kevin, I just went into each group that has restricted accounts, into each account, and saved the first menu selection's system record. It did not help, unfortunately. Susan Lynch F. W. Davison & COmpany, Inc. - Original Message - From: "Kevin King" To: "U2 Users List" Sent: 05/22/2010 11:57 AM Subject: Re: [U2] receiving error message XX record corrupt on logto AH what about refiling each of the F5-Accounts with Restrictions screens from /SEC.GROUP.SETUP? Those have checksums as well - and refer to systems. ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Question on Dictionary Items
Brian: This is an old Pick trick. The 1st correlative always returns the first value. The 2nd correlative always returns the last. When I converted from D3 to UniData I changed these kinds of things to: First value: 002 EXTRACT ( ACCTS, 1, 1, 0 ) Last value: 002 EXTRACT ( ACCTS, 1, 0, 0 ) ; EXTRACT ( @1, 1, DCOUNT ( @1, @VM ), 0 ) However, I thought UniVerse handled these kinds of correlatives. When I first upgraded to UniVerse I think I remember testing these dictionaries and they worked. H. HTH, Bill Brian Leach said the following on 5/24/2010 2:31 AM: Jim First value (a number of ways but this will work): 002 9 008 F;9R No, this means 'repeat the value in field 9 for the depth of the expression' e.g. if you wanted to multiply each value in a multivalued field with a single valued field to get a multivalued result. Last value: 002 9 008 F;9;P;S;_ Not sure what you're trying to achieve here. It's equivalent to @RECORD<9> - SUM(@RECORD<9>).. Or am I missing something? Brian -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of James Patrick Volkman Sent: 24 May 2010 1:58 AM To: u2-users@listserver.u2ug.org Subject: [U2] Question on Dictionary Items Does anyone happen to know why these wouldn't work in Universe? First value (a number of ways but this will work): 002 9 008 F;9R Last value: 002 9 008 F;9;P;S;_ I can use an I-Type but I was hoping to translate off those values. Jim Volkman http://www.linkedin.com/in/jamesvolkman ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users No virus found in this incoming message. Checked by AVG - www.avg.com Version: 9.0.819 / Virus Database: 271.1.1/2892 - Release Date: 05/23/10 19:26:00 ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Print Wizard on Linux
On Mon, 24 May 2010, Brutzman, Bill wrote: > > I mostly agree with Jeff's "philosophy" but... What alternative does > Jeff's recommend as the fix? I understand it as well. However, the dearth of device-independent printer support in Linux/Unix environments limits the options. Let me sugget some modifications to your philosophy. 1) You have already removed some tasks from your server, most likely, into freestanding "appliances", such as routers, firewalls, and possibly network storage devices. In fact, one could argue that this creates a MORE robust approach, because changes to your AIX system, for instance, are less likely to inadverantly affect their operation. We are considering making more changes to Print Wizard in order to make it more able to function as a "printing appliance", sitting between the server and the printer. For totally non-interactive tasks, this could be an option. 2) If you are running Windows PCs as clients, using either terminal emulation or a GUI front end, then consider the possibility of a print job as a client task. Maybe not for printing thousands of invoices, but for more personalized jobs. For example, some of our users will generate a purchase order on the server, feed it to the client, through Print Wizard, to generate a PDF of the PO. Print Wizard creates an email message with the PO as an attachment, and might also attach other files and documents to the email. Then it opens the email (in Outlook or in our own window) and allows the user to customize and personalize the email. They can enter recipient information, subject, body text, additional recipients, etc., and also attach other files. A similar process can be used for faxing. I figured out years ago that there are MANY ways, combinations, and permuations people want to do print-related tasks, and we continue to expand the number of them that Print Wizard can address. Regards, Bob Rasmussen, President, Rasmussen Software, Inc. personal e-mail: r...@anzio.com company e-mail: r...@anzio.com voice: (US) 503-624-0360 (9:00-6:00 Pacific Time) fax: (US) 503-624-0760 web: http://www.anzio.com street address: Rasmussen Software, Inc. 10240 SW Nimbus, Suite L9 Portland, OR 97223 USA ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Print Wizard on Linux
I mostly agree with Jeff's "philosophy" but... What alternative does Jeff's recommend as the fix? --Bill -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Jeff Powell Sent: Sunday, May 23, 2010 10:19 PM To: U2 Users List Subject: Re: [U2] Print Wizard on Linux (was Re: Code 128 Soft Font) Bob, In our situation UniData runs on IBM Power5 / AIX server. All my third party software (VsiFax, Optio eComIntegrate and MITS) run on this same server. I purposefully avoid distributing any mission critical function, such as form printing, to another server regardless of the platform. I believe that the more complex a setup is the more opportunity there is for failure. With this in mind I would not have even considered your product in my environment since it cannot run on AIX. Your product would also not be recommended by our ERP vendor (Activant) either for the same reasons. Perhaps I'm not alone in this system management philosophy. That's my 2c. Jeff On 05/20/2010 03:35 PM, Bob Rasmussen wrote: > However, I still don't see the business case for doing this development. > ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] SB Dict with User Subroutine and TCL
Stuart, You rock!!! This works perfectly! You the man! John Israel Senior Programmer/Analyst Dayton Superior Corporation 721 Richard St. Miamisburg, OH 45342 937-866-0711 x44380 -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Boydell, Stuart Sent: Saturday, May 22, 2010 6:27 PM To: U2 Users List Subject: Re: [U2] SB Dict with User Subroutine and TCL If the first parameter of your subroutine is the return value then you can just use a SB+ derived field like: I(SUBR('SYSS9075.1','VIA',SHIP_VIA)) Your subroutine should look like this: Subroutine SYSS9075.1(retVal,type,shipVia) Etc Stuart Boydell -Original Message- I need help building a SB Dict that calls a User Subroutine with several arguments. This needs to work from both within SB screens and from TCL. Originally, I have a derived field defined as: (B("SYSS9075.1,'VIA',SHIP_VIA")) where SYSS9075.1 had three arguments, 'VIA' was hard coded and SHIP_VIA was whatever value was in that field (in this case, field 10). This worked fine from TCL, but SB was blowing up with an error about incorrect number of arguments (and would likely not have a clue what SHIP_VIA meant). I then tried: (B("SYSS9075.1,'VIA','10'")) where SYSS9075.1 had no arguments, and extract the info from PARAMS. This works from SB screens, but I am clueless how to pass the arguments in the DICT used at TCL. Any Gurus out there have a suggestion or two? John Israel Senior Programmer/Analyst Dayton Superior Corporation 721 Richard St. Miamisburg, OH 45342 937-866-0711 x44380 ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Question on Dictionary Items
Jim >First value (a number of ways but this will work): > 002 9 > 008 F;9R No, this means 'repeat the value in field 9 for the depth of the expression' e.g. if you wanted to multiply each value in a multivalued field with a single valued field to get a multivalued result. >Last value: > 002 9 > 008 F;9;P;S;_ Not sure what you're trying to achieve here. It's equivalent to @RECORD<9> - SUM(@RECORD<9>).. Or am I missing something? Brian -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of James Patrick Volkman Sent: 24 May 2010 1:58 AM To: u2-users@listserver.u2ug.org Subject: [U2] Question on Dictionary Items Does anyone happen to know why these wouldn't work in Universe? First value (a number of ways but this will work): 002 9 008 F;9R Last value: 002 9 008 F;9;P;S;_ I can use an I-Type but I was hoping to translate off those values. Jim Volkman http://www.linkedin.com/in/jamesvolkman ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users No virus found in this incoming message. Checked by AVG - www.avg.com Version: 9.0.819 / Virus Database: 271.1.1/2892 - Release Date: 05/23/10 19:26:00 ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] OPENSEQ and Abnormal termination of UV
Wol >In BASIC, *EVERYTHING* is a string (apart from file variables). >Therefore any comparison should be valid. To be more precise, no. UniVerse Basic is a run-time typed language (like PHP) not a string language. So it gets the performance and storage benefits of real types, and coerces between types under the cover. If you say For I = 1 To 10, and examine I in the debugger, you will see that it is an integer, not a string. If you later say I="FRED" it will be coerced into a string, as will I := "FRED" or I<2> = "FRED". In addition to file variables, there are plenty other structures that are not coercible into strings: select list handles (from EXECUTE statement, SELECT. > SOMELIST), XML DOM handles and BCI context handles to name but a few. It may seem pedantic, but these distinctions are important when selling the benefits of language like UniVerse Basic. The word 'untyped' offends some sectors of the programming community. 'run-time typed' is generally more acceptable. (and it's funny how many developers sneer at the first mention of these, until you follow up with the PHP analogy.. and suddenly they see the light). Brian ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] re ceiving error message XX record corrupt on logto
Hi Susan In your logto script try adding CLEARCOMMON then LOGIN so that you go in cleanly. You can add a Logto subroutine in SB+, go to the Admin screen, SB+ Setup, SB+ Control Parameters, F9 Logto Sub. I've experienced this error when logging between accounts from different versions of SB+ (different COMMON blocks). Regards David Susan Joslyn wrote: > > I have this happening at a client site and I've been all through the > re-file > everything and it won't quit. It happens *consistently* if I have more > than > one session open, but still happens intermittently when I don't. If you > do > come up with a fix for this I'd be very keen to learn it! > > > Thanks, > > Susan Joslyn > SJ+ Systems Associates, Inc. > PRC - IT Governance for U2/Multivalue. > > > > From: "Susan Lynch" > To: "U2 Users List" > Subject: Re: [U2] receiving error message XX record corrupt on logto > Message-ID: <004b3459d050475daf942cfccd93c...@susanhome> > Content-Type: text/plain; format=flowed; charset="iso-8859-1"; > reply-type=original > > Kevin, yes, ROOT was the first one I did! > > Susan Lynch > F. W. Davison & Company, Inc. > > ___ > U2-Users mailing list > U2-Users@listserver.u2ug.org > http://listserver.u2ug.org/mailman/listinfo/u2-users > > -- View this message in context: http://old.nabble.com/receiving-error-message-XX-record-corrupt-on-logto-tp28646451p28654669.html Sent from the U2 - Users mailing list archive at Nabble.com. ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users