arsperl-users — Discussions regarding the use of ARSperl

RE: [Arsperl-users] Long Line of Data

[Lintner, M. <mit...@ci...>]

Yeah, you hit the nail on the head. This is an old script that I wrote a
long time ago. I am using <pre></pre>. It appears to be the only way I
can keep the formatting that is in the Character field but when someone
types a long line it goes off the screen or get cut off when sent to the
printer.
=20
=20
=20

Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20

=20

________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Wednesday, January 25, 2006 4:45 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Long Line of Data



Mitch,

It sounds like the browser doesn't want to auto word wrap.  Does it data
look okay on the screen?  If not, check for <pre> and </pre> around the
text.  These tags tell the browser the text is already formatted so
don't do anything with it.  There may be other tags which would create
the same problem.  You could try forcing the width of the screen using a
table with a specified width.

=20

HTH,

Mark

=20

Mark Vaughan
Programmer III

Direct: +1 303 802 2426
Mobile: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com

________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Wednesday, January 25, 2006 3:32 PM
To: ARSPerl
Subject: [Arsperl-users] Long Line of Data

=20

I have an ARSPerl script that pulls data from a form and displays it in
an HTML window where it can then be sent to a printer using the Browser
print capability. I have one problem. When the script pulls the
Description field from the record and displays it, it gets displayed as
a very long line. Is there a way to take this value and display it in a
reasonable line length?

Thanks,=20

Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20

This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20

RE: [Arsperl-users] Long Line of Data

[Mark V. <Mar...@ev...>]

Mitch,

It sounds like the browser doesn't want to auto word wrap.  Does it data
look okay on the screen?  If not, check for <pre> and </pre> around the
text.  These tags tell the browser the text is already formatted so
don't do anything with it.  There may be other tags which would create
the same problem.  You could try forcing the width of the screen using a
table with a specified width.

=20

HTH,

Mark

=20

Mark Vaughan
Programmer III

Direct: +1 303 802 2426
Mobile: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com

________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Wednesday, January 25, 2006 3:32 PM
To: ARSPerl
Subject: [Arsperl-users] Long Line of Data

=20

I have an ARSPerl script that pulls data from a form and displays it in
an HTML window where it can then be sent to a printer using the Browser
print capability. I have one problem. When the script pulls the
Description field from the record and displays it, it gets displayed as
a very long line. Is there a way to take this value and display it in a
reasonable line length?

Thanks,=20

Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20

This e-mail and any attachments may be confidential and/or legally privil=
eged. If you have received this e-mail and you are not a named addressee,=
 please inform Evolving Systems TIS at ti...@ev... and then delete t=
he e-mail from your system. If you are not a named addressee you must not=
 use, disclose, distribute, copy, print or rely on this e-mail. To ensure=
 regulatory compliance and for the protection of our clients and business=
, Evolving Systems may monitor and read e-mails sent to and from its serv=
ers. Although Evolving Systems routinely screens for viruses, addressees =
should scan this e-mail and any attachments for viruses. Evolving Systems=
 makes no representation or warranty as to the absence of viruses in this=
 e-mail or any attachments.=20

Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112

RE: [Arsperl-users] Long Line of Data

[Matt.Reinfeldt <Mat...@en...>]

Mitch,

=20

I assume that your ARSPerl script is also doing the HTML tag
definitions, and if that is the case, you can try the following:

=20

When building your table to display your resultes in, set it to a fixed
width:=20

<table
width=3D800><tr><td>Description</td><td>$description</td></tr></table>

Just an idea.  :-)

=20

Matt Reinfeldt
Senior Support Engineer

Entuition Inc.
Phone: 770-849-0413

Cell#: 920.791.0083

Email: mat...@en...
<mailto:mat...@en...>=20

=20

________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Wednesday, January 25, 2006 4:32 PM
To: ARSPerl
Subject: [Arsperl-users] Long Line of Data

=20

I have an ARSPerl script that pulls data from a form and displays it in
an HTML window where it can then be sent to a printer using the Browser
print capability. I have one problem. When the script pulls the
Description field from the record and displays it, it gets displayed as
a very long line. Is there a way to take this value and display it in a
reasonable line length?

Thanks,=20

Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20

[Arsperl-users] Long Line of Data

[Lintner, M. <mit...@ci...>]

I have an ARSPerl script that pulls data from a form and displays it in
an HTML window where it can then be sent to a printer using the Browser
print capability. I have one problem. When the script pulls the
Description field from the record and displays it, it gets displayed as
a very long line. Is there a way to take this value and display it in a
reasonable line length?

Thanks,

Mitch Lintner
Analyst/Programmer
Remedy Developer
Cingular Wireless
1125 E Campbell Rd
Richardson, Texas, 75081
972-907-6965
mit...@sw...

[Arsperl-users] Creating links for Mid-Tier

[Bowman, B. A <Bow...@st...>]

Hello all,

I have changed the name of this thread from "Finding Out a Form's =
Application name"

I have discovered that I do not need to use the app alias when creating =
a link for Mid-Tier.  Here is the link template I use:

http://<MidtierServerName>/arsys/servlet/ViewFormServlet?server=3D<ARSSER=
VERNAME>&formalias=3D<FormAlias>&viewalias=3D<ViewAlias>&eid=3D%22<EntryI=
D>%22

The formAlias can be found with ars_GetSchema.  it is prop "60018".  i =
can get it with this code:

######################
my $schema =3D ars_GetSchema($c,FormName);
foreach (@{$schema->{"objPropList"}}) {
  if ($_->{prop} eq "60018") {
    my $FormWebAlias =3D $_->{"value"};
  }
}
##################################

To get the view alias, we need to know which view to select.  When there =
are multiple views, this could be subjective.  But the method I choose =
to use is to select my prefferred view in the admin tool by making it =
the "Default View" under the "Manage Views" dialogue.

The default viwe will have a prop of 161 with a value of 1.  Ise the =
following tidbit to find that out:

##################
my @VUIList =3D ars_GetListVUI($c,FormName);
my ($VUI,$v,$defaultView);
foreach $v (@VUIList) {
  $VUI =3D ars_GetVUI($c,$RepStruct{$RepID}{"FormName"},$v);
  foreach (@{$VUI->{"props"}}) {
    if ($_->{"prop"} eq "60019") {
      $viewAlias{$v} =3D $_->{"value"};
    }
    if (($_->{"prop"} eq "161") && ($_->{"value"} eq "1")) {
      $defaultView =3D $v;
    }
  }
}
my $DefaultViewAlias =3D $viewAlias{$defaultView};
##################



And viola! I have both the formalias and the viewalias.

Have fun,

Brent

RE: [Arsperl-users] Finding out a forms Application name

[Bowman, B. A <Bow...@st...>]

Thank you very much for that information.  Since I cannot find out the =
application based on the form (potentially multiple values plus having =
the query the applications) I'll have to make a list somewhere instead =
of dynamically retrieving it.

Thank you for sharing,

Brent

-----Original Message-----
From: ars...@ar...
[mailto:ars...@ar...]On Behalf Of Mark Vaughan
Sent: Friday, January 13, 2006 6:55 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Finding out a forms Application name


Brent,
Here is the line my code uses to export an Application container:
  my $def =3D &ars_Export( $ctrl, '', &ARS::AR_VUI_TYPE_NONE,
                         'container', $object );
where $object is the name of the application

The value returned is a multi-line string containing the entire
application definition and is set up with a group of reference blocks.
Here's a piece of the my CustomerAccessInterface app where the primary
form, its view, and one additional form is defined:
reference {
   type           : 32777 (&ARS:: ARREF_APPLICATION_PRIMARY_FORM)
   datatype       : 1
   value          : 0\
   ref-groups     : 0
}
reference {
   type           : 2 (&ARS:: ARREF_SCHEMA)
   datatype       : 0
   object         : SPRT:W_Home_Page (primary form)
}
reference {
   type           : 32778 (&ARS:: ARREF_APPLICATION_FORM_VUI)
   datatype       : 1
   value          : 4\11\CAIUserView\
   ref-groups     : 0
}
reference {
   type           : 32771 (&ARS:: ARREF_APPLICATION_FORMS)
   datatype       : 1
   value          : 0\
   ref-groups     : 0
}
reference {
   type           : 2 (&ARS:: ARREF_SCHEMA)
   datatype       : 0
   object         : SPRT:W_Contact_Profile (additional form, can be
multiple)
}
I checked all of my application def files and 10 of the 12 had a primary
form.  The other two did not.

For more information about the reference type see the ar.h file which
came with your Remedy software.

HTH,
Mark

Mark Vaughan
Programmer III


Direct: +1 303 802 2426
Mobile: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev...
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com

-----Original Message-----
From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Carey Matthew
Black
Sent: Friday, January 13, 2006 3:23 PM
To: ars...@ar...
Subject: Re: [Arsperl-users] Finding out a forms Application name

Brent,

A single ( traditional ) form can be part of multiple ( traditional
)applications.
However, that is not true of "Deployable applications". (But workflow
can cross reference things outside a deployable application too.)


My guess is that this info is only stored in the Application object.
(An ARS Container) Which you can get to via the ars_Export() function
with the right parameters.

HTH.

--
Carey Matthew Black
Remedy Skilled Professional (RSP)
ARS =3D Action Request System(Remedy)

Solution =3D People + Process + Tools
Fast, Accurate, Cheap.... Pick two.
Never ascribe to malice, that which can be explained by incompetence.



On 1/13/06, Bowman, Brent A <Bow...@st...> wrote:
>
> Hello all,
>
> I am searching for a way to find the application of a form
automatically from the database (for mid-tier links).  I searched
through the hashes that ars_GetSchema and ars_GetVUI put out and they
done seems to mention the application.
>
> i also have access to Oracle (which Remedy accesses)  Does anybody
know where the application information (which table) for a form is
stored?
>
> Maybe it is that the table only lists the forms associated with the
application as opposed to the other way around.
>
> Thanks,
>
> Brent



-------------------------------------------------------
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_idv37&alloc_id=16865&op=3Dick
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users
This e-mail and any attachments may be confidential and/or legally =
privileged. If you have received this e-mail and you are not a named =
addressee, please inform Evolving Systems TIS at ti...@ev... and =
then delete the e-mail from your system. If you are not a named =
addressee you must not use, disclose, distribute, copy, print or rely on =
this e-mail. To ensure regulatory compliance and for the protection of =
our clients and business, Evolving Systems may monitor and read e-mails =
sent to and from its servers. Although Evolving Systems routinely =
screens for viruses, addressees should scan this e-mail and any =
attachments for viruses. Evolving Systems makes no representation or =
warranty as to the absence of viruses in this e-mail or any attachments. =


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112



-------------------------------------------------------
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_idv37&alloc_id=16865&op=3Dclick
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users

RE: [Arsperl-users] Finding out a forms Application name

[Mark V. <Mar...@ev...>]

Brent,
Here is the line my code uses to export an Application container:
  my $def =3D &ars_Export( $ctrl, '', &ARS::AR_VUI_TYPE_NONE,
                         'container', $object );
where $object is the name of the application

The value returned is a multi-line string containing the entire
application definition and is set up with a group of reference blocks.
Here's a piece of the my CustomerAccessInterface app where the primary
form, its view, and one additional form is defined:
reference {
   type           : 32777 (&ARS:: ARREF_APPLICATION_PRIMARY_FORM)
   datatype       : 1
   value          : 0\
   ref-groups     : 0
}
reference {
   type           : 2 (&ARS:: ARREF_SCHEMA)
   datatype       : 0
   object         : SPRT:W_Home_Page (primary form)
}
reference {
   type           : 32778 (&ARS:: ARREF_APPLICATION_FORM_VUI)
   datatype       : 1
   value          : 4\11\CAIUserView\
   ref-groups     : 0
}
reference {
   type           : 32771 (&ARS:: ARREF_APPLICATION_FORMS)
   datatype       : 1
   value          : 0\
   ref-groups     : 0
}
reference {
   type           : 2 (&ARS:: ARREF_SCHEMA)
   datatype       : 0
   object         : SPRT:W_Contact_Profile (additional form, can be
multiple)
}
I checked all of my application def files and 10 of the 12 had a primary
form.  The other two did not.

For more information about the reference type see the ar.h file which
came with your Remedy software.

HTH,
Mark

Mark Vaughan
Programmer III


Direct: +1 303 802 2426
Mobile: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev...
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com

-----Original Message-----
From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Carey Matthew
Black
Sent: Friday, January 13, 2006 3:23 PM
To: ars...@ar...
Subject: Re: [Arsperl-users] Finding out a forms Application name

Brent,

A single ( traditional ) form can be part of multiple ( traditional
)applications.
However, that is not true of "Deployable applications". (But workflow
can cross reference things outside a deployable application too.)


My guess is that this info is only stored in the Application object.
(An ARS Container) Which you can get to via the ars_Export() function
with the right parameters.

HTH.

--
Carey Matthew Black
Remedy Skilled Professional (RSP)
ARS =3D Action Request System(Remedy)

Solution =3D People + Process + Tools
Fast, Accurate, Cheap.... Pick two.
Never ascribe to malice, that which can be explained by incompetence.



On 1/13/06, Bowman, Brent A <Bow...@st...> wrote:
>
> Hello all,
>
> I am searching for a way to find the application of a form
automatically from the database (for mid-tier links).  I searched
through the hashes that ars_GetSchema and ars_GetVUI put out and they
done seems to mention the application.
>
> i also have access to Oracle (which Remedy accesses)  Does anybody
know where the application information (which table) for a form is
stored?
>
> Maybe it is that the table only lists the forms associated with the
application as opposed to the other way around.
>
> Thanks,
>
> Brent



-------------------------------------------------------
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_idv37&alloc_id=16865&op=3Dick
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users
This e-mail and any attachments may be confidential and/or legally privil=
eged. If you have received this e-mail and you are not a named addressee,=
 please inform Evolving Systems TIS at ti...@ev... and then delete t=
he e-mail from your system. If you are not a named addressee you must not=
 use, disclose, distribute, copy, print or rely on this e-mail. To ensure=
 regulatory compliance and for the protection of our clients and business=
, Evolving Systems may monitor and read e-mails sent to and from its serv=
ers. Although Evolving Systems routinely screens for viruses, addressees =
should scan this e-mail and any attachments for viruses. Evolving Systems=
 makes no representation or warranty as to the absence of viruses in this=
 e-mail or any attachments.=20

Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112

Re: [Arsperl-users] Finding out a forms Application name

[Carey M. B. <bla...@gm...>]

Brent,

A single ( traditional ) form can be part of multiple ( traditional
)applications.
However, that is not true of "Deployable applications". (But workflow
can cross reference things outside a deployable application too.)


My guess is that this info is only stored in the Application object.
(An ARS Container) Which you can get to via the ars_Export() function
with the right parameters.

HTH.

--
Carey Matthew Black
Remedy Skilled Professional (RSP)
ARS =3D Action Request System(Remedy)

Solution =3D People + Process + Tools
Fast, Accurate, Cheap.... Pick two.
Never ascribe to malice, that which can be explained by incompetence.



On 1/13/06, Bowman, Brent A <Bow...@st...> wrote:
>
> Hello all,
>
> I am searching for a way to find the application of a form automatically =
from the database (for mid-tier links).  I searched through the hashes that=
 ars_GetSchema and ars_GetVUI put out and they done seems to mention the ap=
plication.
>
> i also have access to Oracle (which Remedy accesses)  Does anybody know w=
here the application information (which table) for a form is stored?
>
> Maybe it is that the table only lists the forms associated with the appli=
cation as opposed to the other way around.
>
> Thanks,
>
> Brent

[Arsperl-users] Finding out a forms Application name

[Bowman, B. A <Bow...@st...>]

Hello all,=20

I am searching for a way to find the application of a form automatically =
from the database (for mid-tier links).  I searched through the hashes =
that ars_GetSchema and ars_GetVUI put out and they done seems to mention =
the application.

i also have access to Oracle (which Remedy accesses)  Does anybody know =
where the application information (which table) for a form is stored?

Maybe it is that the table only lists the forms associated with the =
application as opposed to the other way around.

Thanks,

Brent

Re: [Arsperl-users] Problems with make on Solaris/arsPerl/with 6.3 api

[Jeff M. <jcm...@je...>]

On Wed, 2006-01-11 at 10:55 -0600, Eric Roys wrote:
> All, 
> 
> I'm forwarding this along for some assistance for a collegue who is having
> issues with installation of arsperl on a solaris host. Any assistance you
> can offer would be appreciated. The ouput of make is below. 
> 
> 

i'm guessing your perl binary is built with GCC but you are trying to
compile arsperl with SUNs CC. edit the Makefile and remove the offending
option(s) ... e.g. -Wno-unused-variable and then save it and redo the
'make'



> 
> [/var/tmp/ARSperl-1.85]> make cp ARSnt-h.pm blib/lib/ARSnt-h.pm cp ARS.pm
> blib/lib/ARS.pm AutoSplitting blib/lib/ARS.pm (blib/lib/auto/ARS) cp
> artypes.ph blib/lib/artypes.ph cp ARSOOmsgs.pm blib/lib/ARSOOmsgs.pm cp
> ARSnparm.pm blib/lib/ARSnparm.pm cp ARSarerrno-h.pm blib/lib/ARSarerrno-h.pm
> cp ARSar-h.pm blib/lib/ARSar-h.pm cp ARSOOform.pm blib/lib/ARSOOform.pm cp
> ARSnterrno-h.pm blib/lib/ARSnterrno-h.pm cp _h2ph_pre.ph
> blib/lib/_h2ph_pre.ph cp ARSOOsup.pm blib/lib/ARSOOsup.pm /bin/perl
> -I/usr/local/lib/perl5/5.6.1/sun4-solaris
> -I/usr/local/lib/perl5/5.6.1 /usr/local/lib/perl5/5.6.1/ExtUtils/xsubpp
> -typemap /usr/local/lib/perl5/5.6.1/ExtUtils/typemap -typemap typemap ARS.xs
> > ARS.xsc && mv ARS.xsc ARS.c
> gcc -c -I/opt/ARSapi/include -fno-strict-aliasing -I/usr/local/include
> -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O    -DVERSION=\"1.84\"
> -DXS_VERSION=\"1.84\" -fPIC -I/usr/local/lib/perl5/5.6.1/sun4-solaris/CORE
> -g   -Wno-unused-variable -Wuninitialized  -DARS32  -DARS452
> -DPERL_PATCHLEVEL_IS=6 -DPERL_SUBVERSION_IS=1 -DPERL_BASEREV_IS=50 ARS.c
> cc1: Invalid option `-Wno-unused-variable'
> *** Error code 1
> make: Fatal error: Command failed for target `ARS.o'
> root@phxdnt [/var/tmp/ARSperl-1.85]>
> 
> Kind Regards, 
> Eric Roys
> Sr. Software Engineer
> Verizon Business
> Phone: 608-882-0871
> Email:  eri...@mc...
>  
> CONFIDENTIALITY: The information contained in this message and any
> attachment may be proprietary, confidential, and privileged or subject to
> the work product doctrine and thus protected from disclosure. If the reader
> of this message is not the intended recipient, or an employee or agent
> responsible for delivering this message to the intended recipient, you are
> hereby notified that any dissemination, distribution or copying of this
> communication is strictly prohibited. If you have received this
> communication in error, please notify me immediately by replying to this
> message and deleting it and all copies and backups thereof. Thank you.
> 
> 
> 
> 
> ______________________________________________________________________
> This e-mail has been scanned by MCI Managed Email Content Service, using Skeptic technology powered by MessageLabs. For more information on MCI's Managed Email Content Service, visit http://www.mci.com.
> ______________________________________________________________________
> 
> 
> 
> -------------------------------------------------------
> 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

[Arsperl-users] Problems with make on Solaris/arsPerl/with 6.3 api

[Eric R. <eri...@mc...>]

All, 

I'm forwarding this along for some assistance for a collegue who is having
issues with installation of arsperl on a solaris host. Any assistance you
can offer would be appreciated. The ouput of make is below. 



[/var/tmp/ARSperl-1.85]> make cp ARSnt-h.pm blib/lib/ARSnt-h.pm cp ARS.pm
blib/lib/ARS.pm AutoSplitting blib/lib/ARS.pm (blib/lib/auto/ARS) cp
artypes.ph blib/lib/artypes.ph cp ARSOOmsgs.pm blib/lib/ARSOOmsgs.pm cp
ARSnparm.pm blib/lib/ARSnparm.pm cp ARSarerrno-h.pm blib/lib/ARSarerrno-h.pm
cp ARSar-h.pm blib/lib/ARSar-h.pm cp ARSOOform.pm blib/lib/ARSOOform.pm cp
ARSnterrno-h.pm blib/lib/ARSnterrno-h.pm cp _h2ph_pre.ph
blib/lib/_h2ph_pre.ph cp ARSOOsup.pm blib/lib/ARSOOsup.pm /bin/perl
-I/usr/local/lib/perl5/5.6.1/sun4-solaris
-I/usr/local/lib/perl5/5.6.1 /usr/local/lib/perl5/5.6.1/ExtUtils/xsubpp
-typemap /usr/local/lib/perl5/5.6.1/ExtUtils/typemap -typemap typemap ARS.xs
> ARS.xsc && mv ARS.xsc ARS.c
gcc -c -I/opt/ARSapi/include -fno-strict-aliasing -I/usr/local/include
-D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O    -DVERSION=\"1.84\"
-DXS_VERSION=\"1.84\" -fPIC -I/usr/local/lib/perl5/5.6.1/sun4-solaris/CORE
-g   -Wno-unused-variable -Wuninitialized  -DARS32  -DARS452
-DPERL_PATCHLEVEL_IS=6 -DPERL_SUBVERSION_IS=1 -DPERL_BASEREV_IS=50 ARS.c
cc1: Invalid option `-Wno-unused-variable'
*** Error code 1
make: Fatal error: Command failed for target `ARS.o'
root@phxdnt [/var/tmp/ARSperl-1.85]>

Kind Regards, 
Eric Roys
Sr. Software Engineer
Verizon Business
Phone: 608-882-0871
Email:  eri...@mc...
 
CONFIDENTIALITY: The information contained in this message and any
attachment may be proprietary, confidential, and privileged or subject to
the work product doctrine and thus protected from disclosure. If the reader
of this message is not the intended recipient, or an employee or agent
responsible for delivering this message to the intended recipient, you are
hereby notified that any dissemination, distribution or copying of this
communication is strictly prohibited. If you have received this
communication in error, please notify me immediately by replying to this
message and deleting it and all copies and backups thereof. Thank you.




______________________________________________________________________
This e-mail has been scanned by MCI Managed Email Content Service, using Skeptic™ technology powered by MessageLabs. For more information on MCI's Managed Email Content Service, visit http://www.mci.com.
______________________________________________________________________

[Fwd: Re: [Arsperl-users] ars_GetListEntry returns without data]

[Henrik J. <hen...@ti...>]

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

RE: [Arsperl-users] Query Question

[Lintner, M. <mit...@ci...>]

The field that I am pulling the value for can be empty (NULL) or it can
have a value of 0 or a value of 1. In this case, 0 equates to the word
Changed and 1 equates to the words "Don't Change". I just needed to be
able to write a Perl script to distinguish between the three values.
=20
I found a solution.
=20
foreach $entry_id (sort keys %entries) {
   %vals=3Dars_GetEntry($ctrl,$schema,$entry_id);
   if (($vals{$fields{'PW'}}) ne "") {
     $f =3D ars_GetField($ctrl, $schema, $fields{"PW"});
     $PW =3D $f->{limit}{enumLimits}{regularList}[$vals{$fields{'PW'}}];
   }
   if (defined $PW) {
     <do something>
   } else {
      <do something else>
   }
}=20
=20
Mitch
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20

________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Tuesday, January 10, 2006 10:04 AM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question


Mitch,
I seem to be misunderstanding something.  What is NULL as you are using
it.  Is it a string of zero length?
=20
This would make sense according to your example.  If this is the case
then determine whether the string has no characters:
if( $PW eq '' ) {  # two single quotes; the 'eq' is used in Perl for
string comparisons; don't use '=3D=3D'
=20
HTH,
Mark
=20
Thanks,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 3:18 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
=20
I think I have some understanding of what is going on but I think I
define $PW when I do this
=20
$PW =3D "$vals{$fields{'PW'}}";
=20
This brings back a NULL or a 0 or a 1 form the form I'm querying. If I
understand what is going on this defines the variable and leaves me with
no way to tell the difference between NULL and 0.
=20
Mitch
=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20
=20
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Monday, January 09, 2006 4:10 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
Mitch,
Since ARSPerl returns an undefined value for NULL,
if( !defined( $PW )) {
=20
Try something like this:
=20
if( !defined( $PW )) {       # no radio element is selected
  print "No element selected\n";
} else {                          # an element is selected
  print "Element $PW is selected\n";
}
=20
HTH,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:35 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
=20
Is there any way in Perl to distinguish a difference between a value of
Null and a value of 0 (zero)?
=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20
=20
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Monday, January 09, 2006 3:30 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
Perl is assuming, since you are using the '=3D=3D' that it is a =
numerical
value.
=20
From Programming Perl,  2nd Edition, page 21:
1.                   Any string is true except for "" and "0".
2.                   Any number is true expect for 0.
3.                   Any reference is true.
4.                   Any undefined value is false.
=20
So if we define our terms based upon Perl's version of true and false we
get:
if( $PW is false ) {
  print "Change PW\n";
} else {
  Print "Can't Change PW\n";
}
=20
From Perl rules above, both 0 (value) and NULL (string?) or <undefined>
would execute the 'if' block.  Anything else would execute the 'else'
block.
=20
THT,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:05 PM
To: ARSPerl
Subject: [Arsperl-users] Query Question
=20
I have a ARSPerl script that I am working with. I am trying to build a
condition off of the value of a Radio button field on a form. I want to
do something if the field in NULL. The field has a 0 and a 1 value.
I am having trouble. It seems that ARSPerl is assuming 0 to be the same
as NULL. Is this true or am I building me script incorrectly? He is the
condition I am using:
 if ($PW =3D=3D "") {=20
        print "Change PW\n"=20
      } else {=20
         print "Can't Change PW.\n"=20
      }=20
I $PW is NULL or 0, I get the first response. If $PW is 1, I get the
second.=20
Thanks,=20
Mitch=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20

RE: [Arsperl-users] ars_GetListEntry returns without data

[Mark V. <Mar...@ev...>]

Henrik,
The current documentation lists the following parameters:
ars_GetListEntry(ctrl, schema, qualifier, maxRetrieve=3D0, firstRetrieve=3D=
0,...)

Note that the fifth parameter is a number pointing to the first record to=
 retrieve (for windowing purposes).  You are passing a pointer to a list,=
 an address.  This address is simply a value and is being used as the off=
set into the list of records to be returned.  Try changing the fifth para=
meter to a zero.

HTH,
Mark

Mark Vaughan

Programmer III

=20

Direct: +1 303 802 2426

Cell: +1 303 601 4434

Fax: +1 303 802 1420

mar...@ev...

Evolving Systems, Inc.=20

9777 Pyramid Court, Suite 100, Englewood, CO USA 80112

www.evolving.com

-----Original Message-----
From: ars...@ar... [mailto:arsperl-users-admin@arsperl=
=2Eorg] On Behalf Of Henrik Johansson
Sent: Tuesday, January 10, 2006 7:57 AM
To: ARSperl-users
Subject: [Arsperl-users] ars_GetListEntry returns without data


We are moving and upgrading our AR-server from 4.5.2 on Solaris 8 to=20
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=20
AR-server.

An extract from the code:
$ctrl =3D ars_Login($ars_server, $arsusername, $password);
=2E.
$qual =3D ars_LoadQualifier($ctrl, $schema, "(1 =3D 1)");
if (! defined($qual)) {
    &ERROR("read_ars_users: Error in usage of ars_LoadQualifier, ARS=20
message: $ars_errstr.");
}
# Retrieve all of the entry-id's for the schema.
%entries =3D ars_GetListEntry($ctrl, $schema, $qual, 0, []);
if (scalar %entries eq 0) {
    &ERROR("read_ars_users: No entries from ars_GetListEntry, ARS=20
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=20
problem.
Result    Tested functions
OK        ars_Login($ars_server, $arsusername, $password);
OK        ars_GetFieldByName($ctrl, $schema, $fids{$fid});
OK        ars_LoadQualifier($ctrl, $schema, "(1 =3D 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=20=

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=3D1137346846 PROG=3D390620 (?)=20=

VERS=3D11 PROC=3D5
  2   0.06305 server -> client RPC R (#1) XID=3D1137346846 Success
  3   0.09627 client -> server TCP D=3D1079 S=3D32944 Ack=3D576013281=20
Seq=3D3189697003 Len=3D0 W

Here is the snoop-log, between a client and the old server (317 packets):=

  1   0.00000 client -> oldserver RPC C XID=3D1136777578 PROG=3D390620 (?=
)=20
VERS=3D7 PROC=3D5
  2   0.09138 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135=20=

Seq=3D3569712132 Len=3D0 Win=3D33580
  3   0.59374 oldserver -> client RPC R (#1) XID=3D1136777578 Success
  4   0.00012 oldserver -> client TCP D=3D50958 S=3D1010 Push Ack=3D57462=
8135=20
Seq=3D3569713592 Len=3D1460 Win=3D33580
  5   0.00011 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135=20=

Seq=3D3569715052 Len=3D1460 Win=3D33580
  6   0.00012 oldserver -> client TCP D=3D50958 S=3D1010 Push Ack=3D57462=
8135=20
Seq=3D3569716512 Len=3D1460 Win=3D33580
  7   0.09454 client -> oldserver TCP D=3D1010 S=3D50958 Ack=3D3569717972=
=20
Seq=3D574628135 Len=3D0 Win=3D33580
  8   0.00650 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135=20=

Seq=3D3569717972 Len=3D1460 Win=3D33580
  9   0.00013 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135=20=

Seq=3D3569719432 Len=3D1460 Win=3D33580
 10   0.00002 client -> oldserver TCP D=3D1010 S=3D50958 Ack=3D3569720892=
=20
Seq=3D574628135 Len=3D0 Win=3D33580
 11   0.00004 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135=20=

Seq=3D3569720892 Len=3D240 Win=3D33580
 12   0.00006 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135=20=

Seq=3D3569721132 Len=3D1460 Win=3D33580
 13   0.00023 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135=20=

Seq=3D3569722592 Len=3D1460 Win=3D33580
 14   0.00001 client -> oldserver TCP D=3D1010 S=3D50958 Ack=3D3569724052=
=20
Seq=3D574628135 Len=3D0 Win=3D33580
 15   0.00101 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135=20=

Seq=3D3569724052 Len=3D1460 Win=3D33580

Thanks in advance for solutions or suggestions
Henrik=20
_________________________________________________________________________=
________
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=E4nd 11, Box 50006, S-973 21  Lule=E5, Sweden	| Mobile: +46=
 70 555 9998



-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log fi=
les
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=3D7637&alloc_id=3D16865&op=3Dclick
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users
This e-mail and any attachments may be confidential and/or legally privil=
eged. If you have received this e-mail and you are not a named addressee,=
 please inform Evolving Systems TIS at ti...@ev... and then delete t=
he e-mail from your system. If you are not a named addressee you must not=
 use, disclose, distribute, copy, print or rely on this e-mail. To ensure=
 regulatory compliance and for the protection of our clients and business=
, Evolving Systems may monitor and read e-mails sent to and from its serv=
ers. Although Evolving Systems routinely screens for viruses, addressees =
should scan this e-mail and any attachments for viruses. Evolving Systems=
 makes no representation or warranty as to the absence of viruses in this=
 e-mail or any attachments.=20

Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112

RE: [Arsperl-users] Query Question

[Mark V. <Mar...@ev...>]

Mitch,
I seem to be misunderstanding something.  What is NULL as you are using
it.  Is it a string of zero length?
=20
This would make sense according to your example.  If this is the case
then determine whether the string has no characters:
if( $PW eq '' ) {  # two single quotes; the 'eq' is used in Perl for
string comparisons; don't use '=3D=3D'
=20
HTH,
Mark
=20
Thanks,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 3:18 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
=20
I think I have some understanding of what is going on but I think I
define $PW when I do this
=20
$PW =3D "$vals{$fields{'PW'}}";
=20
This brings back a NULL or a 0 or a 1 form the form I'm querying. If I
understand what is going on this defines the variable and leaves me with
no way to tell the difference between NULL and 0.
=20
Mitch
=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20
=20
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Monday, January 09, 2006 4:10 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
Mitch,
Since ARSPerl returns an undefined value for NULL,
if( !defined( $PW )) {
=20
Try something like this:
=20
if( !defined( $PW )) {       # no radio element is selected
  print "No element selected\n";
} else {                          # an element is selected
  print "Element $PW is selected\n";
}
=20
HTH,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:35 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
=20
Is there any way in Perl to distinguish a difference between a value of
Null and a value of 0 (zero)?
=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20
=20
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Monday, January 09, 2006 3:30 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
Perl is assuming, since you are using the '=3D=3D' that it is a numerical=

value.
=20
From Programming Perl,  2nd Edition, page 21:
1.                   Any string is true except for "" and "0".
2.                   Any number is true expect for 0.
3.                   Any reference is true.
4.                   Any undefined value is false.
=20
So if we define our terms based upon Perl's version of true and false we
get:
if( $PW is false ) {
  print "Change PW\n";
} else {
  Print "Can't Change PW\n";
}
=20
From Perl rules above, both 0 (value) and NULL (string?) or <undefined>
would execute the 'if' block.  Anything else would execute the 'else'
block.
=20
THT,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:05 PM
To: ARSPerl
Subject: [Arsperl-users] Query Question
=20
I have a ARSPerl script that I am working with. I am trying to build a
condition off of the value of a Radio button field on a form. I want to
do something if the field in NULL. The field has a 0 and a 1 value.
I am having trouble. It seems that ARSPerl is assuming 0 to be the same
as NULL. Is this true or am I building me script incorrectly? He is the
condition I am using:
 if ($PW =3D=3D "") {=20
        print "Change PW\n"=20
      } else {=20
         print "Can't Change PW.\n"=20
      }=20
I $PW is NULL or 0, I get the first response. If $PW is 1, I get the
second.=20
Thanks,=20
Mitch=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20
This e-mail and any attachments may be confidential and/or legally privil=
eged. If you have received this e-mail and you are not a named addressee,=
 please inform Evolving Systems TIS at ti...@ev... and then delete t=
he e-mail from your system. If you are not a named addressee you must not=
 use, disclose, distribute, copy, print or rely on this e-mail. To ensure=
 regulatory compliance and for the protection of our clients and business=
, Evolving Systems may monitor and read e-mails sent to and from its serv=
ers. Although Evolving Systems routinely screens for viruses, addressees =
should scan this e-mail and any attachments for viruses. Evolving Systems=
 makes no representation or warranty as to the absence of viruses in this=
 e-mail or any attachments.=20

Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112

Re: [Arsperl-users] ars_GetListEntry returns without data

[Jeff M. <jcm...@je...>]

> %entries = ars_GetListEntry($ctrl, $schema, $qual, 0, []);

try


%entries = ars_GetListEntry($ctrl, $schema, $qual, 0, 0, []);

RE: [Arsperl-users] ars_GetListEntry returns without data

[Heider, S. <sh...@pb...>]

Henrik,=20

There were many problems with ARS 6.3 Patch 13.  You may want to =
consider installing Patch 14.

Stephen


-----Original Message-----
From: ars...@ar... =
[mailto:ars...@ar...] On Behalf Of Henrik Johansson
Sent: Tuesday, January 10, 2006 9:57 AM
To: ARSperl-users
Subject: [Arsperl-users] ars_GetListEntry returns without data


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 =3D ars_Login($ars_server, $arsusername, $password); ..
$qual =3D ars_LoadQualifier($ctrl, $schema, "(1 =3D 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 =3D 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 =3D 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=3D1137346846 PROG=3D390620 (?)=20
VERS=3D11 PROC=3D5
  2   0.06305 server -> client RPC R (#1) XID=3D1137346846 Success
  3   0.09627 client -> server TCP D=3D1079 S=3D32944 Ack=3D576013281=20
Seq=3D3189697003 Len=3D0 W

Here is the snoop-log, between a client and the old server (317 =
packets):
  1   0.00000 client -> oldserver RPC C XID=3D1136777578 PROG=3D390620 =
(?)=20
VERS=3D7 PROC=3D5
  2   0.09138 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135 =

Seq=3D3569712132 Len=3D0 Win=3D33580
  3   0.59374 oldserver -> client RPC R (#1) XID=3D1136777578 Success
  4   0.00012 oldserver -> client TCP D=3D50958 S=3D1010 Push =
Ack=3D574628135=20
Seq=3D3569713592 Len=3D60 Win=3D33580
  5   0.00011 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135 =

Seq=3D3569715052 Len=3D1460 Win=3D33580
  6   0.00012 oldserver -> client TCP D=3D50958 S=3D1010 Push =
Ack=3D574628135=20
Seq=3D3569716512 Len=3D1460 Win=3D33580
  7   0.09454 client -> oldserver TCP D=3D1010 S=3D50958 =
Ack=3D3569717972=20
Seq=3D574628135 Len=3D0 Win=3D33580
  8   0.00650 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135 =

Seq=3D3569717972 Len=3D1460 Win=3D33580
  9   0.00013 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135 =

Seq=3D3569719432 Len=3D1460 Win=3D33580
 10   0.00002 client -> oldserver TCP D=3D1010 S=3D50958 =
Ack=3D3569720892=20
Seq=3D574628135 Len=3D0 Win=3D33580
 11   0.00004 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135 =

Seq=3D3569720892 Len=3D240 Win=3D33580
 12   0.00006 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135 =

Seq=3D3569721132 Len=3D1460 Win=3D33580
 13   0.00023 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135 =

Seq=3D3569722592 Len=3D1460 Win=3D33580
 14   0.00001 client -> oldserver TCP D=3D1010 S=3D50958 =
Ack=3D3569724052=20
Seq=3D574628135 Len=3D0 Win=3D33580
 15   0.00101 oldserver -> client TCP D=3D50958 S=3D1010 Ack=3D574628135 =

Seq=3D3569724052 Len=3D1460 Win=3D33580

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=E4nd 11, Box 50006, S-973 21  Lule=E5, 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=3D7637&alloc_id=3D16865&op=3Dclick
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users

[Arsperl-users] ars_GetListEntry returns without data

[Henrik J. <hen...@ti...>]

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

RE: [Arsperl-users] Query Question

[Lintner, M. <mit...@ci...>]

I think I have some understanding of what is going on but I think I
define $PW when I do this
=20
$PW =3D "$vals{$fields{'PW'}}";
=20
This brings back a NULL or a 0 or a 1 form the form I'm querying. If I
understand what is going on this defines the variable and leaves me with
no way to tell the difference between NULL and 0.
=20
Mitch
=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20

________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Monday, January 09, 2006 4:10 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question


Mitch,
Since ARSPerl returns an undefined value for NULL,
if( !defined( $PW )) {
=20
Try something like this:
=20
if( !defined( $PW )) {       # no radio element is selected
  print "No element selected\n";
} else {                          # an element is selected
  print "Element $PW is selected\n";
}
=20
HTH,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:35 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
=20
Is there any way in Perl to distinguish a difference between a value of
Null and a value of 0 (zero)?
=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20
=20
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Monday, January 09, 2006 3:30 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
Perl is assuming, since you are using the '=3D=3D' that it is a =
numerical
value.
=20
From Programming Perl,  2nd Edition, page 21:
1.                   Any string is true except for "" and "0".
2.                   Any number is true expect for 0.
3.                   Any reference is true.
4.                   Any undefined value is false.
=20
So if we define our terms based upon Perl's version of true and false we
get:
if( $PW is false ) {
  print "Change PW\n";
} else {
  Print "Can't Change PW\n";
}
=20
From Perl rules above, both 0 (value) and NULL (string?) or <undefined>
would execute the 'if' block.  Anything else would execute the 'else'
block.
=20
THT,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:05 PM
To: ARSPerl
Subject: [Arsperl-users] Query Question
=20
I have a ARSPerl script that I am working with. I am trying to build a
condition off of the value of a Radio button field on a form. I want to
do something if the field in NULL. The field has a 0 and a 1 value.
I am having trouble. It seems that ARSPerl is assuming 0 to be the same
as NULL. Is this true or am I building me script incorrectly? He is the
condition I am using:
 if ($PW =3D=3D "") {=20
        print "Change PW\n"=20
      } else {=20
         print "Can't Change PW.\n"=20
      }=20
I $PW is NULL or 0, I get the first response. If $PW is 1, I get the
second.=20
Thanks,=20
Mitch=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20

RE: [Arsperl-users] Query Question

[Lintner, M. <mit...@ci...>]

Got it! I did this
=20
=20
 %vals=3Dars_GetEntry($ctrl,$schema,$entry_id);
      if (($vals{$fields{'PW'}}) ne "") {
        $f =3D ars_GetField($ctrl, $schema, $fields{"PW"});
        $PW =3D
$f->{limit}{enumLimits}{regularList}[$vals{$fields{'PW'}}];
      }
      if (defined $PW) {
        print "Can't Change PW. PW is $PW\n";
      } else {
        print "Change PW.\n";
      }

=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20

________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Monday, January 09, 2006 4:10 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question


Mitch,
Since ARSPerl returns an undefined value for NULL,
if( !defined( $PW )) {
=20
Try something like this:
=20
if( !defined( $PW )) {       # no radio element is selected
  print "No element selected\n";
} else {                          # an element is selected
  print "Element $PW is selected\n";
}
=20
HTH,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:35 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
=20
Is there any way in Perl to distinguish a difference between a value of
Null and a value of 0 (zero)?
=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20
=20
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Monday, January 09, 2006 3:30 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
Perl is assuming, since you are using the '=3D=3D' that it is a =
numerical
value.
=20
From Programming Perl,  2nd Edition, page 21:
1.                   Any string is true except for "" and "0".
2.                   Any number is true expect for 0.
3.                   Any reference is true.
4.                   Any undefined value is false.
=20
So if we define our terms based upon Perl's version of true and false we
get:
if( $PW is false ) {
  print "Change PW\n";
} else {
  Print "Can't Change PW\n";
}
=20
From Perl rules above, both 0 (value) and NULL (string?) or <undefined>
would execute the 'if' block.  Anything else would execute the 'else'
block.
=20
THT,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:05 PM
To: ARSPerl
Subject: [Arsperl-users] Query Question
=20
I have a ARSPerl script that I am working with. I am trying to build a
condition off of the value of a Radio button field on a form. I want to
do something if the field in NULL. The field has a 0 and a 1 value.
I am having trouble. It seems that ARSPerl is assuming 0 to be the same
as NULL. Is this true or am I building me script incorrectly? He is the
condition I am using:
 if ($PW =3D=3D "") {=20
        print "Change PW\n"=20
      } else {=20
         print "Can't Change PW.\n"=20
      }=20
I $PW is NULL or 0, I get the first response. If $PW is 1, I get the
second.=20
Thanks,=20
Mitch=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20

RE: [Arsperl-users] Query Question

[Mark V. <Mar...@ev...>]

Mitch,
Since ARSPerl returns an undefined value for NULL,
if( !defined( $PW )) {
=20
Try something like this:
=20
if( !defined( $PW )) {       # no radio element is selected
  print "No element selected\n";
} else {                          # an element is selected
  print "Element $PW is selected\n";
}
=20
HTH,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:35 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
=20
Is there any way in Perl to distinguish a difference between a value of
Null and a value of 0 (zero)?
=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20
=20
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Monday, January 09, 2006 3:30 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question
Perl is assuming, since you are using the '=3D=3D' that it is a numerical=

value.
=20
From Programming Perl,  2nd Edition, page 21:
1.                   Any string is true except for "" and "0".
2.                   Any number is true expect for 0.
3.                   Any reference is true.
4.                   Any undefined value is false.
=20
So if we define our terms based upon Perl's version of true and false we
get:
if( $PW is false ) {
  print "Change PW\n";
} else {
  Print "Can't Change PW\n";
}
=20
From Perl rules above, both 0 (value) and NULL (string?) or <undefined>
would execute the 'if' block.  Anything else would execute the 'else'
block.
=20
THT,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:05 PM
To: ARSPerl
Subject: [Arsperl-users] Query Question
=20
I have a ARSPerl script that I am working with. I am trying to build a
condition off of the value of a Radio button field on a form. I want to
do something if the field in NULL. The field has a 0 and a 1 value.
I am having trouble. It seems that ARSPerl is assuming 0 to be the same
as NULL. Is this true or am I building me script incorrectly? He is the
condition I am using:
 if ($PW =3D=3D "") {=20
        print "Change PW\n"=20
      } else {=20
         print "Can't Change PW.\n"=20
      }=20
I $PW is NULL or 0, I get the first response. If $PW is 1, I get the
second.=20
Thanks,=20
Mitch=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20
This e-mail and any attachments may be confidential and/or legally privil=
eged. If you have received this e-mail and you are not a named addressee,=
 please inform Evolving Systems TIS at ti...@ev... and then delete t=
he e-mail from your system. If you are not a named addressee you must not=
 use, disclose, distribute, copy, print or rely on this e-mail. To ensure=
 regulatory compliance and for the protection of our clients and business=
, Evolving Systems may monitor and read e-mails sent to and from its serv=
ers. Although Evolving Systems routinely screens for viruses, addressees =
should scan this e-mail and any attachments for viruses. Evolving Systems=
 makes no representation or warranty as to the absence of viruses in this=
 e-mail or any attachments.=20

Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112

RE: [Arsperl-users] Query Question

[Lintner, M. <mit...@ci...>]

Is there any way in Perl to distinguish a difference between a value of
Null and a value of 0 (zero)?
=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
=20

________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Mark Vaughan
Sent: Monday, January 09, 2006 3:30 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] Query Question


Perl is assuming, since you are using the '=3D=3D' that it is a =
numerical
value.
=20
From Programming Perl,  2nd Edition, page 21:
1.                   Any string is true except for "" and "0".
2.                   Any number is true expect for 0.
3.                   Any reference is true.
4.                   Any undefined value is false.
=20
So if we define our terms based upon Perl's version of true and false we
get:
if( $PW is false ) {
  print "Change PW\n";
} else {
  Print "Can't Change PW\n";
}
=20
From Perl rules above, both 0 (value) and NULL (string?) or <undefined>
would execute the 'if' block.  Anything else would execute the 'else'
block.
=20
THT,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:05 PM
To: ARSPerl
Subject: [Arsperl-users] Query Question
=20
I have a ARSPerl script that I am working with. I am trying to build a
condition off of the value of a Radio button field on a form. I want to
do something if the field in NULL. The field has a 0 and a 1 value.
I am having trouble. It seems that ARSPerl is assuming 0 to be the same
as NULL. Is this true or am I building me script incorrectly? He is the
condition I am using:
 if ($PW =3D=3D "") {=20
        print "Change PW\n"=20
      } else {=20
         print "Can't Change PW.\n"=20
      }=20
I $PW is NULL or 0, I get the first response. If $PW is 1, I get the
second.=20
Thanks,=20
Mitch=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
This e-mail and any attachments may be confidential and/or legally
privileged. If you have received this e-mail and you are not a named
addressee, please inform Evolving Systems TIS at ti...@ev... and
then delete the e-mail from your system. If you are not a named
addressee you must not use, disclose, distribute, copy, print or rely on
this e-mail. To ensure regulatory compliance and for the protection of
our clients and business, Evolving Systems may monitor and read e-mails
sent to and from its servers. Although Evolving Systems routinely
screens for viruses, addressees should scan this e-mail and any
attachments for viruses. Evolving Systems makes no representation or
warranty as to the absence of viruses in this e-mail or any attachments.


Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112=20

RE: [Arsperl-users] Query Question

[Mark V. <Mar...@ev...>]

Perl is assuming, since you are using the '=3D=3D' that it is a numerical=

value.
=20
From Programming Perl,  2nd Edition, page 21:
1.                   Any string is true except for "" and "0".
2.                   Any number is true expect for 0.
3.                   Any reference is true.
4.                   Any undefined value is false.
=20
So if we define our terms based upon Perl's version of true and false we
get:
if( $PW is false ) {
  print "Change PW\n";
} else {
  Print "Can't Change PW\n";
}
=20
From Perl rules above, both 0 (value) and NULL (string?) or <undefined>
would execute the 'if' block.  Anything else would execute the 'else'
block.
=20
THT,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
________________________________

From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Lintner, Mitchell
Sent: Monday, January 09, 2006 2:05 PM
To: ARSPerl
Subject: [Arsperl-users] Query Question
=20
I have a ARSPerl script that I am working with. I am trying to build a
condition off of the value of a Radio button field on a form. I want to
do something if the field in NULL. The field has a 0 and a 1 value.
I am having trouble. It seems that ARSPerl is assuming 0 to be the same
as NULL. Is this true or am I building me script incorrectly? He is the
condition I am using:
 if ($PW =3D=3D "") {=20
        print "Change PW\n"=20
      } else {=20
         print "Can't Change PW.\n"=20
      }=20
I $PW is NULL or 0, I get the first response. If $PW is 1, I get the
second.=20
Thanks,=20
Mitch=20
Mitch Lintner=20
Analyst/Programmer=20
Remedy Developer=20
Cingular Wireless=20
1125 E Campbell Rd=20
Richardson, Texas, 75081=20
972-907-6965=20
mit...@sw...=20
This e-mail and any attachments may be confidential and/or legally privil=
eged. If you have received this e-mail and you are not a named addressee,=
 please inform Evolving Systems TIS at ti...@ev... and then delete t=
he e-mail from your system. If you are not a named addressee you must not=
 use, disclose, distribute, copy, print or rely on this e-mail. To ensure=
 regulatory compliance and for the protection of our clients and business=
, Evolving Systems may monitor and read e-mails sent to and from its serv=
ers. Although Evolving Systems routinely screens for viruses, addressees =
should scan this e-mail and any attachments for viruses. Evolving Systems=
 makes no representation or warranty as to the absence of viruses in this=
 e-mail or any attachments.=20

Registered Office: 9777 Pyramid Ct Suite 100, Englewood, CO 80112

Re: [Arsperl-users] Query Question

[Jeff M. <jcm...@je...>]

On Mon, 2006-01-09 at 16:05 -0500, Lintner, Mitchell wrote:
> I have a ARSPerl script that I am working with. I am trying to build a
> condition off of the value of a Radio button field on a form. I want
> to do something if the field in NULL. The field has a 0 and a 1 value.
> 
> I am having trouble. It seems that ARSPerl is assuming 0 to be the
> same as NULL. Is this true or am I building me script incorrectly? He
> is the condition I am using:
> 

print "<$PW>\n"; 

and see what that yields. it should be undef for NULL, 0 or 1.


>  if ($PW == "") { 
>         print "Change PW\n" 
>       } else { 
>          print "Can't Change PW.\n" 
>       }
> 
> I $PW is NULL or 0, I get the first response. If $PW is 1, I get the
> second.
> 
> Thanks,
> 
> Mitch
> 
> Mitch Lintner 
> Analyst/Programmer 
> Remedy Developer 
> Cingular Wireless 
> 1125 E Campbell Rd 
> Richardson, Texas, 75081 
> 972-907-6965 
> mit...@sw...

[Arsperl-users] Query Question

[Lintner, M. <mit...@ci...>]

I have a ARSPerl script that I am working with. I am trying to build a
condition off of the value of a Radio button field on a form. I want to
do something if the field in NULL. The field has a 0 and a 1 value.

I am having trouble. It seems that ARSPerl is assuming 0 to be the same
as NULL. Is this true or am I building me script incorrectly? He is the
condition I am using:

 if ($PW =3D=3D "") {
        print "Change PW\n"
      } else {
         print "Can't Change PW.\n"
      }

I $PW is NULL or 0, I get the first response. If $PW is 1, I get the
second.

Thanks,

Mitch

Mitch Lintner
Analyst/Programmer
Remedy Developer
Cingular Wireless
1125 E Campbell Rd
Richardson, Texas, 75081
972-907-6965
mit...@sw...