Re: [U2] CONV MCU on indexed field?
On 26/07/11 20:56, Chris Austin wrote: George, I just rebuilt the indices on the CLINE table, then tried the LIKE using the '...' as a wildcard, so I tried: SELECT CLIENT WITH NAME LIKE BRUCE... and unfortunately that worked the exact same way as the [] wildcards, returning 1 result. The approach I'm going to use is the one you suggested (to create an I-descriptor to do an UPCASE(NAME) ) and then index that. The only part I'm not sure about is since this descriptor is using the field NAME, should I also index NAME? This imho is what should have been done right from the start. Bear in mind, MCU as applied to a D-descriptor only affects WHAT YOU SEE. If you index that field, is it going to index the *lower* *case* data in the record (which imho it should) or the *upper* *case* version that you see? The only way to be sure that U2 is doing what you want is to force the data into the form you want before it gets indexed. And the only way to be certain that's what's happening is to use an i-descriptor, not a d-descriptor. I've indexed NAME already and seems to be working great, just not sure if indexing NAME should be done for performance. If you're not selecting on it, why bother? Chris The alternative is to do a SELECT WITH EVAL UPCASE(NAME) ... but given what appears to be happening for you at the moment, my mind can't get round the myriad ways this doesn't seem to make sense ... :-) Cheers, Wol ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
[U2] SOAP Header
Hi All - I am using the Unidata functionality to do SOAP calls and I now need to specify header information to call a SSL page. It is failing because there is not info in the header. The documentation is very sparse on this, as you all know. Anyone have any insight on how to specify header info using the SOAPSetRequestHeader function? Thanks in advance! Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
[U2] Doing Multiple Selects in BASIC and combining the lists
This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- John Thompson ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Doing Multiple Selects in BASIC and combining the lists
try: HELP MERGE.LIST John Thompson wrote: This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- Jeff Schasny - Denver, Co, USA jschasny at gmail dot com ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Doing Multiple Selects in BASIC and combining the lists
In a nutshell SELECT FILE WITH VALUE = 'A' TO 1 SELECT FILE WITH VALUE = 'B' TO 2 MERGE.LIST 1 UNION 2 TO 0 SORT FILE VALUE -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 12:16 PM To: U2 Users List Subject: [U2] Doing Multiple Selects in BASIC and combining the lists This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- John Thompson ___ 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] Doing Multiple Selects in BASIC and combining the lists
I'm not sure I'd combine them; handle the data once. I'd readext through file1_list, then readnext through file2_list. ...and I'd probably use the basic select, making AMOUNT=112.50 my first filter. Again, then you only read the data once. (Exception: if the field is indexed, I'd go with an external select)(If AMOUNT is indexed, you probably have too many indices...;)) Date: Wed, 27 Jul 2011 13:15:40 -0400 From: jthompson...@gmail.com To: u2-users@listserver.u2ug.org Subject: [U2] Doing Multiple Selects in BASIC and combining the lists This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- John Thompson ___ 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] Doing Multiple Selects in BASIC and combining the lists
Thanks for the help. You guys are way better than typing in the word LIST in the pdf manuals and hoping to find what you are looking for :) On Wed, Jul 27, 2011 at 1:26 PM, Dan Fitzgerald dangf...@hotmail.comwrote: I'm not sure I'd combine them; handle the data once. I'd readext through file1_list, then readnext through file2_list. ...and I'd probably use the basic select, making AMOUNT=112.50 my first filter. Again, then you only read the data once. (Exception: if the field is indexed, I'd go with an external select)(If AMOUNT is indexed, you probably have too many indices...;)) Date: Wed, 27 Jul 2011 13:15:40 -0400 From: jthompson...@gmail.com To: u2-users@listserver.u2ug.org Subject: [U2] Doing Multiple Selects in BASIC and combining the lists This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- John Thompson ___ 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 -- John Thompson ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Joins Vorks
Urgh. UniSQL does support the newer join formats, though IIRC not all combinations. SELECT A.FULLNAME,B.ID, B.AUTHOR_ID FROM U2_BOOKS B LEFT JOIN U2_AUTHORS A ON B.AUTHOR_ID = A.ID; Brian -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bill Brutzman Sent: 26 July 2011 17:20 To: U2 Users List Subject: Re: [U2] Joins Vorks Brian: 0. Thanks for writing and for the example code. 1. I see that JOINS appear in my older copy of the Rocket manual. Thus... SELECT * FROM LATES,INVOICE WHERE LATES.PACKSLIP = INVOICE.ID SQL+ PACKSLIPLATE_CODEASSIGNED_BYDATE..TIME.. ORDER.. 254889 C.FC karen 14271 34120.733 2-03757-1 256004 S.T karen 14404 40352.5808 2-03520-18 257342 M.DR karen 14570 54232.1935 2-02859-13 2. CF is a built on J2EE. Thus, ColdFusion with UniObjects for Java and JDBC should be workable. 3. Back to the salt mines... --Bill -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Brian Leach Sent: Tuesday, July 26, 2011 11:51 AM To: 'U2 Users List' Subject: Re: [U2] What - No Joins? Bill I don't know ColdFusion, so I don't know how you're connecting CF to Universe or what CF is doing - but UniVerse SQL *definitely* supports joins. And if you can't get CF to build it, if you can get it to call stored procedures you can also lovingly hand craft your UniVerse SQL grin and wrap it into a subroutine as in the example below: SUBROUTINE MySub SQL = SELECT ... Ok = SQLExecDirect(@HSTMT, SQL) RETURN And call it using the SQL CALL statement: set dbConn = CreateObject(ADODB.Connection) dbConn.Open conStr, userId, pass WScript.echo Connected Set dbCmd = CreateObject(ADODB.Command) Set dbCmd.ActiveConnection = dbConn ' set the command text to a SQL query dbCmd.CommandText = CALL MySub dbCmd.CommandType = 1 ' Execute the command tab = chr(9) Set rs = dbCmd.Execute Do While Not rs.EOF Wscript.Echo rs(0) tab rs(1) tab rs(2) rs.MoveNext Loop Brian -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bill Brutzman Sent: 26 July 2011 15:35 To: U2 Users List Subject: [U2] What - No Joins? So I am still dabbling with ColdFusion. It is satisfying to be able to connect Flex - CF - UniVerse and see data. When data appears in say two tables, the traditional CF way to grab the data is with al SQL INNER JOIN statement. It seems like all that I can do with CF and UniVerse is something like... SELECT * FROM LATE_LIST and then SELECT * FROM SALES_ORDERS and then combine the two resulting arrays in CF. CF will show I-Descriptors in the list of table contents when invoked via an @SELECT in the dictionary... but, my CF program did not grab any data from this same I-Descriptor. In advance of my printing out Rocket's UniVerse SQL tech manual... tips and tricks would not hurt my feelings. --Bill ___ 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] Doing Multiple Selects in BASIC and combining the lists
Ok, got stuck again... How would your example play out in BASIC? Its just a bunch of archive info in a file that only has a couple of indexes, but, I would like to look at the active file as well... EXECUTE \SELECT FILE1 WITH VALUE = 'A' TO 1\ EXECUTE \SELECT FILE2 WITH VALUE = 'A' TO 2\ EXECUTE \MERGE.LIST 1 UNION 2 TO 0\ I get an error claiming select list 1 is not active this way. I need the selects to be separate and not stack. I know how to stack them with PASSLIST and RTNLIST... I'm just fuzzy on how to do them separately and then combine them? Would I need to save them and use LIST.UNION? Or just do the two READNEXTS? (I'm trying to avoid because the READNEXT loop is kind of big) Any help is appreciated. On Wed, Jul 27, 2011 at 1:22 PM, Buffington, Wyatt wgbuffing...@hydro.mb.ca wrote: In a nutshell SELECT FILE WITH VALUE = 'A' TO 1 SELECT FILE WITH VALUE = 'B' TO 2 MERGE.LIST 1 UNION 2 TO 0 SORT FILE VALUE -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 12:16 PM To: U2 Users List Subject: [U2] Doing Multiple Selects in BASIC and combining the lists This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- John Thompson ___ 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 -- John Thompson ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] SOAP Header
Thanks Larry. They are on 7.2. Currently we are using the SOAPCreateRequest, SOAPSetRequestContent, and SOAPSubmitRequest functions only. I would like to avoid adding the header info to the SOAP body if possible, but if not, how did you do it? Did you surround it by the Header tags or did you just put the info at the beginning of the body? Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Larry Hiscock Sent: Wednesday, July 27, 2011 9:32 AM To: 'U2 Users List' Subject: Re: [U2] SOAP Header Hi Steve, What version of UD and on what platform? The reason I ask is that we have a client that is stuck on UD v6.1 for the time being (because they're on SCO OpenServer). At that rev and on that platform, we ran into issues using some of the SOAP functions. We were able to work around it, but only ended up using the SOAPCreateSecureRequest(), SOAPSetRequestContent() and SOAPSubmitRequest() functions. We built our own SOAP headers into the SOAP body that is passed to SOAPSetRequestContent(). You might also try turning on Protocol Logging. It does give some mostly useful information about exactly where your SOAP transaction is failing. VAR = protocolLogging(/path.../soapprotocol.log, ON, 7) Larry Hiscock Western Computer Services PH: 661-255-0235 -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Long Sent: Wednesday, July 27, 2011 9:05 AM To: U2 Users List Subject: [U2] SOAP Header Hi All - I am using the Unidata functionality to do SOAP calls and I now need to specify header information to call a SSL page. It is failing because there is not info in the header. The documentation is very sparse on this, as you all know. Anyone have any insight on how to specify header info using the SOAPSetRequestHeader function? Thanks in advance! Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax ___ 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] Doing Multiple Selects in BASIC and combining the lists
EXECUTE SELECT FILE WITH VALUE = 'A' TO 1 EXECUTE SELECT FILE WITH VALUE = 'B' TO 2 EXECUTE MERGE.LIST 1 UNION 2 TO 0 TOT.VAL = 0 END.OF.LIST = FALSE LOOP READNEXT KEY FROM 0 ELSE END.OF.LIST = TRUE UNTIL END.OF.LIST = TRUE DO READ RECORD FROM FILE, KEY THEN VALUE= OCONV(RECORDX,'MD2') TOT.VAL += VAL END REPEAT -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 1:17 PM To: U2 Users List Subject: Re: [U2] Doing Multiple Selects in BASIC and combining the lists Ok, got stuck again... How would your example play out in BASIC? Its just a bunch of archive info in a file that only has a couple of indexes, but, I would like to look at the active file as well... EXECUTE \SELECT FILE1 WITH VALUE = 'A' TO 1\ EXECUTE \SELECT FILE2 WITH VALUE = 'A' TO 2\ EXECUTE \MERGE.LIST 1 UNION 2 TO 0\ I get an error claiming select list 1 is not active this way. I need the selects to be separate and not stack. I know how to stack them with PASSLIST and RTNLIST... I'm just fuzzy on how to do them separately and then combine them? Would I need to save them and use LIST.UNION? Or just do the two READNEXTS? (I'm trying to avoid because the READNEXT loop is kind of big) Any help is appreciated. On Wed, Jul 27, 2011 at 1:22 PM, Buffington, Wyatt wgbuffing...@hydro.mb.ca wrote: In a nutshell SELECT FILE WITH VALUE = 'A' TO 1 SELECT FILE WITH VALUE = 'B' TO 2 MERGE.LIST 1 UNION 2 TO 0 SORT FILE VALUE -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 12:16 PM To: U2 Users List Subject: [U2] Doing Multiple Selects in BASIC and combining the lists This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- John Thompson ___ 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 -- John Thompson ___ 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] SOAP Header
Here's an example of one we're using to validate mailing addresses (the indentation is just for readability): * Build the SOAP request SoapBody = '?xml version=1.0 encoding=UTF-8?' SoapBody := 'soap:Envelope xmlns:xsi=http://www.w3.org/2001/XMLSchema-instance;' SoapBody := ' xmlns:xsd=http://www.w3.org/2001/XMLSchema;' SoapBody := ' xmlns:soap=http://schemas.xmlsoap.org/soap/envelope/;' SoapBody := ' soap:Body' SoapBody := ' ':Method:' xmlns=':NameSpace:'' SoapBody := 'request' SoapBody := ' Addresses' SoapBody := 'AddressRequest' SoapBody := ' Addressee':ADDRESSEE:'/Addressee' SoapBody := ' Street':ADDRESS:'/Street' SoapBody := ' Street2':ADDRESS2:'/Street2' SoapBody := ' City':CITY:'/City' SoapBody := ' State':STATE:'/State' SoapBody := ' ZipCode':ZIPCODE:'/ZipCode' SoapBody := ' LastLine':LASTLINE:'/LastLine' SoapBody := '/AddressRequest' SoapBody := ' /Addresses' SoapBody := ' Suggestions':MaxSugg:'/Suggestions' SoapBody := '/request' SoapBody := ' /':Method:'' SoapBody := ' /soap:Body' SoapBody := '/soap:Envelope' * Load the security context RtnVal = loadSecurityContext(Context, ContextName, password) * Create the Request RtnVal = SOAPCreateSecureRequest(SoapURL, SoapAction, SoapReq, Context) * Set up the Request Content RtnVal = SOAPSetRequestContent(SoapReq, SoapBody, 1) * Submit the Request RtnVal = SOAPSubmitRequest(SoapReq, Timeout, RespHeaders, RespData, SoapStatus) There's obviously more error trapping in the live version, but I stripped it out for this example just to show the process flow. SoapURL contains the URL to the web service (https://.../VerifyService.asmx), and SoapAction, NameSpace and Method contain the appropriate data specified in the WSDL. The Response headers and data are returned in RespHeaders and RespData respectively. Hope this helps... Larry Hiscock Western Computer Services -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Long Sent: Wednesday, July 27, 2011 11:23 AM To: U2 Users List Subject: Re: [U2] SOAP Header Thanks Larry. They are on 7.2. Currently we are using the SOAPCreateRequest, SOAPSetRequestContent, and SOAPSubmitRequest functions only. I would like to avoid adding the header info to the SOAP body if possible, but if not, how did you do it? Did you surround it by the Header tags or did you just put the info at the beginning of the body? Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Larry Hiscock Sent: Wednesday, July 27, 2011 9:32 AM To: 'U2 Users List' Subject: Re: [U2] SOAP Header Hi Steve, What version of UD and on what platform? The reason I ask is that we have a client that is stuck on UD v6.1 for the time being (because they're on SCO OpenServer). At that rev and on that platform, we ran into issues using some of the SOAP functions. We were able to work around it, but only ended up using the SOAPCreateSecureRequest(), SOAPSetRequestContent() and SOAPSubmitRequest() functions. We built our own SOAP headers into the SOAP body that is passed to SOAPSetRequestContent(). You might also try turning on Protocol Logging. It does give some mostly useful information about exactly where your SOAP transaction is failing. VAR = protocolLogging(/path.../soapprotocol.log, ON, 7) Larry Hiscock Western Computer Services PH: 661-255-0235 -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Long Sent: Wednesday, July 27, 2011 9:05 AM To: U2 Users List Subject: [U2] SOAP Header Hi All - I am using the Unidata functionality to do SOAP calls and I now need to specify header information to call a SSL page. It is failing because there is not info in the header. The documentation is very sparse on this, as you all know. Anyone have any insight on how to specify header info using the SOAPSetRequestHeader function? Thanks in advance! Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax ___ 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
Re: [U2] Doing Multiple Selects in BASIC and combining the lists
If I understand correctly, you're going to end up with a list that has entities from two files, therefore you're going to need to do a test when you do the read to see which file the ID came from and ergo which file to read So to add to the code below, you'd need READ RECORD FROM FILE1, KEY THEN GOSUB PROCESS.RECORD END ELSE READ RECORD FROM FILE2, KEY THEN GOSUB PROCESS.RECORD END ELSE PRINT KEY : ' WAS NOT IN EITHER FILE???' INPUT WAKKA.WAKKA END END -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Buffington, Wyatt Sent: Wednesday, July 27, 2011 11:27 AM To: U2 Users List Subject: Re: [U2] Doing Multiple Selects in BASIC and combining the lists EXECUTE SELECT FILE WITH VALUE = 'A' TO 1 EXECUTE SELECT FILE WITH VALUE = 'B' TO 2 EXECUTE MERGE.LIST 1 UNION 2 TO 0 TOT.VAL = 0 END.OF.LIST = FALSE LOOP READNEXT KEY FROM 0 ELSE END.OF.LIST = TRUE UNTIL END.OF.LIST = TRUE DO READ RECORD FROM FILE, KEY THEN VALUE= OCONV(RECORDX,'MD2') TOT.VAL += VAL END REPEAT -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 1:17 PM To: U2 Users List Subject: Re: [U2] Doing Multiple Selects in BASIC and combining the lists Ok, got stuck again... How would your example play out in BASIC? Its just a bunch of archive info in a file that only has a couple of indexes, but, I would like to look at the active file as well... EXECUTE \SELECT FILE1 WITH VALUE = 'A' TO 1\ EXECUTE \SELECT FILE2 WITH VALUE = 'A' TO 2\ EXECUTE \MERGE.LIST 1 UNION 2 TO 0\ I get an error claiming select list 1 is not active this way. I need the selects to be separate and not stack. I know how to stack them with PASSLIST and RTNLIST... I'm just fuzzy on how to do them separately and then combine them? Would I need to save them and use LIST.UNION? Or just do the two READNEXTS? (I'm trying to avoid because the READNEXT loop is kind of big) Any help is appreciated. On Wed, Jul 27, 2011 at 1:22 PM, Buffington, Wyatt wgbuffing...@hydro.mb.ca wrote: In a nutshell SELECT FILE WITH VALUE = 'A' TO 1 SELECT FILE WITH VALUE = 'B' TO 2 MERGE.LIST 1 UNION 2 TO 0 SORT FILE VALUE -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 12:16 PM To: U2 Users List Subject: [U2] Doing Multiple Selects in BASIC and combining the lists This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- John Thompson ___ 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 -- John Thompson ___ 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] SOAP Header
Thanks Larry. I think we need to try the secureRequest, but I haven't messed with the setup. I see you are doing loadSecurityContext. How did you create the context? Via the saveSecurityContext? Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Larry Hiscock Sent: Wednesday, July 27, 2011 11:47 AM To: 'U2 Users List' Subject: Re: [U2] SOAP Header Here's an example of one we're using to validate mailing addresses (the indentation is just for readability): * Build the SOAP request SoapBody = '?xml version=1.0 encoding=UTF-8?' SoapBody := 'soap:Envelope xmlns:xsi=http://www.w3.org/2001/XMLSchema-instance;' SoapBody := ' xmlns:xsd=http://www.w3.org/2001/XMLSchema;' SoapBody := ' xmlns:soap=http://schemas.xmlsoap.org/soap/envelope/;' SoapBody := ' soap:Body' SoapBody := ' ':Method:' xmlns=':NameSpace:'' SoapBody := 'request' SoapBody := ' Addresses' SoapBody := 'AddressRequest' SoapBody := ' Addressee':ADDRESSEE:'/Addressee' SoapBody := ' Street':ADDRESS:'/Street' SoapBody := ' Street2':ADDRESS2:'/Street2' SoapBody := ' City':CITY:'/City' SoapBody := ' State':STATE:'/State' SoapBody := ' ZipCode':ZIPCODE:'/ZipCode' SoapBody := ' LastLine':LASTLINE:'/LastLine' SoapBody := '/AddressRequest' SoapBody := ' /Addresses' SoapBody := ' Suggestions':MaxSugg:'/Suggestions' SoapBody := '/request' SoapBody := ' /':Method:'' SoapBody := ' /soap:Body' SoapBody := '/soap:Envelope' * Load the security context RtnVal = loadSecurityContext(Context, ContextName, password) * Create the Request RtnVal = SOAPCreateSecureRequest(SoapURL, SoapAction, SoapReq, Context) * Set up the Request Content RtnVal = SOAPSetRequestContent(SoapReq, SoapBody, 1) * Submit the Request RtnVal = SOAPSubmitRequest(SoapReq, Timeout, RespHeaders, RespData, SoapStatus) There's obviously more error trapping in the live version, but I stripped it out for this example just to show the process flow. SoapURL contains the URL to the web service (https://.../VerifyService.asmx), and SoapAction, NameSpace and Method contain the appropriate data specified in the WSDL. The Response headers and data are returned in RespHeaders and RespData respectively. Hope this helps... Larry Hiscock Western Computer Services -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Long Sent: Wednesday, July 27, 2011 11:23 AM To: U2 Users List Subject: Re: [U2] SOAP Header Thanks Larry. They are on 7.2. Currently we are using the SOAPCreateRequest, SOAPSetRequestContent, and SOAPSubmitRequest functions only. I would like to avoid adding the header info to the SOAP body if possible, but if not, how did you do it? Did you surround it by the Header tags or did you just put the info at the beginning of the body? Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Larry Hiscock Sent: Wednesday, July 27, 2011 9:32 AM To: 'U2 Users List' Subject: Re: [U2] SOAP Header Hi Steve, What version of UD and on what platform? The reason I ask is that we have a client that is stuck on UD v6.1 for the time being (because they're on SCO OpenServer). At that rev and on that platform, we ran into issues using some of the SOAP functions. We were able to work around it, but only ended up using the SOAPCreateSecureRequest(), SOAPSetRequestContent() and SOAPSubmitRequest() functions. We built our own SOAP headers into the SOAP body that is passed to SOAPSetRequestContent(). You might also try turning on Protocol Logging. It does give some mostly useful information about exactly where your SOAP transaction is failing. VAR = protocolLogging(/path.../soapprotocol.log, ON, 7) Larry Hiscock Western Computer Services PH: 661-255-0235 -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Long Sent: Wednesday, July 27, 2011 9:05 AM To: U2 Users List Subject: [U2] SOAP Header Hi All - I am using the Unidata functionality to do SOAP calls and I now need to specify header information to call a SSL page. It is failing because there is not info in the header. The documentation is very sparse on this, as you all know. Anyone have any insight on how to specify header info using the SOAPSetRequestHeader function? Thanks in advance! Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax
Re: [U2] Doing Multiple Selects in BASIC and combining the lists
Yes it occurred to me some minutes ago that they ID's in the two files are different, so you are correct. So I'll probably end up just doing the two readnext's anyway like a previous poster suggested. However, thanks for all the examples. I started out on an older PICK system that did not have multiple select lists, I have never used the feature that much, and I'm pretty new to it, and sometimes I wish they just stored the lists in a BASIC program as dynamic arrays... On Wed, Jul 27, 2011 at 2:56 PM, Allen E. Elwood aelw...@socal.rr.comwrote: If I understand correctly, you're going to end up with a list that has entities from two files, therefore you're going to need to do a test when you do the read to see which file the ID came from and ergo which file to read So to add to the code below, you'd need READ RECORD FROM FILE1, KEY THEN GOSUB PROCESS.RECORD END ELSE READ RECORD FROM FILE2, KEY THEN GOSUB PROCESS.RECORD END ELSE PRINT KEY : ' WAS NOT IN EITHER FILE???' INPUT WAKKA.WAKKA END END -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Buffington, Wyatt Sent: Wednesday, July 27, 2011 11:27 AM To: U2 Users List Subject: Re: [U2] Doing Multiple Selects in BASIC and combining the lists EXECUTE SELECT FILE WITH VALUE = 'A' TO 1 EXECUTE SELECT FILE WITH VALUE = 'B' TO 2 EXECUTE MERGE.LIST 1 UNION 2 TO 0 TOT.VAL = 0 END.OF.LIST = FALSE LOOP READNEXT KEY FROM 0 ELSE END.OF.LIST = TRUE UNTIL END.OF.LIST = TRUE DO READ RECORD FROM FILE, KEY THEN VALUE= OCONV(RECORDX,'MD2') TOT.VAL += VAL END REPEAT -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 1:17 PM To: U2 Users List Subject: Re: [U2] Doing Multiple Selects in BASIC and combining the lists Ok, got stuck again... How would your example play out in BASIC? Its just a bunch of archive info in a file that only has a couple of indexes, but, I would like to look at the active file as well... EXECUTE \SELECT FILE1 WITH VALUE = 'A' TO 1\ EXECUTE \SELECT FILE2 WITH VALUE = 'A' TO 2\ EXECUTE \MERGE.LIST 1 UNION 2 TO 0\ I get an error claiming select list 1 is not active this way. I need the selects to be separate and not stack. I know how to stack them with PASSLIST and RTNLIST... I'm just fuzzy on how to do them separately and then combine them? Would I need to save them and use LIST.UNION? Or just do the two READNEXTS? (I'm trying to avoid because the READNEXT loop is kind of big) Any help is appreciated. On Wed, Jul 27, 2011 at 1:22 PM, Buffington, Wyatt wgbuffing...@hydro.mb.ca wrote: In a nutshell SELECT FILE WITH VALUE = 'A' TO 1 SELECT FILE WITH VALUE = 'B' TO 2 MERGE.LIST 1 UNION 2 TO 0 SORT FILE VALUE -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 12:16 PM To: U2 Users List Subject: [U2] Doing Multiple Selects in BASIC and combining the lists This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- John Thompson ___ 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 -- John Thompson ___ 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 -- John Thompson ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] SOAP Header
It's been a while since I've created one, but IIRC, the easiest way is to use UniAdmin to create a CSR, then a self-signed certificate (or you can purchase a cert using the CSR) and the security context. Check out the UniData Security Features guide at http://www.rocketsoftware.com/u2/products/unidata/resources/manuals/security -v7r2.pdf/view Larry Hiscock Western Computer Services -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Long Sent: Wednesday, July 27, 2011 11:57 AM To: U2 Users List Subject: Re: [U2] SOAP Header Thanks Larry. I think we need to try the secureRequest, but I haven't messed with the setup. I see you are doing loadSecurityContext. How did you create the context? Via the saveSecurityContext? Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Larry Hiscock Sent: Wednesday, July 27, 2011 11:47 AM To: 'U2 Users List' Subject: Re: [U2] SOAP Header Here's an example of one we're using to validate mailing addresses (the indentation is just for readability): * Build the SOAP request SoapBody = '?xml version=1.0 encoding=UTF-8?' SoapBody := 'soap:Envelope xmlns:xsi=http://www.w3.org/2001/XMLSchema-instance;' SoapBody := ' xmlns:xsd=http://www.w3.org/2001/XMLSchema;' SoapBody := ' xmlns:soap=http://schemas.xmlsoap.org/soap/envelope/;' SoapBody := ' soap:Body' SoapBody := ' ':Method:' xmlns=':NameSpace:'' SoapBody := 'request' SoapBody := ' Addresses' SoapBody := 'AddressRequest' SoapBody := ' Addressee':ADDRESSEE:'/Addressee' SoapBody := ' Street':ADDRESS:'/Street' SoapBody := ' Street2':ADDRESS2:'/Street2' SoapBody := ' City':CITY:'/City' SoapBody := ' State':STATE:'/State' SoapBody := ' ZipCode':ZIPCODE:'/ZipCode' SoapBody := ' LastLine':LASTLINE:'/LastLine' SoapBody := '/AddressRequest' SoapBody := ' /Addresses' SoapBody := ' Suggestions':MaxSugg:'/Suggestions' SoapBody := '/request' SoapBody := ' /':Method:'' SoapBody := ' /soap:Body' SoapBody := '/soap:Envelope' * Load the security context RtnVal = loadSecurityContext(Context, ContextName, password) * Create the Request RtnVal = SOAPCreateSecureRequest(SoapURL, SoapAction, SoapReq, Context) * Set up the Request Content RtnVal = SOAPSetRequestContent(SoapReq, SoapBody, 1) * Submit the Request RtnVal = SOAPSubmitRequest(SoapReq, Timeout, RespHeaders, RespData, SoapStatus) There's obviously more error trapping in the live version, but I stripped it out for this example just to show the process flow. SoapURL contains the URL to the web service (https://.../VerifyService.asmx), and SoapAction, NameSpace and Method contain the appropriate data specified in the WSDL. The Response headers and data are returned in RespHeaders and RespData respectively. Hope this helps... Larry Hiscock Western Computer Services -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Long Sent: Wednesday, July 27, 2011 11:23 AM To: U2 Users List Subject: Re: [U2] SOAP Header Thanks Larry. They are on 7.2. Currently we are using the SOAPCreateRequest, SOAPSetRequestContent, and SOAPSubmitRequest functions only. I would like to avoid adding the header info to the SOAP body if possible, but if not, how did you do it? Did you surround it by the Header tags or did you just put the info at the beginning of the body? Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Larry Hiscock Sent: Wednesday, July 27, 2011 9:32 AM To: 'U2 Users List' Subject: Re: [U2] SOAP Header Hi Steve, What version of UD and on what platform? The reason I ask is that we have a client that is stuck on UD v6.1 for the time being (because they're on SCO OpenServer). At that rev and on that platform, we ran into issues using some of the SOAP functions. We were able to work around it, but only ended up using the SOAPCreateSecureRequest(), SOAPSetRequestContent() and SOAPSubmitRequest() functions. We built our own SOAP headers into the SOAP body that is passed to SOAPSetRequestContent(). You might also try turning on Protocol Logging. It does give some mostly useful information about exactly where your SOAP transaction is failing. VAR = protocolLogging(/path.../soapprotocol.log, ON, 7) Larry Hiscock Western Computer Services PH: 661-255-0235 -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Long Sent:
Re: [U2] Doing Multiple Selects in BASIC and combining the lists
John Said and sometimes I wish they just stored the lists in a BASIC program as dynamic arrays... There is the READLIST verb. That takes a list and makes a dynamic array with it. P type uses READSELECT. Charles Shaffer Senior Analyst NTN-Bower Corporation ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Doing Multiple Selects in BASIC and combining the lists
The lists are stored in SAVEDLISTS as a multi-attribute dynamic array John Thompson wrote: Yes it occurred to me some minutes ago that they ID's in the two files are different, so you are correct. So I'll probably end up just doing the two readnext's anyway like a previous poster suggested. However, thanks for all the examples. I started out on an older PICK system that did not have multiple select lists, I have never used the feature that much, and I'm pretty new to it, and sometimes I wish they just stored the lists in a BASIC program as dynamic arrays... On Wed, Jul 27, 2011 at 2:56 PM, Allen E. Elwood aelw...@socal.rr.comwrote: If I understand correctly, you're going to end up with a list that has entities from two files, therefore you're going to need to do a test when you do the read to see which file the ID came from and ergo which file to read So to add to the code below, you'd need READ RECORD FROM FILE1, KEY THEN GOSUB PROCESS.RECORD END ELSE READ RECORD FROM FILE2, KEY THEN GOSUB PROCESS.RECORD END ELSE PRINT KEY : ' WAS NOT IN EITHER FILE???' INPUT WAKKA.WAKKA END END -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Buffington, Wyatt Sent: Wednesday, July 27, 2011 11:27 AM To: U2 Users List Subject: Re: [U2] Doing Multiple Selects in BASIC and combining the lists EXECUTE SELECT FILE WITH VALUE = 'A' TO 1 EXECUTE SELECT FILE WITH VALUE = 'B' TO 2 EXECUTE MERGE.LIST 1 UNION 2 TO 0 TOT.VAL = 0 END.OF.LIST = FALSE LOOP READNEXT KEY FROM 0 ELSE END.OF.LIST = TRUE UNTIL END.OF.LIST = TRUE DO READ RECORD FROM FILE, KEY THEN VALUE= OCONV(RECORDX,'MD2') TOT.VAL += VAL END REPEAT -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 1:17 PM To: U2 Users List Subject: Re: [U2] Doing Multiple Selects in BASIC and combining the lists Ok, got stuck again... How would your example play out in BASIC? Its just a bunch of archive info in a file that only has a couple of indexes, but, I would like to look at the active file as well... EXECUTE \SELECT FILE1 WITH VALUE = 'A' TO 1\ EXECUTE \SELECT FILE2 WITH VALUE = 'A' TO 2\ EXECUTE \MERGE.LIST 1 UNION 2 TO 0\ I get an error claiming select list 1 is not active this way. I need the selects to be separate and not stack. I know how to stack them with PASSLIST and RTNLIST... I'm just fuzzy on how to do them separately and then combine them? Would I need to save them and use LIST.UNION? Or just do the two READNEXTS? (I'm trying to avoid because the READNEXT loop is kind of big) Any help is appreciated. On Wed, Jul 27, 2011 at 1:22 PM, Buffington, Wyatt wgbuffing...@hydro.mb.ca wrote: In a nutshell SELECT FILE WITH VALUE = 'A' TO 1 SELECT FILE WITH VALUE = 'B' TO 2 MERGE.LIST 1 UNION 2 TO 0 SORT FILE VALUE -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 12:16 PM To: U2 Users List Subject: [U2] Doing Multiple Selects in BASIC and combining the lists This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- John Thompson ___ 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 -- John Thompson ___ 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 -- Jeff Schasny - Denver, Co, USA jschasny at gmail dot com
Re: [U2] SOAP Header
Thanks for your help Larry! Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Larry Hiscock Sent: Wednesday, July 27, 2011 12:21 PM To: 'U2 Users List' Subject: Re: [U2] SOAP Header It's been a while since I've created one, but IIRC, the easiest way is to use UniAdmin to create a CSR, then a self-signed certificate (or you can purchase a cert using the CSR) and the security context. Check out the UniData Security Features guide at http://www.rocketsoftware.com/u2/products/unidata/resources/manuals/secu rity -v7r2.pdf/view Larry Hiscock Western Computer Services -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Long Sent: Wednesday, July 27, 2011 11:57 AM To: U2 Users List Subject: Re: [U2] SOAP Header Thanks Larry. I think we need to try the secureRequest, but I haven't messed with the setup. I see you are doing loadSecurityContext. How did you create the context? Via the saveSecurityContext? Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Larry Hiscock Sent: Wednesday, July 27, 2011 11:47 AM To: 'U2 Users List' Subject: Re: [U2] SOAP Header Here's an example of one we're using to validate mailing addresses (the indentation is just for readability): * Build the SOAP request SoapBody = '?xml version=1.0 encoding=UTF-8?' SoapBody := 'soap:Envelope xmlns:xsi=http://www.w3.org/2001/XMLSchema-instance;' SoapBody := ' xmlns:xsd=http://www.w3.org/2001/XMLSchema;' SoapBody := ' xmlns:soap=http://schemas.xmlsoap.org/soap/envelope/;' SoapBody := ' soap:Body' SoapBody := ' ':Method:' xmlns=':NameSpace:'' SoapBody := 'request' SoapBody := ' Addresses' SoapBody := 'AddressRequest' SoapBody := ' Addressee':ADDRESSEE:'/Addressee' SoapBody := ' Street':ADDRESS:'/Street' SoapBody := ' Street2':ADDRESS2:'/Street2' SoapBody := ' City':CITY:'/City' SoapBody := ' State':STATE:'/State' SoapBody := ' ZipCode':ZIPCODE:'/ZipCode' SoapBody := ' LastLine':LASTLINE:'/LastLine' SoapBody := '/AddressRequest' SoapBody := ' /Addresses' SoapBody := ' Suggestions':MaxSugg:'/Suggestions' SoapBody := '/request' SoapBody := ' /':Method:'' SoapBody := ' /soap:Body' SoapBody := '/soap:Envelope' * Load the security context RtnVal = loadSecurityContext(Context, ContextName, password) * Create the Request RtnVal = SOAPCreateSecureRequest(SoapURL, SoapAction, SoapReq, Context) * Set up the Request Content RtnVal = SOAPSetRequestContent(SoapReq, SoapBody, 1) * Submit the Request RtnVal = SOAPSubmitRequest(SoapReq, Timeout, RespHeaders, RespData, SoapStatus) There's obviously more error trapping in the live version, but I stripped it out for this example just to show the process flow. SoapURL contains the URL to the web service (https://.../VerifyService.asmx), and SoapAction, NameSpace and Method contain the appropriate data specified in the WSDL. The Response headers and data are returned in RespHeaders and RespData respectively. Hope this helps... Larry Hiscock Western Computer Services -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve Long Sent: Wednesday, July 27, 2011 11:23 AM To: U2 Users List Subject: Re: [U2] SOAP Header Thanks Larry. They are on 7.2. Currently we are using the SOAPCreateRequest, SOAPSetRequestContent, and SOAPSubmitRequest functions only. I would like to avoid adding the header info to the SOAP body if possible, but if not, how did you do it? Did you surround it by the Header tags or did you just put the info at the beginning of the body? Thanks, Steve Long Spyderweb Technical Services, Inc. (360) 687-8797 Washington (503) 406-8797 Oregon (866) 354-5913 Fax -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Larry Hiscock Sent: Wednesday, July 27, 2011 9:32 AM To: 'U2 Users List' Subject: Re: [U2] SOAP Header Hi Steve, What version of UD and on what platform? The reason I ask is that we have a client that is stuck on UD v6.1 for the time being (because they're on SCO OpenServer). At that rev and on that platform, we ran into issues using some of the SOAP functions. We were able to work around it, but only ended up using the SOAPCreateSecureRequest(), SOAPSetRequestContent() and SOAPSubmitRequest() functions. We built our own SOAP headers into the SOAP body that is passed to SOAPSetRequestContent(). You might also try turning
Re: [U2] HS.ADMIN Scrub Hangs
When I do a LOGTO HS.ADMIN HS.ADMIN 5. HS.SCRUB Choose Account... Metal Choose File... INVOICE It comes back with... Analyzing: INVOICE * An then Ctrl-Break, A and Q do not work... I have to close the Dynamic Connect session entirely. What gives? --Bill ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Doing Multiple Selects in BASIC and combining the lists
John, I'm guessing you're using a PICK account, to use numbered select lists in these accounts you must have $OPTIONS -S in the code. Also multiple TCL commands can be combined together just as in a PA VOC type avoiding the need for multiple EXECUTE's so the code could look something like this:- $OPTIONS -S PARAGRAPH = \SELECT FILE1 WITH VALUE = 'A' TO 1 COUNT.SUP\ PARAGRAPH-1 = \SELECT FILE2 WITH VALUE = 'A' TO 2 COUNT.SUP\ PARAGRAPH-1 = \MERGE.LIST 1 UNION 2 COUNT.SUP\ PERFORM PARAGRAPH PERFORM is more efficient than EXECUTE and the COUNT.SUP suppresses the nn records selected message. You should also be aware that MERGE.LIST does a left justified sort on the records and removes any duplicates. HTH, Andy From: John Thompson jthompson...@gmail.com To: U2 Users List u2-users@listserver.u2ug.org Sent: Wednesday, 27 July 2011, 19:16 Subject: Re: [U2] Doing Multiple Selects in BASIC and combining the lists Ok, got stuck again... How would your example play out in BASIC? Its just a bunch of archive info in a file that only has a couple of indexes, but, I would like to look at the active file as well... EXECUTE \SELECT FILE1 WITH VALUE = 'A' TO 1\ EXECUTE \SELECT FILE2 WITH VALUE = 'A' TO 2\ EXECUTE \MERGE.LIST 1 UNION 2 TO 0\ I get an error claiming select list 1 is not active this way. I need the selects to be separate and not stack. I know how to stack them with PASSLIST and RTNLIST... I'm just fuzzy on how to do them separately and then combine them? Would I need to save them and use LIST.UNION? Or just do the two READNEXTS? (I'm trying to avoid because the READNEXT loop is kind of big) Any help is appreciated. On Wed, Jul 27, 2011 at 1:22 PM, Buffington, Wyatt wgbuffing...@hydro.mb.ca wrote: In a nutshell SELECT FILE WITH VALUE = 'A' TO 1 SELECT FILE WITH VALUE = 'B' TO 2 MERGE.LIST 1 UNION 2 TO 0 SORT FILE VALUE -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Thompson Sent: Wednesday, July 27, 2011 12:16 PM To: U2 Users List Subject: [U2] Doing Multiple Selects in BASIC and combining the lists This may be an easy one, or a hard one, however, I realized I don't recall ever having to do this until today, or I could just be tired... How can you do a SELECT from two different files in a BASIC program and then combine the lists of ID's so that you can do a READNEXT on it? I ask this because I believe by default that Universe does not store the select lists as dynamic arrays. For example: EXECUTE \SELECT FILE1 WITH AMOUNT = 112.50\ RTNLIST FILE1_LIST EXECUTE \SELECT FILE2 WITH AMOUNT = 112.50\ RTNLIST FILE2_LIST ...Code to combine FILE1_LIST and FILE2_LIST into FINAL_LIST... REANEXT ID FROM FINAL_LIST THEN do something NEXT ID I am using Universe 10.3.x on AIX 5.3. I'm in a PICK flavor account. -- John Thompson ___ 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 -- John Thompson ___ 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] HS.ADMIN Scrub Hangs
Try a LIST.READU to see if there are locks ? Mark -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bill Brutzman Sent: Wednesday, July 27, 2011 4:45 PM To: U2 Users List Subject: Re: [U2] HS.ADMIN Scrub Hangs When I do a LOGTO HS.ADMIN HS.ADMIN 5. HS.SCRUB Choose Account... Metal Choose File... INVOICE It comes back with... Analyzing: INVOICE * An then Ctrl-Break, A and Q do not work... I have to close the Dynamic Connect session entirely. What gives? --Bill ___ 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] HS.ADMIN Scrub Hangs
1. I ran LIST.READU... there were no locks. 2. Problem solved... the problem was with... The DICTionary fields (1 thru 8, especially 4 and 8) for the field, in my case PARTNUMBER, have to exist and be specified properly... if not, HS.SCRUB hangs on the file (in my case the INVOICE file) altogether. --Bill -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Mark Eastwood Sent: Wednesday, July 27, 2011 5:27 PM To: U2 Users List Subject: Re: [U2] HS.ADMIN Scrub Hangs Try a LIST.READU to see if there are locks ? Mark -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bill Brutzman Sent: Wednesday, July 27, 2011 4:45 PM To: U2 Users List Subject: Re: [U2] HS.ADMIN Scrub Hangs When I do a LOGTO HS.ADMIN HS.ADMIN 5. HS.SCRUB Choose Account... Metal Choose File... INVOICE It comes back with... Analyzing: INVOICE * An then Ctrl-Break, A and Q do not work... I have to close the Dynamic Connect session entirely. What gives? --Bill ___ 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] SOAP Header
I'm confused. Exactly what is setting the Host: http header in the SOAP request? ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] HS.ADMIN Scrub Hangs
On 27/07/11 22:46, Bill Brutzman wrote: 1. I ran LIST.READU... there were no locks. 2. Problem solved... the problem was with... The DICTionary fields (1 thru 8, especially 4 and 8) for the field, in my case PARTNUMBER, have to exist and be specified properly... if not, HS.SCRUB hangs on the file (in my case the INVOICE file) altogether. What version of U2? There's some stuff about running HS.SCRUB on pickwiki. It used to be very good at hanging with no explanation ... the pickwiki page might give you some clues, And there's also a few programs there that will go through your dictionaries looking for problems. Cheers, Wol ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] HS.ADMIN Scrub Hangs
Wol... UniVerse 10.3..6 on HP Integrity Itanium It is good to know that HS.SCRUB is on PickWiki. --Bill -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wols Lists Sent: Wednesday, July 27, 2011 7:08 PM To: u2-users@listserver.u2ug.org Subject: Re: [U2] HS.ADMIN Scrub Hangs On 27/07/11 22:46, Bill Brutzman wrote: 1. I ran LIST.READU... there were no locks. 2. Problem solved... the problem was with... The DICTionary fields (1 thru 8, especially 4 and 8) for the field, in my case PARTNUMBER, have to exist and be specified properly... if not, HS.SCRUB hangs on the file (in my case the INVOICE file) altogether. What version of U2? There's some stuff about running HS.SCRUB on pickwiki. It used to be very good at hanging with no explanation ... the pickwiki page might give you some clues, And there's also a few programs there that will go through your dictionaries looking for problems. Cheers, Wol ___ 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
