[Fwd: Re: [Arsperl-users] ars_GetListEntry returns without data]
Brought to you by:
jeffmurphy
Menu
▾
▴
[Fwd: Re: [Arsperl-users] ars_GetListEntry returns without data]
|
From: Henrik J. <hen...@ti...> - 2006-01-11 07:20:29
|
Excuse me, should have done the reply to the mailing-list.
-------- Original Message --------
Subject: Re: [Arsperl-users] ars_GetListEntry returns without data
Date: Tue, 10 Jan 2006 17:00:27 +0100
From: Henrik Johansson <hen...@ti...>
Organization: TietoEnator Processing & Network AB
To: Alex Agle <ale...@oi...>
References: <43C...@ti...>
<200...@oi...>
Thanks Alex,
I changed the fourth argument from '[]' to '0' and now I get the entry-ids.
regards
Henrik
Alex Agle wrote:
>Hi Henrik,
>
>Try:
>%entries = ars_GetListEntry($ctrl, $schema, $qual, 0, 0);
>
>This is probably the one change you need to make to all of your
>ars_GetListEntry calls (adding an extra 0). This change occurred
>between 4.x and 5.x.
>
>Alex
>
>On Tue, Jan 10, 2006 at 03:57:18PM +0100, Henrik Johansson wrote:
>
>
>>We are moving and upgrading our AR-server from 4.5.2 on Solaris 8 to
>>6.3.0 on
>>Windows Server 2003 and have problem with the function ars_GetListEntry.
>>I'm running the perlprogram on Solaris 9, with arsperl-1.84.
>>I have built arsperl-1.84 against ars-api 6.3 with patch 13.
>>There is no problem to run the updated perlprogram, against the old
>>AR-server.
>>
>>An extract from the code:
>>$ctrl = ars_Login($ars_server, $arsusername, $password);
>>..
>>$qual = ars_LoadQualifier($ctrl, $schema, "(1 = 1)");
>>if (! defined($qual)) {
>> &ERROR("read_ars_users: Error in usage of ars_LoadQualifier, ARS
>>message: $ars_errstr.");
>>}
>># Retrieve all of the entry-id's for the schema.
>>%entries = ars_GetListEntry($ctrl, $schema, $qual, 0, []);
>>if (scalar %entries eq 0) {
>> &ERROR("read_ars_users: No entries from ars_GetListEntry, ARS
>>message: $ars_errstr.");
>>}
>>
>>The %entries-hash are empty and $ars_errstr are empty.
>>
>>I've tested the other usages of arsperl, in the program, and found no
>>problem.
>>Result Tested functions
>>OK ars_Login($ars_server, $arsusername, $password);
>>OK ars_GetFieldByName($ctrl, $schema, $fids{$fid});
>>OK ars_LoadQualifier($ctrl, $schema, "(1 = 1)");
>>No data ars_GetListEntry($ctrl, $schema, $qual, 0, []);
>>OK ars_GetEntry($ctrl, $schema, $entry_id)) ||
>>OK ars_CreateEntry($ctrl, $schema,
>>OK ars_SetEntry($ctrl, $schema, $l[8], $ars_read_time,
>>OK ars_DeleteEntry($ctrl, $schema, $l[8]) < 1)
>>
>>I've check the networktraffic between client and server and found these
>>packages,
>>when I run ars_GetListEntry, on the client. Only three packets!
>>This is from snoop on the client:
>> 1 0.00000 client -> server RPC C XID=1137346846 PROG=390620 (?)
>>VERS=11 PROC=5
>> 2 0.06305 server -> client RPC R (#1) XID=1137346846 Success
>> 3 0.09627 client -> server TCP D=1079 S=32944 Ack=576013281
>>Seq=3189697003 Len=0 W
>>
>>Here is the snoop-log, between a client and the old server (317 packets):
>> 1 0.00000 client -> oldserver RPC C XID=1136777578 PROG=390620 (?)
>>VERS=7 PROC=5
>> 2 0.09138 oldserver -> client TCP D=50958 S=1010 Ack=574628135
>>Seq=3569712132 Len=0 Win=33580
>> 3 0.59374 oldserver -> client RPC R (#1) XID=1136777578 Success
>> 4 0.00012 oldserver -> client TCP D=50958 S=1010 Push Ack=574628135
>>Seq=3569713592 Len=1460 Win=33580
>> 5 0.00011 oldserver -> client TCP D=50958 S=1010 Ack=574628135
>>Seq=3569715052 Len=1460 Win=33580
>> 6 0.00012 oldserver -> client TCP D=50958 S=1010 Push Ack=574628135
>>Seq=3569716512 Len=1460 Win=33580
>> 7 0.09454 client -> oldserver TCP D=1010 S=50958 Ack=3569717972
>>Seq=574628135 Len=0 Win=33580
>> 8 0.00650 oldserver -> client TCP D=50958 S=1010 Ack=574628135
>>Seq=3569717972 Len=1460 Win=33580
>> 9 0.00013 oldserver -> client TCP D=50958 S=1010 Ack=574628135
>>Seq=3569719432 Len=1460 Win=33580
>>10 0.00002 client -> oldserver TCP D=1010 S=50958 Ack=3569720892
>>Seq=574628135 Len=0 Win=33580
>>11 0.00004 oldserver -> client TCP D=50958 S=1010 Ack=574628135
>>Seq=3569720892 Len=240 Win=33580
>>12 0.00006 oldserver -> client TCP D=50958 S=1010 Ack=574628135
>>Seq=3569721132 Len=1460 Win=33580
>>13 0.00023 oldserver -> client TCP D=50958 S=1010 Ack=574628135
>>Seq=3569722592 Len=1460 Win=33580
>>14 0.00001 client -> oldserver TCP D=1010 S=50958 Ack=3569724052
>>Seq=574628135 Len=0 Win=33580
>>15 0.00101 oldserver -> client TCP D=50958 S=1010 Ack=574628135
>>Seq=3569724052 Len=1460 Win=33580
>>
>>Thanks in advance for solutions or suggestions
>>Henrik
>>_________________________________________________________________________________
>>Henrik Johansson, TietoEnator Processing & Network AB
>>E-mail: hen...@ti... | Voice: +46 920 452 709
>>Internet: http://www.tietoenator.com/ | Fax: +46 920 452 906
>>Laboratoriegr�nd 11, Box 50006, S-973 21 Lule�, Sweden | Mobile: +46 70 555
>>9998
>>
>>
>>
>>-------------------------------------------------------
>>This SF.net email is sponsored by: Splunk Inc. Do you grep through log files
>>for problems? Stop! Download the new AJAX search engine that makes
>>searching your log files as easy as surfing the web. DOWNLOAD SPLUNK!
>>http://ads.osdn.com/?ad_id=7637&alloc_id=16865&op=click
>>_______________________________________________
>>Arsperl-users mailing list
>>Ars...@ar...
>>https://lists.sourceforge.net/lists/listinfo/arsperl-users
>>
>>
>
>
>
--
_________________________________________________________________________________
Henrik Johansson, TietoEnator Processing & Network AB
E-mail: hen...@ti... | Voice: +46 920 452 709
Internet: http://www.tietoenator.com/ | Fax: +46 920 452 906
Laboratoriegränd 11, Box 50006, S-973 21 Luleå, Sweden | Mobile: +46 70 555 9998
--
_________________________________________________________________________________
Henrik Johansson, TietoEnator Processing & Network AB
E-mail: hen...@ti... | Voice: +46 920 452 709
Internet: http://www.tietoenator.com/ | Fax: +46 920 452 906
Laboratoriegränd 11, Box 50006, S-973 21 Luleå, Sweden | Mobile: +46 70 555 9998
|
