arsperl-users Mailing List for ARSperl (Page 54)
Brought to you by:
jeffmurphy
Menu
▾
▴
arsperl-users — Discussions regarding the use of ARSperl
You can subscribe to this list here.
| 1996 |
Jan
(6) |
Feb
(7) |
Mar
(16) |
Apr
(5) |
May
(21) |
Jun
(5) |
Jul
(5) |
Aug
(13) |
Sep
(4) |
Oct
(12) |
Nov
(7) |
Dec
(24) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 1997 |
Jan
(38) |
Feb
(65) |
Mar
(32) |
Apr
(37) |
May
(47) |
Jun
(45) |
Jul
(28) |
Aug
(38) |
Sep
(41) |
Oct
(81) |
Nov
(21) |
Dec
(45) |
| 1998 |
Jan
(18) |
Feb
(26) |
Mar
(44) |
Apr
(34) |
May
(36) |
Jun
(44) |
Jul
(31) |
Aug
(34) |
Sep
(56) |
Oct
(40) |
Nov
(20) |
Dec
(25) |
| 1999 |
Jan
(49) |
Feb
(50) |
Mar
(33) |
Apr
(51) |
May
(54) |
Jun
(43) |
Jul
(91) |
Aug
(34) |
Sep
(120) |
Oct
(102) |
Nov
(101) |
Dec
(25) |
| 2000 |
Jan
(55) |
Feb
(105) |
Mar
(44) |
Apr
(89) |
May
(123) |
Jun
(51) |
Jul
(98) |
Aug
(120) |
Sep
(101) |
Oct
(77) |
Nov
(58) |
Dec
(39) |
| 2001 |
Jan
(36) |
Feb
(50) |
Mar
(57) |
Apr
(62) |
May
(81) |
Jun
(55) |
Jul
(46) |
Aug
(51) |
Sep
(37) |
Oct
(60) |
Nov
(38) |
Dec
(41) |
| 2002 |
Jan
(70) |
Feb
(41) |
Mar
(49) |
Apr
(55) |
May
(93) |
Jun
(48) |
Jul
(88) |
Aug
(52) |
Sep
(92) |
Oct
(63) |
Nov
(37) |
Dec
(63) |
| 2003 |
Jan
(62) |
Feb
(78) |
Mar
(101) |
Apr
(90) |
May
(104) |
Jun
(31) |
Jul
(29) |
Aug
(66) |
Sep
(50) |
Oct
(114) |
Nov
(111) |
Dec
(49) |
| 2004 |
Jan
(19) |
Feb
(68) |
Mar
(59) |
Apr
(30) |
May
(54) |
Jun
(33) |
Jul
(115) |
Aug
(69) |
Sep
(33) |
Oct
(80) |
Nov
(25) |
Dec
(47) |
| 2005 |
Jan
(34) |
Feb
(26) |
Mar
(28) |
Apr
(57) |
May
(53) |
Jun
(59) |
Jul
(42) |
Aug
(25) |
Sep
(26) |
Oct
(33) |
Nov
(20) |
Dec
(2) |
| 2006 |
Jan
(35) |
Feb
(15) |
Mar
(14) |
Apr
(7) |
May
(22) |
Jun
(22) |
Jul
(22) |
Aug
(3) |
Sep
(7) |
Oct
(20) |
Nov
(25) |
Dec
(8) |
| 2007 |
Jan
(44) |
Feb
(26) |
Mar
(24) |
Apr
(34) |
May
(23) |
Jun
(61) |
Jul
(18) |
Aug
(39) |
Sep
(28) |
Oct
(31) |
Nov
(31) |
Dec
(23) |
| 2008 |
Jan
(18) |
Feb
(5) |
Mar
(18) |
Apr
(15) |
May
(17) |
Jun
(18) |
Jul
(13) |
Aug
(10) |
Sep
(71) |
Oct
(25) |
Nov
(5) |
Dec
(14) |
| 2009 |
Jan
(3) |
Feb
(6) |
Mar
(19) |
Apr
(5) |
May
(2) |
Jun
(5) |
Jul
(23) |
Aug
|
Sep
|
Oct
(2) |
Nov
(15) |
Dec
(7) |
| 2010 |
Jan
(5) |
Feb
(6) |
Mar
|
Apr
|
May
(10) |
Jun
|
Jul
(9) |
Aug
(6) |
Sep
|
Oct
|
Nov
(1) |
Dec
(1) |
| 2011 |
Jan
(16) |
Feb
(24) |
Mar
(6) |
Apr
|
May
|
Jun
|
Jul
(6) |
Aug
(4) |
Sep
(1) |
Oct
|
Nov
(13) |
Dec
|
| 2012 |
Jan
(17) |
Feb
(14) |
Mar
(14) |
Apr
(3) |
May
(5) |
Jun
(1) |
Jul
(9) |
Aug
(1) |
Sep
(7) |
Oct
(14) |
Nov
(4) |
Dec
(4) |
| 2013 |
Jan
(1) |
Feb
(12) |
Mar
(7) |
Apr
(5) |
May
|
Jun
|
Jul
(1) |
Aug
(21) |
Sep
(5) |
Oct
(5) |
Nov
|
Dec
(4) |
| 2014 |
Jan
(1) |
Feb
(1) |
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
(3) |
Nov
|
Dec
|
| 2015 |
Jan
|
Feb
(1) |
Mar
|
Apr
|
May
(27) |
Jun
|
Jul
(8) |
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2016 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
(1) |
Nov
(1) |
Dec
(4) |
| 2021 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
(4) |
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
|
From: Steve M. <ste...@ch...> - 2005-06-09 20:30:03
|
Does the script user(remedy install user) have permissions to create files
in the specified location?
-----Original Message-----
From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Amen Asemota
Sent: Thursday, June 09, 2005 1:21 PM
To: ars...@ar...
Subject: RE: [Arsperl-users] REmedy problem
Yes it does. I do have another problem though. It is supposed to be creating
a text file also but it's not doing that. It just sets the field and that's
it.
Thanks.
Amen.
>From: "PC Wai" <PC...@TE...>
>Reply-To: ars...@ar...
>To: <ars...@ar...>
>Subject: RE: [Arsperl-users] REmedy problem
>Date: Thu, 9 Jun 2005 09:03:33 -0700
>
>Hi Amen,
>
>Just a wild guess. Does your Remedy owner have execution permission to the
>script and the modules?
>
>Regards
>PC
>
>-----Original Message-----
>From: ars...@ar...
>[mailto:ars...@ar...] On Behalf Of Amen Asemota
>Sent: Thursday, June 09, 2005 08:53
>To: ars...@ar...
>Subject: RE: [Arsperl-users] REmedy problem
>
>
>Yes it does it prints out the word "Sent" and it also creates a txt file
>which we also need.
>
>Amen.
> >From: Steve McDonald <ste...@ch...>
> >Reply-To: ars...@ar...
> >To: ars...@ar...
> >Subject: RE: [Arsperl-users] REmedy problem
> >Date: Thu, 09 Jun 2005 08:20:22 -0700
> >
> >Does this script work from the command line?
> >
> >-----Original Message-----
> >From: ars...@ar...
> >[mailto:ars...@ar...] On Behalf Of Amen Asemota
> >Sent: Thursday, June 09, 2005 6:42 AM
> >To: ars...@ar...
> >Subject: Re: [Arsperl-users] REmedy problem
> >
> >Hi Carey and Steve,
> >
> >Here is my Code :
> >
> >#!/usr/bin/perl
> >
> >#use strict 'vars';
> >my $status = "Active";
> >my $count3 = 0;
> >my $countDTR = 0;
> >my @save_DTR;
> >my @save_entry;
> >my @save_type;
> >my @save_PartNumber;
> >my @save_ProductName;
> >my @save_qty;
> >my @save_unitCost;
> >my @save_ExtendedCost;
> >my $save_filename;
> >my $DTR = "DTR";
> >my $flag = 1;
> >my $flag2 = "Sent" ;
> >
> >use arControl;
> >my $server = $arControl::SERVER;
> >my $username = $arControl::USERNAME;
> >my $pw = $arControl::PW;
> >use ARS;
> >#open(TXT,">datafile.txt") ||die printf "unable to open flat file\n";
> >
> ># text file opened
> >#printf "The datafile has been opened\n"; $ctrl =
> >ars_Login($server,$username,$pw)||die printf "AR Server login Error\n";
> >#$query = "'650001031' != \$NULL\$"; #my $query = "'Assigned To' !=
> >\$NULL\$"; my $query = "'PO Flag?'!= \$NULL\$"; my $qual =
> >ars_LoadQualifier($ctrl, "Schema",$query);
> >if(!defined($qual))
> >{
> > $error = "Unable to create Schema Load qualifier $ars_errstr";
> >}
> >
> ># created the qualifier
> >#printf "Qualifier has been created\n"; %firstentry =
> >ars_GetListEntry($ctrl,"Schema",$qual,0);
> >#getting DTR numbers
> >#printf "DTR numbers being retrieved\n"; foreach $entryId (sort keys
> >%firstentry) {
> > %firstvalue = ars_GetEntry($ctrl,"Schema", $entryId, 650001006);
> > foreach $entryId (sort keys %firstvalue)
> > {
> > $save_DTR{$countDTR} = $firstvalue{650001006};
> > $save_entry{$countDTR} = $entryId;
> ># printf $save_DTR{$countDTR};
> > $countDTR++;
> > }
> >}
> >#printf("DTR count=%d\n",$countDTR);
> ># creating the header file
> >print TXT "H","0001","0000000","000000","000","0000000000";
> >print TXT "00000","00000","00000000";
> ># Retrieving the Items for this DTR table
> >
> >$qualb = ars_LoadQualifier($ctrl,"Schema2", "1=1");
> >if(!defined($qualb))
> > {
> > $error = "Unable to create Schema2 Load qual ifier
> >$ars_errstr";
> > }
> >for($count3 = 0; $count3 < $countDTR; $count3++) {# printf("next
> >DTR=%s\n",$save_DTR{$count3}); $save_filename =
> >$DTR.$save_DTR{$count3};
> >open(TXT,">$save_filename.txt") ||die printf "unable to open flat
> >file\n"; #printf($save_filename, "\n"); %second =
> >ars_GetListEntry($ctrl,"Schema2",$qualb, 0); my $allHWSW=0; my
> >$prtHWSW=0;
> >
> >foreach $entryId(sort keys %second)
> >{ $allHWSW++;
> > #Gets table information
> > %secondvalue = ars_GetEntry($ctrl,"Schema2",$entryId,
> >650008002,8,7,650008003,650008007,
> > 650008016,650008005,650008004,650008015);
> > if(($secondvalue{650008002} eq $save_DTR{$count3}) &&
> >(($secondvalue{6500 08015} == 0) && ($secondvalue{7} == 0)))
> > { $prtHWSW++;
> > $save_type{$count3}= $secondvalue{8};
> > $save_PartNumber{$count3} = $secondvalue{650008003};
> > $save_ProductName{$count3} = $secondvalue{650008007};
> > $save_qty{$count3} = $secondvalue{650008016};
> > $save_unitCost{$count3} = $secondvalue{650008005};
> > $save_extendedCost{$count3} = $secondvalue{650008004};
> > $save_WO{$count3} = $secondvalue{650008015};
> > $save_Status{$count3} = $secondvalue{7};
> > #send items to file
> > print TXT $save_DTR{$count3};
> > print TXT "L","0001","0000000","000000","000","0";
> > print TXT $save_type{$count3};
> > print TXT $save_PartNumber{$count3};
> > print TXT $save_ProductName{$count3}," ";
> > print TXT $save_qty{$count3}," ";
> > print TXT $save_unitCost{$count3}," ";
> > print TXT $save_extendedCost{$count3};
> > #$count3++;
> > }
> > }
> >#printf(" allHWSW=%d prtHWSW=%d\n",$allHWSW,$prtHWSW);
> >close(TXT);
> >}
> >
> >#close(TXT);
> >ars_Logoff($ctrl);
> >print "Sent \n";
> >exit(0);
> >
> >
> >
> >
> >Then in the Remedy filter i enter the process $PROCESS$ /path/file.pl
> >because I want it to Set a text field in the filter to "Sent". With the
> >exit(0), I am still getting the same error msg. This script compiles
> >with no
> >
> >problem in Unix and it prints out Sent to the STDOUT but when I use it
> >in the set field it keep getting the error ARERR [38] Filter/escalation
> >'set field' process returned an error.
> >
> >
> >
> >Thanks.
> >
> >Amen.
> >
> > >From: Carey Matthew Black <bla...@gm...>
> > >Reply-To: ars...@ar...
> > >To: ars...@ar...
> > >Subject: Re: [Arsperl-users] REmedy problem
> > >Date: Wed, 8 Jun 2005 11:04:16 -0500
> > >
> > >Amen,
> > >
> > >Make sure your script always exits with status zero.
> > >exit(0);
> > >If you do not exit with a status of zero then the ARS server will
> > >throw an exception.
> > >
> > >print anything to STDOUT that you want to to end up in the field.
> > >
> > >A simple example would be:
> > >#! /usr/bin/perl
> > >print "The fields new value is this whole string"; exit(0);
> > >
> > >
> > >Also .. in the filter.. make sure you fully qualify the path to the
> > >perl script and maybe even perl itself.
> > >
> > >/path/to/myscript/junk.pl
> > >
> > >or maybe...
> > >
> > >/usr/bin/perl /path/to/myscript/junk.pl
> > >
> > >
> > >You can also run Filter logs and check the arerror.log for more
> > >details on what the ARS server is seeing from the script too.
> > >
> > >Hope that helps.
> > >
> > >--
> > >Carey Matthew Black
> > >Remedy Skilled Professional (RSP)
> > >ARS = Action Request System(Remedy)
> > >
> > >Solution = People + Process + Tools
> > >Fast, Accurate, Cheap.... Pick two.
> > >Never ascribe to malice, that which can be explained by incompetence.
> > >
> > >http://www.fellowshipchurch.com
> > >
> > >On 6/8/05, Amen Asemota <aas...@ho...> wrote:
> > > > Hi,
> > > >
> > > > I am trying to run a perl script in a filter but i keep getting
> > > > ARERR
> > >[38]
> > > > Filter/escalation 'set field' process returned an error.
> > > >
> > > > Iam trying to use the $PROCESS$ command to set a field . Please
>help..
> > > >
> > > > _________________________________________________________________
> > > > Express yourself instantly with MSN Messenger! Download today it's
> >FREE!
> > > > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> > > >
> > > >
> > > >
> > > > -------------------------------------------------------
> > > > This SF.Net email is sponsored by: NEC IT Guy Games. How far can
> > > > you
> > >shotput
> > > > a projector? How fast can you ride your desk chair down the office
> >luge
> > >track?
> > > > If you want to score the big prize, get to know the little guy.
> > > > Play to win an NEC 61" plasma display:
> > > > http://www.necitguy.com/?r=20
> > > > _______________________________________________
> > > > Arsperl-users mailing list
> > > > Ars...@ar...
> > > > https://lists.sourceforge.net/lists/listinfo/arsperl-users
> > > >
> > >
> > >
> > >
> > >-------------------------------------------------------
> > >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> > >shotput a projector? How fast can you ride your desk chair down the
> > >office luge track?
> > >If you want to score the big prize, get to know the little guy.
> > >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
> > >_______________________________________________
> > >Arsperl-users mailing list
> > >Ars...@ar...
> > >https://lists.sourceforge.net/lists/listinfo/arsperl-users
> >
> >_________________________________________________________________
> >Express yourself instantly with MSN Messenger! Download today it's FREE!
> >http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> >
> >
> >
> >-------------------------------------------------------
> >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> >shotput a projector? How fast can you ride your desk chair down the
> >office luge track?
> >If you want to score the big prize, get to know the little guy.
> >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> >_______________________________________________
> >Arsperl-users mailing list
> >Ars...@ar...
> >https://lists.sourceforge.net/lists/listinfo/arsperl-users
> >
> >
> >
> >-------------------------------------------------------
> >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> >shotput a projector? How fast can you ride your desk chair down the
> >office luge track?
> >If you want to score the big prize, get to know the little guy.
> >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> >_______________________________________________
> >Arsperl-users mailing list
> >Ars...@ar...
> >https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>_________________________________________________________________
>Express yourself instantly with MSN Messenger! Download today it's FREE!
>http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput a projector? How fast can you ride your desk chair down the office
>luge track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
>a projector? How fast can you ride your desk chair down the office luge
>track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE!
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
-------------------------------------------------------
This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
shotput
a projector? How fast can you ride your desk chair down the office luge
track?
If you want to score the big prize, get to know the little guy.
Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users
|
|
From: Amen A. <aas...@ho...> - 2005-06-09 20:22:03
|
Yes it does. I do have another problem though. It is supposed to be creating
a text file also but it's not doing that. It just sets the field and that's
it.
Thanks.
Amen.
>From: "PC Wai" <PC...@TE...>
>Reply-To: ars...@ar...
>To: <ars...@ar...>
>Subject: RE: [Arsperl-users] REmedy problem
>Date: Thu, 9 Jun 2005 09:03:33 -0700
>
>Hi Amen,
>
>Just a wild guess. Does your Remedy owner have execution permission to the
>script and the modules?
>
>Regards
>PC
>
>-----Original Message-----
>From: ars...@ar...
>[mailto:ars...@ar...] On Behalf Of Amen Asemota
>Sent: Thursday, June 09, 2005 08:53
>To: ars...@ar...
>Subject: RE: [Arsperl-users] REmedy problem
>
>
>Yes it does it prints out the word "Sent" and it also creates a txt file
>which we also need.
>
>Amen.
> >From: Steve McDonald <ste...@ch...>
> >Reply-To: ars...@ar...
> >To: ars...@ar...
> >Subject: RE: [Arsperl-users] REmedy problem
> >Date: Thu, 09 Jun 2005 08:20:22 -0700
> >
> >Does this script work from the command line?
> >
> >-----Original Message-----
> >From: ars...@ar...
> >[mailto:ars...@ar...] On Behalf Of Amen Asemota
> >Sent: Thursday, June 09, 2005 6:42 AM
> >To: ars...@ar...
> >Subject: Re: [Arsperl-users] REmedy problem
> >
> >Hi Carey and Steve,
> >
> >Here is my Code :
> >
> >#!/usr/bin/perl
> >
> >#use strict 'vars';
> >my $status = "Active";
> >my $count3 = 0;
> >my $countDTR = 0;
> >my @save_DTR;
> >my @save_entry;
> >my @save_type;
> >my @save_PartNumber;
> >my @save_ProductName;
> >my @save_qty;
> >my @save_unitCost;
> >my @save_ExtendedCost;
> >my $save_filename;
> >my $DTR = "DTR";
> >my $flag = 1;
> >my $flag2 = "Sent" ;
> >
> >use arControl;
> >my $server = $arControl::SERVER;
> >my $username = $arControl::USERNAME;
> >my $pw = $arControl::PW;
> >use ARS;
> >#open(TXT,">datafile.txt") ||die printf "unable to open flat file\n";
> >
> ># text file opened
> >#printf "The datafile has been opened\n"; $ctrl =
> >ars_Login($server,$username,$pw)||die printf "AR Server login Error\n";
> >#$query = "'650001031' != \$NULL\$"; #my $query = "'Assigned To' !=
> >\$NULL\$"; my $query = "'PO Flag?'!= \$NULL\$"; my $qual =
> >ars_LoadQualifier($ctrl, "Schema",$query);
> >if(!defined($qual))
> >{
> > $error = "Unable to create Schema Load qualifier $ars_errstr";
> >}
> >
> ># created the qualifier
> >#printf "Qualifier has been created\n"; %firstentry =
> >ars_GetListEntry($ctrl,"Schema",$qual,0);
> >#getting DTR numbers
> >#printf "DTR numbers being retrieved\n"; foreach $entryId (sort keys
> >%firstentry) {
> > %firstvalue = ars_GetEntry($ctrl,"Schema", $entryId, 650001006);
> > foreach $entryId (sort keys %firstvalue)
> > {
> > $save_DTR{$countDTR} = $firstvalue{650001006};
> > $save_entry{$countDTR} = $entryId;
> ># printf $save_DTR{$countDTR};
> > $countDTR++;
> > }
> >}
> >#printf("DTR count=%d\n",$countDTR);
> ># creating the header file
> >print TXT "H","0001","0000000","000000","000","0000000000";
> >print TXT "00000","00000","00000000";
> ># Retrieving the Items for this DTR table
> >
> >$qualb = ars_LoadQualifier($ctrl,"Schema2", "1=1");
> >if(!defined($qualb))
> > {
> > $error = "Unable to create Schema2 Load qual ifier
> >$ars_errstr";
> > }
> >for($count3 = 0; $count3 < $countDTR; $count3++) {# printf("next
> >DTR=%s\n",$save_DTR{$count3}); $save_filename =
> >$DTR.$save_DTR{$count3};
> >open(TXT,">$save_filename.txt") ||die printf "unable to open flat
> >file\n"; #printf($save_filename, "\n"); %second =
> >ars_GetListEntry($ctrl,"Schema2",$qualb, 0); my $allHWSW=0; my
> >$prtHWSW=0;
> >
> >foreach $entryId(sort keys %second)
> >{ $allHWSW++;
> > #Gets table information
> > %secondvalue = ars_GetEntry($ctrl,"Schema2",$entryId,
> >650008002,8,7,650008003,650008007,
> > 650008016,650008005,650008004,650008015);
> > if(($secondvalue{650008002} eq $save_DTR{$count3}) &&
> >(($secondvalue{6500 08015} == 0) && ($secondvalue{7} == 0)))
> > { $prtHWSW++;
> > $save_type{$count3}= $secondvalue{8};
> > $save_PartNumber{$count3} = $secondvalue{650008003};
> > $save_ProductName{$count3} = $secondvalue{650008007};
> > $save_qty{$count3} = $secondvalue{650008016};
> > $save_unitCost{$count3} = $secondvalue{650008005};
> > $save_extendedCost{$count3} = $secondvalue{650008004};
> > $save_WO{$count3} = $secondvalue{650008015};
> > $save_Status{$count3} = $secondvalue{7};
> > #send items to file
> > print TXT $save_DTR{$count3};
> > print TXT "L","0001","0000000","000000","000","0";
> > print TXT $save_type{$count3};
> > print TXT $save_PartNumber{$count3};
> > print TXT $save_ProductName{$count3}," ";
> > print TXT $save_qty{$count3}," ";
> > print TXT $save_unitCost{$count3}," ";
> > print TXT $save_extendedCost{$count3};
> > #$count3++;
> > }
> > }
> >#printf(" allHWSW=%d prtHWSW=%d\n",$allHWSW,$prtHWSW);
> >close(TXT);
> >}
> >
> >#close(TXT);
> >ars_Logoff($ctrl);
> >print "Sent \n";
> >exit(0);
> >
> >
> >
> >
> >Then in the Remedy filter i enter the process $PROCESS$ /path/file.pl
> >because I want it to Set a text field in the filter to "Sent". With the
> >exit(0), I am still getting the same error msg. This script compiles
> >with no
> >
> >problem in Unix and it prints out Sent to the STDOUT but when I use it
> >in the set field it keep getting the error ARERR [38] Filter/escalation
> >'set field' process returned an error.
> >
> >
> >
> >Thanks.
> >
> >Amen.
> >
> > >From: Carey Matthew Black <bla...@gm...>
> > >Reply-To: ars...@ar...
> > >To: ars...@ar...
> > >Subject: Re: [Arsperl-users] REmedy problem
> > >Date: Wed, 8 Jun 2005 11:04:16 -0500
> > >
> > >Amen,
> > >
> > >Make sure your script always exits with status zero.
> > >exit(0);
> > >If you do not exit with a status of zero then the ARS server will
> > >throw an exception.
> > >
> > >print anything to STDOUT that you want to to end up in the field.
> > >
> > >A simple example would be:
> > >#! /usr/bin/perl
> > >print "The fields new value is this whole string"; exit(0);
> > >
> > >
> > >Also .. in the filter.. make sure you fully qualify the path to the
> > >perl script and maybe even perl itself.
> > >
> > >/path/to/myscript/junk.pl
> > >
> > >or maybe...
> > >
> > >/usr/bin/perl /path/to/myscript/junk.pl
> > >
> > >
> > >You can also run Filter logs and check the arerror.log for more
> > >details on what the ARS server is seeing from the script too.
> > >
> > >Hope that helps.
> > >
> > >--
> > >Carey Matthew Black
> > >Remedy Skilled Professional (RSP)
> > >ARS = Action Request System(Remedy)
> > >
> > >Solution = People + Process + Tools
> > >Fast, Accurate, Cheap.... Pick two.
> > >Never ascribe to malice, that which can be explained by incompetence.
> > >
> > >http://www.fellowshipchurch.com
> > >
> > >On 6/8/05, Amen Asemota <aas...@ho...> wrote:
> > > > Hi,
> > > >
> > > > I am trying to run a perl script in a filter but i keep getting
> > > > ARERR
> > >[38]
> > > > Filter/escalation 'set field' process returned an error.
> > > >
> > > > Iam trying to use the $PROCESS$ command to set a field . Please
>help..
> > > >
> > > > _________________________________________________________________
> > > > Express yourself instantly with MSN Messenger! Download today it's
> >FREE!
> > > > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> > > >
> > > >
> > > >
> > > > -------------------------------------------------------
> > > > This SF.Net email is sponsored by: NEC IT Guy Games. How far can
> > > > you
> > >shotput
> > > > a projector? How fast can you ride your desk chair down the office
> >luge
> > >track?
> > > > If you want to score the big prize, get to know the little guy.
> > > > Play to win an NEC 61" plasma display:
> > > > http://www.necitguy.com/?r=20
> > > > _______________________________________________
> > > > Arsperl-users mailing list
> > > > Ars...@ar...
> > > > https://lists.sourceforge.net/lists/listinfo/arsperl-users
> > > >
> > >
> > >
> > >
> > >-------------------------------------------------------
> > >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> > >shotput a projector? How fast can you ride your desk chair down the
> > >office luge track?
> > >If you want to score the big prize, get to know the little guy.
> > >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
> > >_______________________________________________
> > >Arsperl-users mailing list
> > >Ars...@ar...
> > >https://lists.sourceforge.net/lists/listinfo/arsperl-users
> >
> >_________________________________________________________________
> >Express yourself instantly with MSN Messenger! Download today it's FREE!
> >http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> >
> >
> >
> >-------------------------------------------------------
> >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> >shotput a projector? How fast can you ride your desk chair down the
> >office luge track?
> >If you want to score the big prize, get to know the little guy.
> >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> >_______________________________________________
> >Arsperl-users mailing list
> >Ars...@ar...
> >https://lists.sourceforge.net/lists/listinfo/arsperl-users
> >
> >
> >
> >-------------------------------------------------------
> >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> >shotput a projector? How fast can you ride your desk chair down the
> >office luge track?
> >If you want to score the big prize, get to know the little guy.
> >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> >_______________________________________________
> >Arsperl-users mailing list
> >Ars...@ar...
> >https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>_________________________________________________________________
>Express yourself instantly with MSN Messenger! Download today it's FREE!
>http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput a projector? How fast can you ride your desk chair down the office
>luge track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
>a projector? How fast can you ride your desk chair down the office luge
>track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE!
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
|
|
From: Amen A. <aas...@ho...> - 2005-06-09 16:35:04
|
Hey Carey,
Thank you so much. I just added /usr/bin/perl to the path e.g
$PROCESS$ /usr/bin/perl /path/file.pl
and it is working great now. Thank you.
Amen.
>From: Steve McDonald <ste...@ch...>
>Reply-To: ars...@ar...
>To: ars...@ar...
>Subject: RE: [Arsperl-users] REmedy problem
>Date: Thu, 09 Jun 2005 09:17:28 -0700
>
>Check that you are putting the full path to the script in the filter that
>is
>calling the script. Also, if you have a non-root install of Remedy, that
>the user that installed Remedy has permissions to the script.
>
>-----Original Message-----
>From: ars...@ar...
>[mailto:ars...@ar...] On Behalf Of Amen Asemota
>Sent: Thursday, June 09, 2005 8:53 AM
>To: ars...@ar...
>Subject: RE: [Arsperl-users] REmedy problem
>
>
>Yes it does it prints out the word "Sent" and it also creates a txt file
>which we also need.
>
>Amen.
> >From: Steve McDonald <ste...@ch...>
> >Reply-To: ars...@ar...
> >To: ars...@ar...
> >Subject: RE: [Arsperl-users] REmedy problem
> >Date: Thu, 09 Jun 2005 08:20:22 -0700
> >
> >Does this script work from the command line?
> >
> >-----Original Message-----
> >From: ars...@ar...
> >[mailto:ars...@ar...] On Behalf Of Amen Asemota
> >Sent: Thursday, June 09, 2005 6:42 AM
> >To: ars...@ar...
> >Subject: Re: [Arsperl-users] REmedy problem
> >
> >Hi Carey and Steve,
> >
> >Here is my Code :
> >
> >#!/usr/bin/perl
> >
> >#use strict 'vars';
> >my $status = "Active";
> >my $count3 = 0;
> >my $countDTR = 0;
> >my @save_DTR;
> >my @save_entry;
> >my @save_type;
> >my @save_PartNumber;
> >my @save_ProductName;
> >my @save_qty;
> >my @save_unitCost;
> >my @save_ExtendedCost;
> >my $save_filename;
> >my $DTR = "DTR";
> >my $flag = 1;
> >my $flag2 = "Sent" ;
> >
> >use arControl;
> >my $server = $arControl::SERVER;
> >my $username = $arControl::USERNAME;
> >my $pw = $arControl::PW;
> >use ARS;
> >#open(TXT,">datafile.txt") ||die printf "unable to open flat file\n";
> >
> ># text file opened
> >#printf "The datafile has been opened\n";
> >$ctrl = ars_Login($server,$username,$pw)||die printf "AR Server login
> >Error\n";
> >#$query = "'650001031' != \$NULL\$";
> >#my $query = "'Assigned To' != \$NULL\$";
> >my $query = "'PO Flag?'!= \$NULL\$";
> >my $qual = ars_LoadQualifier($ctrl, "Schema",$query);
> >if(!defined($qual))
> >{
> > $error = "Unable to create Schema Load qualifier
> >$ars_errstr";
> >}
> >
> ># created the qualifier
> >#printf "Qualifier has been created\n";
> >%firstentry = ars_GetListEntry($ctrl,"Schema",$qual,0);
> >#getting DTR numbers
> >#printf "DTR numbers being retrieved\n";
> >foreach $entryId (sort keys %firstentry)
> >{
> > %firstvalue = ars_GetEntry($ctrl,"Schema", $entryId,
> >650001006);
> > foreach $entryId (sort keys %firstvalue)
> > {
> > $save_DTR{$countDTR} = $firstvalue{650001006};
> > $save_entry{$countDTR} = $entryId;
> ># printf $save_DTR{$countDTR};
> > $countDTR++;
> > }
> >}
> >#printf("DTR count=%d\n",$countDTR);
> ># creating the header file
> >print TXT "H","0001","0000000","000000","000","0000000000";
> >print TXT "00000","00000","00000000";
> ># Retrieving the Items for this DTR table
> >
> >$qualb = ars_LoadQualifier($ctrl,"Schema2", "1=1");
> >if(!defined($qualb))
> > {
> > $error = "Unable to create Schema2 Load qual
> >ifier $ars_errstr";
> > }
> >for($count3 = 0; $count3 < $countDTR; $count3++)
> >{# printf("next DTR=%s\n",$save_DTR{$count3});
> >$save_filename = $DTR.$save_DTR{$count3};
> >open(TXT,">$save_filename.txt") ||die printf "unable to open flat
>file\n";
> >#printf($save_filename, "\n");
> >%second = ars_GetListEntry($ctrl,"Schema2",$qualb, 0);
> >my $allHWSW=0;
> >my $prtHWSW=0;
> >
> >foreach $entryId(sort keys %second)
> >{ $allHWSW++;
> > #Gets table information
> > %secondvalue = ars_GetEntry($ctrl,"Schema2",$entryId,
> >650008002,8,7,650008003,650008007,
> > 650008016,650008005,650008004,650008015);
> > if(($secondvalue{650008002} eq $save_DTR{$count3}) &&
> >(($secondvalue{6500
> >08015} == 0) && ($secondvalue{7} == 0)))
> > { $prtHWSW++;
> > $save_type{$count3}= $secondvalue{8};
> > $save_PartNumber{$count3} = $secondvalue{650008003};
> > $save_ProductName{$count3} = $secondvalue{650008007};
> > $save_qty{$count3} = $secondvalue{650008016};
> > $save_unitCost{$count3} = $secondvalue{650008005};
> > $save_extendedCost{$count3} = $secondvalue{650008004};
> > $save_WO{$count3} = $secondvalue{650008015};
> > $save_Status{$count3} = $secondvalue{7};
> > #send items to file
> > print TXT $save_DTR{$count3};
> > print TXT "L","0001","0000000","000000","000","0";
> > print TXT $save_type{$count3};
> > print TXT $save_PartNumber{$count3};
> > print TXT $save_ProductName{$count3}," ";
> > print TXT $save_qty{$count3}," ";
> > print TXT $save_unitCost{$count3}," ";
> > print TXT $save_extendedCost{$count3};
> > #$count3++;
> > }
> > }
> >#printf(" allHWSW=%d prtHWSW=%d\n",$allHWSW,$prtHWSW);
> >close(TXT);
> >}
> >
> >#close(TXT);
> >ars_Logoff($ctrl);
> >print "Sent \n";
> >exit(0);
> >
> >
> >
> >
> >Then in the Remedy filter i enter the process $PROCESS$ /path/file.pl
> >because I want it to Set a text field in the filter to "Sent". With the
> >exit(0), I am still getting the same error msg. This script compiles with
> >no
> >
> >problem in Unix and it prints out Sent to the STDOUT but when I use it in
> >the set field it keep getting the error ARERR [38] Filter/escalation 'set
> >field' process returned an error.
> >
> >
> >
> >Thanks.
> >
> >Amen.
> >
> > >From: Carey Matthew Black <bla...@gm...>
> > >Reply-To: ars...@ar...
> > >To: ars...@ar...
> > >Subject: Re: [Arsperl-users] REmedy problem
> > >Date: Wed, 8 Jun 2005 11:04:16 -0500
> > >
> > >Amen,
> > >
> > >Make sure your script always exits with status zero.
> > >exit(0);
> > >If you do not exit with a status of zero then the ARS server will
> > >throw an exception.
> > >
> > >print anything to STDOUT that you want to to end up in the field.
> > >
> > >A simple example would be:
> > >#! /usr/bin/perl
> > >print "The fields new value is this whole string";
> > >exit(0);
> > >
> > >
> > >Also .. in the filter.. make sure you fully qualify the path to the
> > >perl script and maybe even perl itself.
> > >
> > >/path/to/myscript/junk.pl
> > >
> > >or maybe...
> > >
> > >/usr/bin/perl /path/to/myscript/junk.pl
> > >
> > >
> > >You can also run Filter logs and check the arerror.log for more
> > >details on what the ARS server is seeing from the script too.
> > >
> > >Hope that helps.
> > >
> > >--
> > >Carey Matthew Black
> > >Remedy Skilled Professional (RSP)
> > >ARS = Action Request System(Remedy)
> > >
> > >Solution = People + Process + Tools
> > >Fast, Accurate, Cheap.... Pick two.
> > >Never ascribe to malice, that which can be explained by incompetence.
> > >
> > >http://www.fellowshipchurch.com
> > >
> > >On 6/8/05, Amen Asemota <aas...@ho...> wrote:
> > > > Hi,
> > > >
> > > > I am trying to run a perl script in a filter but i keep getting
>ARERR
> > >[38]
> > > > Filter/escalation 'set field' process returned an error.
> > > >
> > > > Iam trying to use the $PROCESS$ command to set a field . Please
>help..
> > > >
> > > > _________________________________________________________________
> > > > Express yourself instantly with MSN Messenger! Download today it's
> >FREE!
> > > > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> > > >
> > > >
> > > >
> > > > -------------------------------------------------------
> > > > This SF.Net email is sponsored by: NEC IT Guy Games. How far can
>you
> > >shotput
> > > > a projector? How fast can you ride your desk chair down the office
> >luge
> > >track?
> > > > If you want to score the big prize, get to know the little guy.
> > > > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> > > > _______________________________________________
> > > > Arsperl-users mailing list
> > > > Ars...@ar...
> > > > https://lists.sourceforge.net/lists/listinfo/arsperl-users
> > > >
> > >
> > >
> > >
> > >-------------------------------------------------------
> > >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> > >shotput
> > >a projector? How fast can you ride your desk chair down the office luge
> > >track?
> > >If you want to score the big prize, get to know the little guy.
> > >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
> > >_______________________________________________
> > >Arsperl-users mailing list
> > >Ars...@ar...
> > >https://lists.sourceforge.net/lists/listinfo/arsperl-users
> >
> >_________________________________________________________________
> >Express yourself instantly with MSN Messenger! Download today it's FREE!
> >http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> >
> >
> >
> >-------------------------------------------------------
> >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> >shotput
> >a projector? How fast can you ride your desk chair down the office luge
> >track?
> >If you want to score the big prize, get to know the little guy.
> >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> >_______________________________________________
> >Arsperl-users mailing list
> >Ars...@ar...
> >https://lists.sourceforge.net/lists/listinfo/arsperl-users
> >
> >
> >
> >-------------------------------------------------------
> >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> >shotput
> >a projector? How fast can you ride your desk chair down the office luge
> >track?
> >If you want to score the big prize, get to know the little guy.
> >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> >_______________________________________________
> >Arsperl-users mailing list
> >Ars...@ar...
> >https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>_________________________________________________________________
>Express yourself instantly with MSN Messenger! Download today it's FREE!
>http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
>a projector? How fast can you ride your desk chair down the office luge
>track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
>a projector? How fast can you ride your desk chair down the office luge
>track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE!
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
|
|
From: <jar...@te...> - 2005-06-09 16:24:13
|
Is your server licensed? If not, this could be the problem. -- Jarl > -----Original Message----- > From: ars...@ar... > [mailto:ars...@ar...]On Behalf Of Amen Asemota > Sent: 8. juni 2005 17:52 > To: ars...@ar... > Subject: [Arsperl-users] REmedy problem >=20 >=20 > Hi, >=20 > I am trying to run a perl script in a filter but i keep=20 > getting ARERR [38]=20 > Filter/escalation 'set field' process returned an error. >=20 > Iam trying to use the $PROCESS$ command to set a field . Please help.. >=20 > _________________________________________________________________ > Express yourself instantly with MSN Messenger! Download today=20 > it's FREE!=20 > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ >=20 >=20 >=20 > ------------------------------------------------------- > This SF.Net email is sponsored by: NEC IT Guy Games. How far=20 > can you shotput > a projector? How fast can you ride your desk chair down the=20 > office luge track? > If you want to score the big prize, get to know the little guy. =20 > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=3D20 > _______________________________________________ > Arsperl-users mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-users >=20 |
|
From: Steve M. <ste...@ch...> - 2005-06-09 16:18:03
|
Check that you are putting the full path to the script in the filter that is
calling the script. Also, if you have a non-root install of Remedy, that
the user that installed Remedy has permissions to the script.
-----Original Message-----
From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Amen Asemota
Sent: Thursday, June 09, 2005 8:53 AM
To: ars...@ar...
Subject: RE: [Arsperl-users] REmedy problem
Yes it does it prints out the word "Sent" and it also creates a txt file
which we also need.
Amen.
>From: Steve McDonald <ste...@ch...>
>Reply-To: ars...@ar...
>To: ars...@ar...
>Subject: RE: [Arsperl-users] REmedy problem
>Date: Thu, 09 Jun 2005 08:20:22 -0700
>
>Does this script work from the command line?
>
>-----Original Message-----
>From: ars...@ar...
>[mailto:ars...@ar...] On Behalf Of Amen Asemota
>Sent: Thursday, June 09, 2005 6:42 AM
>To: ars...@ar...
>Subject: Re: [Arsperl-users] REmedy problem
>
>Hi Carey and Steve,
>
>Here is my Code :
>
>#!/usr/bin/perl
>
>#use strict 'vars';
>my $status = "Active";
>my $count3 = 0;
>my $countDTR = 0;
>my @save_DTR;
>my @save_entry;
>my @save_type;
>my @save_PartNumber;
>my @save_ProductName;
>my @save_qty;
>my @save_unitCost;
>my @save_ExtendedCost;
>my $save_filename;
>my $DTR = "DTR";
>my $flag = 1;
>my $flag2 = "Sent" ;
>
>use arControl;
>my $server = $arControl::SERVER;
>my $username = $arControl::USERNAME;
>my $pw = $arControl::PW;
>use ARS;
>#open(TXT,">datafile.txt") ||die printf "unable to open flat file\n";
>
># text file opened
>#printf "The datafile has been opened\n";
>$ctrl = ars_Login($server,$username,$pw)||die printf "AR Server login
>Error\n";
>#$query = "'650001031' != \$NULL\$";
>#my $query = "'Assigned To' != \$NULL\$";
>my $query = "'PO Flag?'!= \$NULL\$";
>my $qual = ars_LoadQualifier($ctrl, "Schema",$query);
>if(!defined($qual))
>{
> $error = "Unable to create Schema Load qualifier
>$ars_errstr";
>}
>
># created the qualifier
>#printf "Qualifier has been created\n";
>%firstentry = ars_GetListEntry($ctrl,"Schema",$qual,0);
>#getting DTR numbers
>#printf "DTR numbers being retrieved\n";
>foreach $entryId (sort keys %firstentry)
>{
> %firstvalue = ars_GetEntry($ctrl,"Schema", $entryId,
>650001006);
> foreach $entryId (sort keys %firstvalue)
> {
> $save_DTR{$countDTR} = $firstvalue{650001006};
> $save_entry{$countDTR} = $entryId;
># printf $save_DTR{$countDTR};
> $countDTR++;
> }
>}
>#printf("DTR count=%d\n",$countDTR);
># creating the header file
>print TXT "H","0001","0000000","000000","000","0000000000";
>print TXT "00000","00000","00000000";
># Retrieving the Items for this DTR table
>
>$qualb = ars_LoadQualifier($ctrl,"Schema2", "1=1");
>if(!defined($qualb))
> {
> $error = "Unable to create Schema2 Load qual
>ifier $ars_errstr";
> }
>for($count3 = 0; $count3 < $countDTR; $count3++)
>{# printf("next DTR=%s\n",$save_DTR{$count3});
>$save_filename = $DTR.$save_DTR{$count3};
>open(TXT,">$save_filename.txt") ||die printf "unable to open flat file\n";
>#printf($save_filename, "\n");
>%second = ars_GetListEntry($ctrl,"Schema2",$qualb, 0);
>my $allHWSW=0;
>my $prtHWSW=0;
>
>foreach $entryId(sort keys %second)
>{ $allHWSW++;
> #Gets table information
> %secondvalue = ars_GetEntry($ctrl,"Schema2",$entryId,
>650008002,8,7,650008003,650008007,
> 650008016,650008005,650008004,650008015);
> if(($secondvalue{650008002} eq $save_DTR{$count3}) &&
>(($secondvalue{6500
>08015} == 0) && ($secondvalue{7} == 0)))
> { $prtHWSW++;
> $save_type{$count3}= $secondvalue{8};
> $save_PartNumber{$count3} = $secondvalue{650008003};
> $save_ProductName{$count3} = $secondvalue{650008007};
> $save_qty{$count3} = $secondvalue{650008016};
> $save_unitCost{$count3} = $secondvalue{650008005};
> $save_extendedCost{$count3} = $secondvalue{650008004};
> $save_WO{$count3} = $secondvalue{650008015};
> $save_Status{$count3} = $secondvalue{7};
> #send items to file
> print TXT $save_DTR{$count3};
> print TXT "L","0001","0000000","000000","000","0";
> print TXT $save_type{$count3};
> print TXT $save_PartNumber{$count3};
> print TXT $save_ProductName{$count3}," ";
> print TXT $save_qty{$count3}," ";
> print TXT $save_unitCost{$count3}," ";
> print TXT $save_extendedCost{$count3};
> #$count3++;
> }
> }
>#printf(" allHWSW=%d prtHWSW=%d\n",$allHWSW,$prtHWSW);
>close(TXT);
>}
>
>#close(TXT);
>ars_Logoff($ctrl);
>print "Sent \n";
>exit(0);
>
>
>
>
>Then in the Remedy filter i enter the process $PROCESS$ /path/file.pl
>because I want it to Set a text field in the filter to "Sent". With the
>exit(0), I am still getting the same error msg. This script compiles with
>no
>
>problem in Unix and it prints out Sent to the STDOUT but when I use it in
>the set field it keep getting the error ARERR [38] Filter/escalation 'set
>field' process returned an error.
>
>
>
>Thanks.
>
>Amen.
>
> >From: Carey Matthew Black <bla...@gm...>
> >Reply-To: ars...@ar...
> >To: ars...@ar...
> >Subject: Re: [Arsperl-users] REmedy problem
> >Date: Wed, 8 Jun 2005 11:04:16 -0500
> >
> >Amen,
> >
> >Make sure your script always exits with status zero.
> >exit(0);
> >If you do not exit with a status of zero then the ARS server will
> >throw an exception.
> >
> >print anything to STDOUT that you want to to end up in the field.
> >
> >A simple example would be:
> >#! /usr/bin/perl
> >print "The fields new value is this whole string";
> >exit(0);
> >
> >
> >Also .. in the filter.. make sure you fully qualify the path to the
> >perl script and maybe even perl itself.
> >
> >/path/to/myscript/junk.pl
> >
> >or maybe...
> >
> >/usr/bin/perl /path/to/myscript/junk.pl
> >
> >
> >You can also run Filter logs and check the arerror.log for more
> >details on what the ARS server is seeing from the script too.
> >
> >Hope that helps.
> >
> >--
> >Carey Matthew Black
> >Remedy Skilled Professional (RSP)
> >ARS = Action Request System(Remedy)
> >
> >Solution = People + Process + Tools
> >Fast, Accurate, Cheap.... Pick two.
> >Never ascribe to malice, that which can be explained by incompetence.
> >
> >http://www.fellowshipchurch.com
> >
> >On 6/8/05, Amen Asemota <aas...@ho...> wrote:
> > > Hi,
> > >
> > > I am trying to run a perl script in a filter but i keep getting ARERR
> >[38]
> > > Filter/escalation 'set field' process returned an error.
> > >
> > > Iam trying to use the $PROCESS$ command to set a field . Please help..
> > >
> > > _________________________________________________________________
> > > Express yourself instantly with MSN Messenger! Download today it's
>FREE!
> > > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> > >
> > >
> > >
> > > -------------------------------------------------------
> > > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> >shotput
> > > a projector? How fast can you ride your desk chair down the office
>luge
> >track?
> > > If you want to score the big prize, get to know the little guy.
> > > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> > > _______________________________________________
> > > Arsperl-users mailing list
> > > Ars...@ar...
> > > https://lists.sourceforge.net/lists/listinfo/arsperl-users
> > >
> >
> >
> >
> >-------------------------------------------------------
> >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> >shotput
> >a projector? How fast can you ride your desk chair down the office luge
> >track?
> >If you want to score the big prize, get to know the little guy.
> >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
> >_______________________________________________
> >Arsperl-users mailing list
> >Ars...@ar...
> >https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>_________________________________________________________________
>Express yourself instantly with MSN Messenger! Download today it's FREE!
>http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
>a projector? How fast can you ride your desk chair down the office luge
>track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
>a projector? How fast can you ride your desk chair down the office luge
>track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE!
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
-------------------------------------------------------
This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
shotput
a projector? How fast can you ride your desk chair down the office luge
track?
If you want to score the big prize, get to know the little guy.
Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users
|
|
From: PC W. <PC...@TE...> - 2005-06-09 16:04:02
|
Hi Amen,
Just a wild guess. Does your Remedy owner have execution permission to =
the script and the modules?
Regards
PC
-----Original Message-----
From: ars...@ar... =
[mailto:ars...@ar...] On Behalf Of Amen Asemota
Sent: Thursday, June 09, 2005 08:53
To: ars...@ar...
Subject: RE: [Arsperl-users] REmedy problem
Yes it does it prints out the word "Sent" and it also creates a txt file =
which we also need.
Amen.
>From: Steve McDonald <ste...@ch...>
>Reply-To: ars...@ar...
>To: ars...@ar...
>Subject: RE: [Arsperl-users] REmedy problem
>Date: Thu, 09 Jun 2005 08:20:22 -0700
>
>Does this script work from the command line?
>
>-----Original Message-----
>From: ars...@ar...
>[mailto:ars...@ar...] On Behalf Of Amen Asemota
>Sent: Thursday, June 09, 2005 6:42 AM
>To: ars...@ar...
>Subject: Re: [Arsperl-users] REmedy problem
>
>Hi Carey and Steve,
>
>Here is my Code :
>
>#!/usr/bin/perl
>
>#use strict 'vars';
>my $status =3D "Active";
>my $count3 =3D 0;
>my $countDTR =3D 0;
>my @save_DTR;
>my @save_entry;
>my @save_type;
>my @save_PartNumber;
>my @save_ProductName;
>my @save_qty;
>my @save_unitCost;
>my @save_ExtendedCost;
>my $save_filename;
>my $DTR =3D "DTR";
>my $flag =3D 1;
>my $flag2 =3D "Sent" ;
>
>use arControl;
>my $server =3D $arControl::SERVER;
>my $username =3D $arControl::USERNAME;
>my $pw =3D $arControl::PW;
>use ARS;
>#open(TXT,">datafile.txt") ||die printf "unable to open flat file\n";
>
># text file opened
>#printf "The datafile has been opened\n"; $ctrl =3D=20
>ars_Login($server,$username,$pw)||die printf "AR Server login Error\n"; =
>#$query =3D "'650001031' !=3D \$NULL\$"; #my $query =3D "'Assigned To' =
!=3D=20
>\$NULL\$"; my $query =3D "'PO Flag?'!=3D \$NULL\$"; my $qual =3D=20
>ars_LoadQualifier($ctrl, "Schema",$query);
>if(!defined($qual))
>{
> $error =3D "Unable to create Schema Load qualifier =
$ars_errstr";=20
>}
>
># created the qualifier
>#printf "Qualifier has been created\n"; %firstentry =3D=20
>ars_GetListEntry($ctrl,"Schema",$qual,0);
>#getting DTR numbers
>#printf "DTR numbers being retrieved\n"; foreach $entryId (sort keys=20
>%firstentry) {
> %firstvalue =3D ars_GetEntry($ctrl,"Schema", $entryId, 650001006);
> foreach $entryId (sort keys %firstvalue)
> {
> $save_DTR{$countDTR} =3D $firstvalue{650001006};
> $save_entry{$countDTR} =3D $entryId;
># printf $save_DTR{$countDTR};
> $countDTR++;
> }
>}
>#printf("DTR count=3D%d\n",$countDTR);
># creating the header file
>print TXT "H","0001","0000000","000000","000","0000000000";
>print TXT "00000","00000","00000000";
># Retrieving the Items for this DTR table
>
>$qualb =3D ars_LoadQualifier($ctrl,"Schema2", "1=3D1");
>if(!defined($qualb))
> {
> $error =3D "Unable to create Schema2 Load qual ifier=20
>$ars_errstr";
> }
>for($count3 =3D 0; $count3 < $countDTR; $count3++) {# printf("next=20
>DTR=3D%s\n",$save_DTR{$count3}); $save_filename =3D=20
>$DTR.$save_DTR{$count3};
>open(TXT,">$save_filename.txt") ||die printf "unable to open flat=20
>file\n"; #printf($save_filename, "\n"); %second =3D=20
>ars_GetListEntry($ctrl,"Schema2",$qualb, 0); my $allHWSW=3D0; my=20
>$prtHWSW=3D0;
>
>foreach $entryId(sort keys %second)
>{ $allHWSW++;
> #Gets table information
> %secondvalue =3D ars_GetEntry($ctrl,"Schema2",$entryId,
>650008002,8,7,650008003,650008007,
> 650008016,650008005,650008004,650008015);
> if(($secondvalue{650008002} eq $save_DTR{$count3}) &&=20
>(($secondvalue{6500 08015} =3D=3D 0) && ($secondvalue{7} =3D=3D 0)))
> { $prtHWSW++;
> $save_type{$count3}=3D $secondvalue{8};
> $save_PartNumber{$count3} =3D =
$secondvalue{650008003};
> $save_ProductName{$count3} =3D =
$secondvalue{650008007};
> $save_qty{$count3} =3D $secondvalue{650008016};
> $save_unitCost{$count3} =3D $secondvalue{650008005};
> $save_extendedCost{$count3} =3D =
$secondvalue{650008004};
> $save_WO{$count3} =3D $secondvalue{650008015};
> $save_Status{$count3} =3D $secondvalue{7};
> #send items to file
> print TXT $save_DTR{$count3};
> print TXT "L","0001","0000000","000000","000","0";
> print TXT $save_type{$count3};
> print TXT $save_PartNumber{$count3};
> print TXT $save_ProductName{$count3}," ";
> print TXT $save_qty{$count3}," ";
> print TXT $save_unitCost{$count3}," ";
> print TXT $save_extendedCost{$count3};
> #$count3++;
> }
> }
>#printf(" allHWSW=3D%d prtHWSW=3D%d\n",$allHWSW,$prtHWSW);
>close(TXT);
>}
>
>#close(TXT);
>ars_Logoff($ctrl);
>print "Sent \n";
>exit(0);
>
>
>
>
>Then in the Remedy filter i enter the process $PROCESS$ /path/file.pl=20
>because I want it to Set a text field in the filter to "Sent". With the =
>exit(0), I am still getting the same error msg. This script compiles=20
>with no
>
>problem in Unix and it prints out Sent to the STDOUT but when I use it=20
>in the set field it keep getting the error ARERR [38] Filter/escalation =
>'set field' process returned an error.
>
>
>
>Thanks.
>
>Amen.
>
> >From: Carey Matthew Black <bla...@gm...>
> >Reply-To: ars...@ar...
> >To: ars...@ar...
> >Subject: Re: [Arsperl-users] REmedy problem
> >Date: Wed, 8 Jun 2005 11:04:16 -0500
> >
> >Amen,
> >
> >Make sure your script always exits with status zero.
> >exit(0);
> >If you do not exit with a status of zero then the ARS server will=20
> >throw an exception.
> >
> >print anything to STDOUT that you want to to end up in the field.
> >
> >A simple example would be:
> >#! /usr/bin/perl
> >print "The fields new value is this whole string"; exit(0);
> >
> >
> >Also .. in the filter.. make sure you fully qualify the path to the=20
> >perl script and maybe even perl itself.
> >
> >/path/to/myscript/junk.pl
> >
> >or maybe...
> >
> >/usr/bin/perl /path/to/myscript/junk.pl
> >
> >
> >You can also run Filter logs and check the arerror.log for more=20
> >details on what the ARS server is seeing from the script too.
> >
> >Hope that helps.
> >
> >--
> >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.
> >
> >http://www.fellowshipchurch.com
> >
> >On 6/8/05, Amen Asemota <aas...@ho...> wrote:
> > > Hi,
> > >
> > > I am trying to run a perl script in a filter but i keep getting=20
> > > ARERR
> >[38]
> > > Filter/escalation 'set field' process returned an error.
> > >
> > > Iam trying to use the $PROCESS$ command to set a field . Please =
help..
> > >
> > > _________________________________________________________________
> > > Express yourself instantly with MSN Messenger! Download today it's
>FREE!
> > > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> > >
> > >
> > >
> > > -------------------------------------------------------
> > > This SF.Net email is sponsored by: NEC IT Guy Games. How far can=20
> > > you
> >shotput
> > > a projector? How fast can you ride your desk chair down the office
>luge
> >track?
> > > If you want to score the big prize, get to know the little guy.
> > > Play to win an NEC 61" plasma display:=20
> > > http://www.necitguy.com/?r=3D20=20
> > > _______________________________________________
> > > Arsperl-users mailing list
> > > Ars...@ar...
> > > https://lists.sourceforge.net/lists/listinfo/arsperl-users
> > >
> >
> >
> >
> >-------------------------------------------------------
> >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you =
> >shotput a projector? How fast can you ride your desk chair down the=20
> >office luge track?
> >If you want to score the big prize, get to know the little guy.
> >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> >_______________________________________________
> >Arsperl-users mailing list
> >Ars...@ar...
> >https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>_________________________________________________________________
>Express yourself instantly with MSN Messenger! Download today it's =
FREE!
>http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you=20
>shotput a projector? How fast can you ride your desk chair down the=20
>office luge track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=3D20=20
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you=20
>shotput a projector? How fast can you ride your desk chair down the=20
>office luge track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=3D20=20
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE! =
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
-------------------------------------------------------
This SF.Net email is sponsored by: NEC IT Guy Games. How far can you =
shotput a projector? How fast can you ride your desk chair down the =
office luge track?
If you want to score the big prize, get to know the little guy. =20
Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=3D20 =
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users
|
|
From: Amen A. <aas...@ho...> - 2005-06-09 15:53:03
|
Yes it does it prints out the word "Sent" and it also creates a txt file
which we also need.
Amen.
>From: Steve McDonald <ste...@ch...>
>Reply-To: ars...@ar...
>To: ars...@ar...
>Subject: RE: [Arsperl-users] REmedy problem
>Date: Thu, 09 Jun 2005 08:20:22 -0700
>
>Does this script work from the command line?
>
>-----Original Message-----
>From: ars...@ar...
>[mailto:ars...@ar...] On Behalf Of Amen Asemota
>Sent: Thursday, June 09, 2005 6:42 AM
>To: ars...@ar...
>Subject: Re: [Arsperl-users] REmedy problem
>
>Hi Carey and Steve,
>
>Here is my Code :
>
>#!/usr/bin/perl
>
>#use strict 'vars';
>my $status = "Active";
>my $count3 = 0;
>my $countDTR = 0;
>my @save_DTR;
>my @save_entry;
>my @save_type;
>my @save_PartNumber;
>my @save_ProductName;
>my @save_qty;
>my @save_unitCost;
>my @save_ExtendedCost;
>my $save_filename;
>my $DTR = "DTR";
>my $flag = 1;
>my $flag2 = "Sent" ;
>
>use arControl;
>my $server = $arControl::SERVER;
>my $username = $arControl::USERNAME;
>my $pw = $arControl::PW;
>use ARS;
>#open(TXT,">datafile.txt") ||die printf "unable to open flat file\n";
>
># text file opened
>#printf "The datafile has been opened\n";
>$ctrl = ars_Login($server,$username,$pw)||die printf "AR Server login
>Error\n";
>#$query = "'650001031' != \$NULL\$";
>#my $query = "'Assigned To' != \$NULL\$";
>my $query = "'PO Flag?'!= \$NULL\$";
>my $qual = ars_LoadQualifier($ctrl, "Schema",$query);
>if(!defined($qual))
>{
> $error = "Unable to create Schema Load qualifier
>$ars_errstr";
>}
>
># created the qualifier
>#printf "Qualifier has been created\n";
>%firstentry = ars_GetListEntry($ctrl,"Schema",$qual,0);
>#getting DTR numbers
>#printf "DTR numbers being retrieved\n";
>foreach $entryId (sort keys %firstentry)
>{
> %firstvalue = ars_GetEntry($ctrl,"Schema", $entryId,
>650001006);
> foreach $entryId (sort keys %firstvalue)
> {
> $save_DTR{$countDTR} = $firstvalue{650001006};
> $save_entry{$countDTR} = $entryId;
># printf $save_DTR{$countDTR};
> $countDTR++;
> }
>}
>#printf("DTR count=%d\n",$countDTR);
># creating the header file
>print TXT "H","0001","0000000","000000","000","0000000000";
>print TXT "00000","00000","00000000";
># Retrieving the Items for this DTR table
>
>$qualb = ars_LoadQualifier($ctrl,"Schema2", "1=1");
>if(!defined($qualb))
> {
> $error = "Unable to create Schema2 Load qual
>ifier $ars_errstr";
> }
>for($count3 = 0; $count3 < $countDTR; $count3++)
>{# printf("next DTR=%s\n",$save_DTR{$count3});
>$save_filename = $DTR.$save_DTR{$count3};
>open(TXT,">$save_filename.txt") ||die printf "unable to open flat file\n";
>#printf($save_filename, "\n");
>%second = ars_GetListEntry($ctrl,"Schema2",$qualb, 0);
>my $allHWSW=0;
>my $prtHWSW=0;
>
>foreach $entryId(sort keys %second)
>{ $allHWSW++;
> #Gets table information
> %secondvalue = ars_GetEntry($ctrl,"Schema2",$entryId,
>650008002,8,7,650008003,650008007,
> 650008016,650008005,650008004,650008015);
> if(($secondvalue{650008002} eq $save_DTR{$count3}) &&
>(($secondvalue{6500
>08015} == 0) && ($secondvalue{7} == 0)))
> { $prtHWSW++;
> $save_type{$count3}= $secondvalue{8};
> $save_PartNumber{$count3} = $secondvalue{650008003};
> $save_ProductName{$count3} = $secondvalue{650008007};
> $save_qty{$count3} = $secondvalue{650008016};
> $save_unitCost{$count3} = $secondvalue{650008005};
> $save_extendedCost{$count3} = $secondvalue{650008004};
> $save_WO{$count3} = $secondvalue{650008015};
> $save_Status{$count3} = $secondvalue{7};
> #send items to file
> print TXT $save_DTR{$count3};
> print TXT "L","0001","0000000","000000","000","0";
> print TXT $save_type{$count3};
> print TXT $save_PartNumber{$count3};
> print TXT $save_ProductName{$count3}," ";
> print TXT $save_qty{$count3}," ";
> print TXT $save_unitCost{$count3}," ";
> print TXT $save_extendedCost{$count3};
> #$count3++;
> }
> }
>#printf(" allHWSW=%d prtHWSW=%d\n",$allHWSW,$prtHWSW);
>close(TXT);
>}
>
>#close(TXT);
>ars_Logoff($ctrl);
>print "Sent \n";
>exit(0);
>
>
>
>
>Then in the Remedy filter i enter the process $PROCESS$ /path/file.pl
>because I want it to Set a text field in the filter to "Sent". With the
>exit(0), I am still getting the same error msg. This script compiles with
>no
>
>problem in Unix and it prints out Sent to the STDOUT but when I use it in
>the set field it keep getting the error ARERR [38] Filter/escalation 'set
>field' process returned an error.
>
>
>
>Thanks.
>
>Amen.
>
> >From: Carey Matthew Black <bla...@gm...>
> >Reply-To: ars...@ar...
> >To: ars...@ar...
> >Subject: Re: [Arsperl-users] REmedy problem
> >Date: Wed, 8 Jun 2005 11:04:16 -0500
> >
> >Amen,
> >
> >Make sure your script always exits with status zero.
> >exit(0);
> >If you do not exit with a status of zero then the ARS server will
> >throw an exception.
> >
> >print anything to STDOUT that you want to to end up in the field.
> >
> >A simple example would be:
> >#! /usr/bin/perl
> >print "The fields new value is this whole string";
> >exit(0);
> >
> >
> >Also .. in the filter.. make sure you fully qualify the path to the
> >perl script and maybe even perl itself.
> >
> >/path/to/myscript/junk.pl
> >
> >or maybe...
> >
> >/usr/bin/perl /path/to/myscript/junk.pl
> >
> >
> >You can also run Filter logs and check the arerror.log for more
> >details on what the ARS server is seeing from the script too.
> >
> >Hope that helps.
> >
> >--
> >Carey Matthew Black
> >Remedy Skilled Professional (RSP)
> >ARS = Action Request System(Remedy)
> >
> >Solution = People + Process + Tools
> >Fast, Accurate, Cheap.... Pick two.
> >Never ascribe to malice, that which can be explained by incompetence.
> >
> >http://www.fellowshipchurch.com
> >
> >On 6/8/05, Amen Asemota <aas...@ho...> wrote:
> > > Hi,
> > >
> > > I am trying to run a perl script in a filter but i keep getting ARERR
> >[38]
> > > Filter/escalation 'set field' process returned an error.
> > >
> > > Iam trying to use the $PROCESS$ command to set a field . Please help..
> > >
> > > _________________________________________________________________
> > > Express yourself instantly with MSN Messenger! Download today it's
>FREE!
> > > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> > >
> > >
> > >
> > > -------------------------------------------------------
> > > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> >shotput
> > > a projector? How fast can you ride your desk chair down the office
>luge
> >track?
> > > If you want to score the big prize, get to know the little guy.
> > > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> > > _______________________________________________
> > > Arsperl-users mailing list
> > > Ars...@ar...
> > > https://lists.sourceforge.net/lists/listinfo/arsperl-users
> > >
> >
> >
> >
> >-------------------------------------------------------
> >This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
> >shotput
> >a projector? How fast can you ride your desk chair down the office luge
> >track?
> >If you want to score the big prize, get to know the little guy.
> >Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
> >_______________________________________________
> >Arsperl-users mailing list
> >Ars...@ar...
> >https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>_________________________________________________________________
>Express yourself instantly with MSN Messenger! Download today it's FREE!
>http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
>a projector? How fast can you ride your desk chair down the office luge
>track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
>a projector? How fast can you ride your desk chair down the office luge
>track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE!
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
|
|
From: Steve M. <ste...@ch...> - 2005-06-09 15:22:06
|
Does this script work from the command line?
-----Original Message-----
From: ars...@ar...
[mailto:ars...@ar...] On Behalf Of Amen Asemota
Sent: Thursday, June 09, 2005 6:42 AM
To: ars...@ar...
Subject: Re: [Arsperl-users] REmedy problem
Hi Carey and Steve,
Here is my Code :
#!/usr/bin/perl
#use strict 'vars';
my $status = "Active";
my $count3 = 0;
my $countDTR = 0;
my @save_DTR;
my @save_entry;
my @save_type;
my @save_PartNumber;
my @save_ProductName;
my @save_qty;
my @save_unitCost;
my @save_ExtendedCost;
my $save_filename;
my $DTR = "DTR";
my $flag = 1;
my $flag2 = "Sent" ;
use arControl;
my $server = $arControl::SERVER;
my $username = $arControl::USERNAME;
my $pw = $arControl::PW;
use ARS;
#open(TXT,">datafile.txt") ||die printf "unable to open flat file\n";
# text file opened
#printf "The datafile has been opened\n";
$ctrl = ars_Login($server,$username,$pw)||die printf "AR Server login
Error\n";
#$query = "'650001031' != \$NULL\$";
#my $query = "'Assigned To' != \$NULL\$";
my $query = "'PO Flag?'!= \$NULL\$";
my $qual = ars_LoadQualifier($ctrl, "Schema",$query);
if(!defined($qual))
{
$error = "Unable to create Schema Load qualifier
$ars_errstr";
}
# created the qualifier
#printf "Qualifier has been created\n";
%firstentry = ars_GetListEntry($ctrl,"Schema",$qual,0);
#getting DTR numbers
#printf "DTR numbers being retrieved\n";
foreach $entryId (sort keys %firstentry)
{
%firstvalue = ars_GetEntry($ctrl,"Schema", $entryId,
650001006);
foreach $entryId (sort keys %firstvalue)
{
$save_DTR{$countDTR} = $firstvalue{650001006};
$save_entry{$countDTR} = $entryId;
# printf $save_DTR{$countDTR};
$countDTR++;
}
}
#printf("DTR count=%d\n",$countDTR);
# creating the header file
print TXT "H","0001","0000000","000000","000","0000000000";
print TXT "00000","00000","00000000";
# Retrieving the Items for this DTR table
$qualb = ars_LoadQualifier($ctrl,"Schema2", "1=1");
if(!defined($qualb))
{
$error = "Unable to create Schema2 Load qual
ifier $ars_errstr";
}
for($count3 = 0; $count3 < $countDTR; $count3++)
{# printf("next DTR=%s\n",$save_DTR{$count3});
$save_filename = $DTR.$save_DTR{$count3};
open(TXT,">$save_filename.txt") ||die printf "unable to open flat file\n";
#printf($save_filename, "\n");
%second = ars_GetListEntry($ctrl,"Schema2",$qualb, 0);
my $allHWSW=0;
my $prtHWSW=0;
foreach $entryId(sort keys %second)
{ $allHWSW++;
#Gets table information
%secondvalue = ars_GetEntry($ctrl,"Schema2",$entryId,
650008002,8,7,650008003,650008007,
650008016,650008005,650008004,650008015);
if(($secondvalue{650008002} eq $save_DTR{$count3}) &&
(($secondvalue{6500
08015} == 0) && ($secondvalue{7} == 0)))
{ $prtHWSW++;
$save_type{$count3}= $secondvalue{8};
$save_PartNumber{$count3} = $secondvalue{650008003};
$save_ProductName{$count3} = $secondvalue{650008007};
$save_qty{$count3} = $secondvalue{650008016};
$save_unitCost{$count3} = $secondvalue{650008005};
$save_extendedCost{$count3} = $secondvalue{650008004};
$save_WO{$count3} = $secondvalue{650008015};
$save_Status{$count3} = $secondvalue{7};
#send items to file
print TXT $save_DTR{$count3};
print TXT "L","0001","0000000","000000","000","0";
print TXT $save_type{$count3};
print TXT $save_PartNumber{$count3};
print TXT $save_ProductName{$count3}," ";
print TXT $save_qty{$count3}," ";
print TXT $save_unitCost{$count3}," ";
print TXT $save_extendedCost{$count3};
#$count3++;
}
}
#printf(" allHWSW=%d prtHWSW=%d\n",$allHWSW,$prtHWSW);
close(TXT);
}
#close(TXT);
ars_Logoff($ctrl);
print "Sent \n";
exit(0);
Then in the Remedy filter i enter the process $PROCESS$ /path/file.pl
because I want it to Set a text field in the filter to "Sent". With the
exit(0), I am still getting the same error msg. This script compiles with no
problem in Unix and it prints out Sent to the STDOUT but when I use it in
the set field it keep getting the error ARERR [38] Filter/escalation 'set
field' process returned an error.
Thanks.
Amen.
>From: Carey Matthew Black <bla...@gm...>
>Reply-To: ars...@ar...
>To: ars...@ar...
>Subject: Re: [Arsperl-users] REmedy problem
>Date: Wed, 8 Jun 2005 11:04:16 -0500
>
>Amen,
>
>Make sure your script always exits with status zero.
>exit(0);
>If you do not exit with a status of zero then the ARS server will
>throw an exception.
>
>print anything to STDOUT that you want to to end up in the field.
>
>A simple example would be:
>#! /usr/bin/perl
>print "The fields new value is this whole string";
>exit(0);
>
>
>Also .. in the filter.. make sure you fully qualify the path to the
>perl script and maybe even perl itself.
>
>/path/to/myscript/junk.pl
>
>or maybe...
>
>/usr/bin/perl /path/to/myscript/junk.pl
>
>
>You can also run Filter logs and check the arerror.log for more
>details on what the ARS server is seeing from the script too.
>
>Hope that helps.
>
>--
>Carey Matthew Black
>Remedy Skilled Professional (RSP)
>ARS = Action Request System(Remedy)
>
>Solution = People + Process + Tools
>Fast, Accurate, Cheap.... Pick two.
>Never ascribe to malice, that which can be explained by incompetence.
>
>http://www.fellowshipchurch.com
>
>On 6/8/05, Amen Asemota <aas...@ho...> wrote:
> > Hi,
> >
> > I am trying to run a perl script in a filter but i keep getting ARERR
>[38]
> > Filter/escalation 'set field' process returned an error.
> >
> > Iam trying to use the $PROCESS$ command to set a field . Please help..
> >
> > _________________________________________________________________
> > Express yourself instantly with MSN Messenger! Download today it's FREE!
> > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> >
> >
> >
> > -------------------------------------------------------
> > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
> > a projector? How fast can you ride your desk chair down the office luge
>track?
> > If you want to score the big prize, get to know the little guy.
> > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> > _______________________________________________
> > Arsperl-users mailing list
> > Ars...@ar...
> > https://lists.sourceforge.net/lists/listinfo/arsperl-users
> >
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
>a projector? How fast can you ride your desk chair down the office luge
>track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE!
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
-------------------------------------------------------
This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
shotput
a projector? How fast can you ride your desk chair down the office luge
track?
If you want to score the big prize, get to know the little guy.
Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users
|
|
From: Amen A. <aas...@ho...> - 2005-06-09 13:43:07
|
Hi Carey and Steve,
Here is my Code :
#!/usr/bin/perl
#use strict 'vars';
my $status = "Active";
my $count3 = 0;
my $countDTR = 0;
my @save_DTR;
my @save_entry;
my @save_type;
my @save_PartNumber;
my @save_ProductName;
my @save_qty;
my @save_unitCost;
my @save_ExtendedCost;
my $save_filename;
my $DTR = "DTR";
my $flag = 1;
my $flag2 = "Sent" ;
use arControl;
my $server = $arControl::SERVER;
my $username = $arControl::USERNAME;
my $pw = $arControl::PW;
use ARS;
#open(TXT,">datafile.txt") ||die printf "unable to open flat file\n";
# text file opened
#printf "The datafile has been opened\n";
$ctrl = ars_Login($server,$username,$pw)||die printf "AR Server login
Error\n";
#$query = "'650001031' != \$NULL\$";
#my $query = "'Assigned To' != \$NULL\$";
my $query = "'PO Flag?'!= \$NULL\$";
my $qual = ars_LoadQualifier($ctrl, "Schema",$query);
if(!defined($qual))
{
$error = "Unable to create Schema Load qualifier
$ars_errstr";
}
# created the qualifier
#printf "Qualifier has been created\n";
%firstentry = ars_GetListEntry($ctrl,"Schema",$qual,0);
#getting DTR numbers
#printf "DTR numbers being retrieved\n";
foreach $entryId (sort keys %firstentry)
{
%firstvalue = ars_GetEntry($ctrl,"Schema", $entryId,
650001006);
foreach $entryId (sort keys %firstvalue)
{
$save_DTR{$countDTR} = $firstvalue{650001006};
$save_entry{$countDTR} = $entryId;
# printf $save_DTR{$countDTR};
$countDTR++;
}
}
#printf("DTR count=%d\n",$countDTR);
# creating the header file
print TXT "H","0001","0000000","000000","000","0000000000";
print TXT "00000","00000","00000000";
# Retrieving the Items for this DTR table
$qualb = ars_LoadQualifier($ctrl,"Schema2", "1=1");
if(!defined($qualb))
{
$error = "Unable to create Schema2 Load qual
ifier $ars_errstr";
}
for($count3 = 0; $count3 < $countDTR; $count3++)
{# printf("next DTR=%s\n",$save_DTR{$count3});
$save_filename = $DTR.$save_DTR{$count3};
open(TXT,">$save_filename.txt") ||die printf "unable to open flat file\n";
#printf($save_filename, "\n");
%second = ars_GetListEntry($ctrl,"Schema2",$qualb, 0);
my $allHWSW=0;
my $prtHWSW=0;
foreach $entryId(sort keys %second)
{ $allHWSW++;
#Gets table information
%secondvalue = ars_GetEntry($ctrl,"Schema2",$entryId,
650008002,8,7,650008003,650008007,
650008016,650008005,650008004,650008015);
if(($secondvalue{650008002} eq $save_DTR{$count3}) &&
(($secondvalue{6500
08015} == 0) && ($secondvalue{7} == 0)))
{ $prtHWSW++;
$save_type{$count3}= $secondvalue{8};
$save_PartNumber{$count3} = $secondvalue{650008003};
$save_ProductName{$count3} = $secondvalue{650008007};
$save_qty{$count3} = $secondvalue{650008016};
$save_unitCost{$count3} = $secondvalue{650008005};
$save_extendedCost{$count3} = $secondvalue{650008004};
$save_WO{$count3} = $secondvalue{650008015};
$save_Status{$count3} = $secondvalue{7};
#send items to file
print TXT $save_DTR{$count3};
print TXT "L","0001","0000000","000000","000","0";
print TXT $save_type{$count3};
print TXT $save_PartNumber{$count3};
print TXT $save_ProductName{$count3}," ";
print TXT $save_qty{$count3}," ";
print TXT $save_unitCost{$count3}," ";
print TXT $save_extendedCost{$count3};
#$count3++;
}
}
#printf(" allHWSW=%d prtHWSW=%d\n",$allHWSW,$prtHWSW);
close(TXT);
}
#close(TXT);
ars_Logoff($ctrl);
print "Sent \n";
exit(0);
Then in the Remedy filter i enter the process $PROCESS$ /path/file.pl
because I want it to Set a text field in the filter to "Sent". With the
exit(0), I am still getting the same error msg. This script compiles with no
problem in Unix and it prints out Sent to the STDOUT but when I use it in
the set field it keep getting the error ARERR [38] Filter/escalation 'set
field' process returned an error.
Thanks.
Amen.
>From: Carey Matthew Black <bla...@gm...>
>Reply-To: ars...@ar...
>To: ars...@ar...
>Subject: Re: [Arsperl-users] REmedy problem
>Date: Wed, 8 Jun 2005 11:04:16 -0500
>
>Amen,
>
>Make sure your script always exits with status zero.
>exit(0);
>If you do not exit with a status of zero then the ARS server will
>throw an exception.
>
>print anything to STDOUT that you want to to end up in the field.
>
>A simple example would be:
>#! /usr/bin/perl
>print "The fields new value is this whole string";
>exit(0);
>
>
>Also .. in the filter.. make sure you fully qualify the path to the
>perl script and maybe even perl itself.
>
>/path/to/myscript/junk.pl
>
>or maybe...
>
>/usr/bin/perl /path/to/myscript/junk.pl
>
>
>You can also run Filter logs and check the arerror.log for more
>details on what the ARS server is seeing from the script too.
>
>Hope that helps.
>
>--
>Carey Matthew Black
>Remedy Skilled Professional (RSP)
>ARS = Action Request System(Remedy)
>
>Solution = People + Process + Tools
>Fast, Accurate, Cheap.... Pick two.
>Never ascribe to malice, that which can be explained by incompetence.
>
>http://www.fellowshipchurch.com
>
>On 6/8/05, Amen Asemota <aas...@ho...> wrote:
> > Hi,
> >
> > I am trying to run a perl script in a filter but i keep getting ARERR
>[38]
> > Filter/escalation 'set field' process returned an error.
> >
> > Iam trying to use the $PROCESS$ command to set a field . Please help..
> >
> > _________________________________________________________________
> > Express yourself instantly with MSN Messenger! Download today it's FREE!
> > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
> >
> >
> >
> > -------------------------------------------------------
> > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
> > a projector? How fast can you ride your desk chair down the office luge
>track?
> > If you want to score the big prize, get to know the little guy.
> > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> > _______________________________________________
> > Arsperl-users mailing list
> > Ars...@ar...
> > https://lists.sourceforge.net/lists/listinfo/arsperl-users
> >
>
>
>
>-------------------------------------------------------
>This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
>shotput
>a projector? How fast can you ride your desk chair down the office luge
>track?
>If you want to score the big prize, get to know the little guy.
>Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
>_______________________________________________
>Arsperl-users mailing list
>Ars...@ar...
>https://lists.sourceforge.net/lists/listinfo/arsperl-users
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE!
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
|
|
From: Martin, J. H <jas...@ci...> - 2005-06-08 17:19:58
|
I'm having an installation issue with ARSPerl-1.83 on which I was hoping
for some insight. I'm compiling on Linux (RH7.3) against API version 10
(as defined in ar.h). There are no errors during the Makefile.PL or
make phases, but 'make test' fails because it can't locate the
autosplit.ix file. That file does not exist anywhere in the build tree
after the make.
I've included the build and make test output below. Does anyone have any
recommendations on how to proceed?
Thanks,
-Jason Martin
# perl Makefile.PL
Building against perl 5.006001
Generating support.h file..
Processing AR_STRUCT_ITEM codes..
Processing AR_SERVER_STAT codes..
Processing AR_SCHEMA codes..
Processing AR_COM_PARM codes..
Processing AR_COM_METHOD codes..
Processing AR_ACTIVE_LINK_ACTION codes..
Processing AR_CHAR_MENU codes..
Processing AR_FILTER_ACTION codes..
Processing AR_MENU_REFRESH codes..
Processing AR_PERMISSIONS (Schema) codes..
Processing AR_PERMISSIONS (Field) codes..
Processing AR_DATA_TYPE codes..
Processing AR_BYTE_LIST codes..
Processing AR_NO_MATCH codes..
Processing AR_MULTI_MATCH codes..
Processing AR_RETURN codes..
Processing AR_FUNCTION codes..
Processing AR_KEYWORD codes..
Processing AR_SERVER_INFO codes..
Generating serverTypeInfoHints.h ..
Converting C header files to perl modules ..
Configuring with options:
ARSVERSION =3D 6.30
ARSAPI =3D /home/jhmartin/api
AUTODEFINES =3D -g -DARS32 -DARS452 -malign-double
-DPERL_PATCHLEVEL_IS=3D6 -DPERL_SUBVERSION_IS=3D1 -DPERL_BASEREV_IS=3D50
Checking if your kit is complete...
Looks good
Writing Makefile for ARS
=3D=3D=3D ARSperl 'make test' configuration. =3D=3D=3D
Please enter the following information. This information will be
recorded in ./t/config.cache
If you want to skip the 'make test' step, just hit ENTER
three times. You can configure it later by either re-running
'perl Makefile.PL' or by editting ./t/config.cache
Fair warning: you probably don't want to run 'make test' against a
production ARSystem server.
Server Name []: XXX
Admin Username []: YYY
Admin Password []: ZZZ
Type 'make' (windows: 'nmake') to build ARSperl.
Type 'make test' to test ARSperl before installing.
Type 'make install' to install ARSperl.
# make
cp artypes.ph blib/lib/artypes.ph
/usr/bin/perl -I/usr/lib/perl5/5.6.1/i386-linux -I/usr/lib/perl5/5.6.1
/usr/lib/perl5/5.6.1/ExtUtils/xsubpp -typemap
/usr/lib/perl5/5.6.1/ExtUtils/typemap -typemap typemap ARS.xs > ARS.xsc
&& mv ARS.xsc ARS.c
gcc -c -I/home/jhmartin/api/include -fno-strict-aliasing
-I/usr/local/include -O2 -march=3Di386 -mcpu=3Di686 =
-DVERSION=3D\"1.83\"
-DXS_VERSION=3D\"1.83\" -fPIC -I/usr/lib/perl5/5.6.1/i386-linux/CORE -g
-DARS32 -DARS452 -malign-double -DPERL_PATCHLEVEL_IS=3D6
-DPERL_SUBVERSION_IS=3D1 -DPERL_BASEREV_IS=3D50 ARS.c
gcc -c -I/home/jhmartin/api/include -fno-strict-aliasing
-I/usr/local/include -O2 -march=3Di386 -mcpu=3Di686 =
-DVERSION=3D\"1.83\"
-DXS_VERSION=3D\"1.83\" -fPIC -I/usr/lib/perl5/5.6.1/i386-linux/CORE -g
-DARS32 -DARS452 -malign-double -DPERL_PATCHLEVEL_IS=3D6
-DPERL_SUBVERSION_IS=3D1 -DPERL_BASEREV_IS=3D50 support.c
gcc -c -I/home/jhmartin/api/include -fno-strict-aliasing
-I/usr/local/include -O2 -march=3Di386 -mcpu=3Di686 =
-DVERSION=3D\"1.83\"
-DXS_VERSION=3D\"1.83\" -fPIC -I/usr/lib/perl5/5.6.1/i386-linux/CORE -g
-DARS32 -DARS452 -malign-double -DPERL_PATCHLEVEL_IS=3D6
-DPERL_SUBVERSION_IS=3D1 -DPERL_BASEREV_IS=3D50 supportrev.c
Running Mkbootstrap for ARS ()
chmod 644 ARS.bs
rm -f blib/arch/auto/ARS/ARS.so
LD_RUN_PATH=3D"/lib" gcc -shared -L/usr/local/lib ARS.o support.o
supportrev.o /home/jhmartin/api/lib/libar.a -o
blib/arch/auto/ARS/ARS.so -L/home/jhmartin/api/lib -lpthread
chmod 755 blib/arch/auto/ARS/ARS.so
cp ARS.bs blib/arch/auto/ARS/ARS.bs
chmod 644 blib/arch/auto/ARS/ARS.bs
# make test
PERL_DL_NONLAZY=3D1 /usr/bin/perl -Iblib/arch -Iblib/lib
-I/usr/lib/perl5/5.6.1/i386-linux -I/usr/lib/perl5/5.6.1 -e 'use
Test::Harness qw(&runtests $verbose); $verbose=3D0; runtests @ARGV;' =
t/*.t
t/00connect.........Can't locate auto/ARS/autosplit.ix in @INC (@INC
contains: blib/arch blib/lib /usr/lib/perl5/5.6.1/i386-linux
/usr/lib/perl5/5.6.1/i386-linux /usr/lib/perl5/5.6.1/i386-linux
/usr/lib/perl5/5.6.1 /usr/lib/perl5/5.6.1/i386-linux
/usr/lib/perl5/5.6.1/i386-linux /usr/lib/perl5/5.6.1
/usr/lib/perl5/site_perl/5.6.1/i386-linux
/usr/lib/perl5/site_perl/5.6.1/i386-linux /usr/lib/perl5/site_perl/5.6.1
/usr/lib/perl5/site_perl/5.6.0 /usr/lib/perl5/site_perl/5.6.1/i386-linux
/usr/lib/perl5/site_perl/5.6.1 /usr/lib/perl5/site_perl/5.6.0
/usr/lib/perl5/site_perl /usr/lib/perl5/vendor_perl/5.6.1/i386-linux
/usr/lib/perl5/vendor_perl/5.6.1/i386-linux
/usr/lib/perl5/vendor_perl/5.6.1
/usr/lib/perl5/vendor_perl/5.6.1/i386-linux
/usr/lib/perl5/vendor_perl/5.6.1 /usr/lib/perl5/vendor_perl .
/usr/lib/perl5/5.6.1/i386-linux /usr/lib/perl5/5.6.1
/usr/lib/perl5/site_perl/5.6.1/i386-linux /usr/lib/perl5/site_perl/5.6.1
/usr/lib/perl5/site_perl/5.6.0 /usr/lib/perl5/site_perl
/usr/lib/perl5/vendor_perl/5.6.1/i386-linux
/usr/lib/perl5/vendor_perl/5.6.1 /usr/lib/perl5/vendor_perl .) at
/usr/lib/perl5/5.6.1/AutoLoader.pm line 146.
at ARS.pm line 64
make: *** [test_dynamic] Interrupt
# find ./blib -ls
261854 4 drwxr-xr-x 4 root root 4096 Jun 8 09:43
./blib
261855 4 drwxr-xr-x 3 root root 4096 Jun 8 09:43
./blib/lib
261856 0 -rw-r--r-- 1 root root 0 Apr 1 2002
./blib/lib/.exists
261861 4 drwxr-xr-x 3 root root 4096 Jun 8 09:43
./blib/lib/auto
261862 4 drwxr-xr-x 2 root root 4096 Jun 8 09:43
./blib/lib/auto/ARS
261863 0 -rw-r--r-- 1 root root 0 Apr 1 2002
./blib/lib/auto/ARS/.exists
261864 4 -r--r--r-- 1 root root 46 Jun 8 09:43
./blib/lib/artypes.ph
261857 4 drwxr-xr-x 3 root root 4096 Jun 8 09:43
./blib/arch
261858 4 drwxr-xr-x 3 root root 4096 Jun 8 09:43
./blib/arch/auto
261859 4 drwxr-xr-x 2 root root 4096 Jun 8 09:44
./blib/arch/auto/ARS
261860 0 -rw-r--r-- 1 root root 0 Apr 1 2002
./blib/arch/auto/ARS/.exists
261865 2636 -rwxr-xr-x 1 root root 2693619 Jun 8 09:44
./blib/arch/auto/ARS/ARS.so
261866 0 -rw-r--r-- 1 root root 0 Jun 8 09:44
./blib/arch/auto/ARS/ARS.bs
# make install
Installing /usr/lib/perl5/site_perl/5.6.1/i386-linux/auto/ARS/ARS.so
Installing /usr/lib/perl5/site_perl/5.6.1/i386-linux/auto/ARS/ARS.bs
Files found in blib/arch: installing files in blib/lib into architecture
dependent library tree
Writing /usr/lib/perl5/site_perl/5.6.1/i386-linux/auto/ARS/.packlist
Appending installation info to
/usr/lib/perl5/5.6.1/i386-linux/perllocal.pod
|
|
From: Sprenger, J. : CO I. <JSp...@LH...> - 2005-06-08 17:17:58
|
I think I got this... thanks anyway
-----Original Message-----
From: ars...@ar...
[mailto:ars...@ar...]On Behalf Of Sprenger, Janie :
CO IR
Sent: Wednesday, June 08, 2005 10:09 AM
To: ars...@ar...
Subject: RE: [Arsperl-users] Perl Script to parse Work Log/Audit Logs
Hi Carey
Get_Diary will work. I've been able to modify it so far so it looks like I
need it to.
It's been a long time since I've worked directly with Perl so I was
wondering if you could shed some light on chomping character returns.
Specifically in the line:
print $diary_entry->{value};
This will have carriage returns but I'd like to replace those with something
else so it doesn't break the line.
Any ideas on how to do this?
thanks a million
Janie
-----Original Message-----
From: ars...@ar...
[mailto:ars...@ar...]On Behalf Of Carey Matthew Black
Sent: Wednesday, June 08, 2005 8:52 AM
To: ars...@ar...
Subject: Re: [Arsperl-users] Perl Script to parse Work Log/Audit Logs
Janie,
Have you reviewed the Get_Diary.pl script in the \example directory of
the ARSPerl source?
--
Carey Matthew Black
Remedy Skilled Professional (RSP)
ARS = Action Request System(Remedy)
Solution = People + Process + Tools
Fast, Accurate, Cheap.... Pick two.
Never ascribe to malice, that which can be explained by incompetence.
http://www.fellowshipchurch.com
On 6/8/05, Sprenger, Janie : CO IR <JSp...@lh...> wrote:
> Does anyone have any perl scripts they would be willing to share (or know
of
> any place to find),
> scripts that parse an audit log between the Timestamps in that log?
>
>
> Thanks--really!
>
> Janie Sprenger
> Remedy Administrator
> Legacy Health System
> 503-415-5826
> jsp...@lh...
-------------------------------------------------------
This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
shotput
a projector? How fast can you ride your desk chair down the office luge
track?
If you want to score the big prize, get to know the little guy.
Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users
IMPORTANT NOTICE: This communication, including any attachment, contains
information that may be confidential or privileged, and is intended solely
for the entity or individual to whom it is addressed. If you are not the
intended recipient, you should contact the sender and delete the message.
Any unauthorized disclosure, copying, or distribution of this message is
strictly prohibited. Nothing in this email, including any attachment, is
intended to be a legally binding signature.
-------------------------------------------------------
This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
shotput
a projector? How fast can you ride your desk chair down the office luge
track?
If you want to score the big prize, get to know the little guy.
Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users
IMPORTANT NOTICE: This communication, including any attachment, contains
information that may be confidential or privileged, and is intended solely
for the entity or individual to whom it is addressed. If you are not the
intended recipient, you should contact the sender and delete the message.
Any unauthorized disclosure, copying, or distribution of this message is
strictly prohibited. Nothing in this email, including any attachment, is
intended to be a legally binding signature.
|
|
From: Kelly L. <kel...@ra...> - 2005-06-08 17:17:01
|
Stanislaw, If I can interject on the matter of semantics; "professional" implies only that one is paid for ones efforts, "skilled" implies that one has attained some level of mastery in a field. ;^) Kelly Logan Cybernetic Solutions, Inc. (313) 586-8334 kel...@cy... -----Original Message----- From: ars...@ar... [mailto:ars...@ar...] On Behalf Of STANISLAW CHOLODNJAK, BLOOMBERG/ 731 LEXIN Sent: 06/08/2005 12:14 PM To: ars...@ar... Subject: Re: [Arsperl-users] REmedy problem Thanks Carey, btw doesn't word Professional implies 'Skilled'? :) ----- Original Message ----- From: Carey Matthew Black <ars...@ar...> At: 6/ 8 12:09 Stanislaw, $PROCESS$ events are "in line" or serial. So it happens in the context of the Setfield action itself and does not spawn a second "Modify" event. -- Carey Matthew Black Remedy Skilled Professional (RSP) ARS = Action Request System(Remedy) Solution = People + Process + Tools Fast, Accurate, Cheap.... Pick two. Never ascribe to malice, that which can be explained by incompetence. http://www.fellowshipchurch.com On 6/8/05, STANISLAW CHOLODNJAK, BLOOMBERG/ 731 LEXIN <SCH...@bl...> wrote: > If your filter is executed on 'Modify' and from this filter you run a > script that sets the field in this record, which in turn fires this > filter, aren't you > creating the infinite loop? > ----- Original Message ----- > From: Amen Asemota <ars...@ar...> > At: 6/ 8 11:55 > > Hi, > > I am trying to run a perl script in a filter but i keep getting ARERR > [38] Filter/escalation 'set field' process returned an error. > > Iam trying to use the $PROCESS$ command to set a field . Please help.. > > _________________________________________________________________ > Express yourself instantly with MSN Messenger! Download today it's > FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ > > > > ------------------------------------------------------- > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you > shotput a projector? How fast can you ride your desk chair down the > office luge track? If you want to score the big prize, get to know the > little guy. Play to win an NEC 61" plasma display: > http://www.necitguy.com/?r=20 > _______________________________________________ > Arsperl-users mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-users > > > > > > ------------------------------------------------------- > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you > shotput a projector? How fast can you ride your desk chair down the > office luge track? If you want to score the big prize, get to know the > little guy. Play to win an NEC 61" plasma display: > http://www.necitguy.com/?r=20 > _______________________________________________ > Arsperl-users mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-users > ------------------------------------------------------- This SF.Net email is sponsored by: NEC IT Guy Games. How far can you shotput a projector? How fast can you ride your desk chair down the office luge track? If you want to score the big prize, get to know the little guy. Play to win an NEC 61" plasma display: http://www.necitguy.com/?r _______________________________________________ Arsperl-users mailing list Ars...@ar... https://lists.sourceforge.net/lists/listinfo/arsperl-users ------------------------------------------------------- This SF.Net email is sponsored by: NEC IT Guy Games. How far can you shotput a projector? How fast can you ride your desk chair down the office luge track? If you want to score the big prize, get to know the little guy. Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20 _______________________________________________ Arsperl-users mailing list Ars...@ar... https://lists.sourceforge.net/lists/listinfo/arsperl-users |
|
From: Sprenger, J. : CO I. <JSp...@LH...> - 2005-06-08 17:09:02
|
Hi Carey
Get_Diary will work. I've been able to modify it so far so it looks like I
need it to.
It's been a long time since I've worked directly with Perl so I was
wondering if you could shed some light on chomping character returns.
Specifically in the line:
print $diary_entry->{value};
This will have carriage returns but I'd like to replace those with something
else so it doesn't break the line.
Any ideas on how to do this?
thanks a million
Janie
-----Original Message-----
From: ars...@ar...
[mailto:ars...@ar...]On Behalf Of Carey Matthew Black
Sent: Wednesday, June 08, 2005 8:52 AM
To: ars...@ar...
Subject: Re: [Arsperl-users] Perl Script to parse Work Log/Audit Logs
Janie,
Have you reviewed the Get_Diary.pl script in the \example directory of
the ARSPerl source?
--
Carey Matthew Black
Remedy Skilled Professional (RSP)
ARS = Action Request System(Remedy)
Solution = People + Process + Tools
Fast, Accurate, Cheap.... Pick two.
Never ascribe to malice, that which can be explained by incompetence.
http://www.fellowshipchurch.com
On 6/8/05, Sprenger, Janie : CO IR <JSp...@lh...> wrote:
> Does anyone have any perl scripts they would be willing to share (or know
of
> any place to find),
> scripts that parse an audit log between the Timestamps in that log?
>
>
> Thanks--really!
>
> Janie Sprenger
> Remedy Administrator
> Legacy Health System
> 503-415-5826
> jsp...@lh...
-------------------------------------------------------
This SF.Net email is sponsored by: NEC IT Guy Games. How far can you
shotput
a projector? How fast can you ride your desk chair down the office luge
track?
If you want to score the big prize, get to know the little guy.
Play to win an NEC 61" plasma display: http://www.necitguy.com/?r
_______________________________________________
Arsperl-users mailing list
Ars...@ar...
https://lists.sourceforge.net/lists/listinfo/arsperl-users
IMPORTANT NOTICE: This communication, including any attachment, contains
information that may be confidential or privileged, and is intended solely
for the entity or individual to whom it is addressed. If you are not the
intended recipient, you should contact the sender and delete the message.
Any unauthorized disclosure, copying, or distribution of this message is
strictly prohibited. Nothing in this email, including any attachment, is
intended to be a legally binding signature.
|
|
From: STANISLAW C. B. 7. L. <SCH...@bl...> - 2005-06-08 16:15:02
|
Thanks Carey, btw doesn't word Professional implies 'Skilled'? :) ----- Original Message ----- From: Carey Matthew Black <ars...@ar...> At: 6/ 8 12:09 Stanislaw, $PROCESS$ events are "in line" or serial. So it happens in the context of the Setfield action itself and does not spawn a second "Modify" event. -- Carey Matthew Black Remedy Skilled Professional (RSP) ARS = Action Request System(Remedy) Solution = People + Process + Tools Fast, Accurate, Cheap.... Pick two. Never ascribe to malice, that which can be explained by incompetence. http://www.fellowshipchurch.com On 6/8/05, STANISLAW CHOLODNJAK, BLOOMBERG/ 731 LEXIN <SCH...@bl...> wrote: > If your filter is executed on 'Modify' and from this filter you run a script > that sets the field in this record, which in turn fires this filter, aren't you > creating the infinite loop? > ----- Original Message ----- > From: Amen Asemota <ars...@ar...> > At: 6/ 8 11:55 > > Hi, > > I am trying to run a perl script in a filter but i keep getting ARERR [38] > Filter/escalation 'set field' process returned an error. > > Iam trying to use the $PROCESS$ command to set a field . Please help.. > > _________________________________________________________________ > Express yourself instantly with MSN Messenger! Download today it's FREE! > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ > > > > ------------------------------------------------------- > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you shotput > a projector? How fast can you ride your desk chair down the office luge track? > If you want to score the big prize, get to know the little guy. > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20 > _______________________________________________ > Arsperl-users mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-users > > > > > > ------------------------------------------------------- > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you shotput > a projector? How fast can you ride your desk chair down the office luge track? > If you want to score the big prize, get to know the little guy. > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20 > _______________________________________________ > Arsperl-users mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-users > ------------------------------------------------------- This SF.Net email is sponsored by: NEC IT Guy Games. How far can you shotput a projector? How fast can you ride your desk chair down the office luge track? If you want to score the big prize, get to know the little guy. Play to win an NEC 61" plasma display: http://www.necitguy.com/?r _______________________________________________ Arsperl-users mailing list Ars...@ar... https://lists.sourceforge.net/lists/listinfo/arsperl-users |
|
From: Carey M. B. <bla...@gm...> - 2005-06-08 16:06:58
|
Stanislaw, $PROCESS$ events are "in line" or serial. So it happens in the context of the Setfield action itself and does not spawn a second "Modify" event. --=20 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. http://www.fellowshipchurch.com On 6/8/05, STANISLAW CHOLODNJAK, BLOOMBERG/ 731 LEXIN <SCH...@bl...> wrote: > If your filter is executed on 'Modify' and from this filter you run a scr= ipt > that sets the field in this record, which in turn fires this filter, aren= 't you > creating the infinite loop? > ----- Original Message ----- > From: Amen Asemota <ars...@ar...> > At: 6/ 8 11:55 >=20 > Hi, >=20 > I am trying to run a perl script in a filter but i keep getting ARERR [38= ] > Filter/escalation 'set field' process returned an error. >=20 > Iam trying to use the $PROCESS$ command to set a field . Please help.. >=20 > _________________________________________________________________ > Express yourself instantly with MSN Messenger! Download today it's FREE! > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ >=20 >=20 >=20 > ------------------------------------------------------- > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you sho= tput > a projector? How fast can you ride your desk chair down the office luge t= rack? > If you want to score the big prize, get to know the little guy. > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=3D20 > _______________________________________________ > Arsperl-users mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-users >=20 >=20 >=20 >=20 >=20 > ------------------------------------------------------- > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you sho= tput > a projector? How fast can you ride your desk chair down the office luge t= rack? > If you want to score the big prize, get to know the little guy. > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=3D20 > _______________________________________________ > Arsperl-users mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-users > |
|
From: Steve M. <ste...@ch...> - 2005-06-08 16:05:00
|
What is the syntax of your $PROCESS$ ? Are you passing arguments from the filter to the script? If so, be sure to use quotes around field references that may contain spaces. You can use a message action that contains the command in your set fields action to display the data that is being sent to the script. Past that on the command line and see if the script runs from there. Just some things I've had problems with... Steve -----Original Message----- From: ars...@ar... [mailto:ars...@ar...] On Behalf Of Amen Asemota Sent: Wednesday, June 08, 2005 8:52 AM To: ars...@ar... Subject: [Arsperl-users] REmedy problem Hi, I am trying to run a perl script in a filter but i keep getting ARERR [38] Filter/escalation 'set field' process returned an error. Iam trying to use the $PROCESS$ command to set a field . Please help.. _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ ------------------------------------------------------- This SF.Net email is sponsored by: NEC IT Guy Games. How far can you shotput a projector? How fast can you ride your desk chair down the office luge track? If you want to score the big prize, get to know the little guy. Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20 _______________________________________________ Arsperl-users mailing list Ars...@ar... https://lists.sourceforge.net/lists/listinfo/arsperl-users |
|
From: Carey M. B. <bla...@gm...> - 2005-06-08 16:04:58
|
Amen, Make sure your script always exits with status zero. exit(0); If you do not exit with a status of zero then the ARS server will throw an exception. print anything to STDOUT that you want to to end up in the field. A simple example would be: #! /usr/bin/perl print "The fields new value is this whole string"; exit(0); Also .. in the filter.. make sure you fully qualify the path to the perl script and maybe even perl itself. /path/to/myscript/junk.pl or maybe... /usr/bin/perl /path/to/myscript/junk.pl You can also run Filter logs and check the arerror.log for more details on what the ARS server is seeing from the script too. Hope that helps. --=20 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. http://www.fellowshipchurch.com On 6/8/05, Amen Asemota <aas...@ho...> wrote: > Hi, >=20 > I am trying to run a perl script in a filter but i keep getting ARERR [38= ] > Filter/escalation 'set field' process returned an error. >=20 > Iam trying to use the $PROCESS$ command to set a field . Please help.. >=20 > _________________________________________________________________ > Express yourself instantly with MSN Messenger! Download today it's FREE! > http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ >=20 >=20 >=20 > ------------------------------------------------------- > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you sho= tput > a projector? How fast can you ride your desk chair down the office luge t= rack? > If you want to score the big prize, get to know the little guy. > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=3D20 > _______________________________________________ > Arsperl-users mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-users > |
|
From: STANISLAW C. B. 7. L. <SCH...@bl...> - 2005-06-08 15:59:59
|
If your filter is executed on 'Modify' and from this filter you run a script that sets the field in this record, which in turn fires this filter, aren't you creating the infinite loop? ----- Original Message ----- From: Amen Asemota <ars...@ar...> At: 6/ 8 11:55 Hi, I am trying to run a perl script in a filter but i keep getting ARERR [38] Filter/escalation 'set field' process returned an error. Iam trying to use the $PROCESS$ command to set a field . Please help.. _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ ------------------------------------------------------- This SF.Net email is sponsored by: NEC IT Guy Games. How far can you shotput a projector? How fast can you ride your desk chair down the office luge track? If you want to score the big prize, get to know the little guy. Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20 _______________________________________________ Arsperl-users mailing list Ars...@ar... https://lists.sourceforge.net/lists/listinfo/arsperl-users |
|
From: Carey M. B. <bla...@gm...> - 2005-06-08 15:52:58
|
Janie, Have you reviewed the Get_Diary.pl script in the \example directory of the ARSPerl source? --=20 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. http://www.fellowshipchurch.com On 6/8/05, Sprenger, Janie : CO IR <JSp...@lh...> wrote: > Does anyone have any perl scripts they would be willing to share (or know= of > any place to find), > scripts that parse an audit log between the Timestamps in that log? >=20 >=20 > Thanks--really! >=20 > Janie Sprenger > Remedy Administrator > Legacy Health System > 503-415-5826 > jsp...@lh... |
|
From: Amen A. <aas...@ho...> - 2005-06-08 15:52:02
|
Hi, I am trying to run a perl script in a filter but i keep getting ARERR [38] Filter/escalation 'set field' process returned an error. Iam trying to use the $PROCESS$ command to set a field . Please help.. _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ |
|
From: Sprenger, J. : CO I. <JSp...@LH...> - 2005-06-08 15:34:03
|
Does anyone have any perl scripts they would be willing to share (or know of any place to find), scripts that parse an audit log between the Timestamps in that log? Thanks--really! Janie Sprenger Remedy Administrator Legacy Health System 503-415-5826 jsp...@lh... IMPORTANT NOTICE: This communication, including any attachment, contains information that may be confidential or privileged, and is intended solely for the entity or individual to whom it is addressed. If you are not the intended recipient, you should contact the sender and delete the message. Any unauthorized disclosure, copying, or distribution of this message is strictly prohibited. Nothing in this email, including any attachment, is intended to be a legally binding signature. |
|
From: PC W. <PC...@TE...> - 2005-06-07 21:02:02
|
Hi Listers, I found a problem on the ars_LoadQualifier. It picks up the wrong locale = view. We supports a default locale and FR locale in a form. Both two = views have the same View Name. However, the ars_LoadQualifier does not = pick up the default view. It picks up the French view in stead even we = don't specify the locale. Does anyone encounter this issue? Any resolution? Thanks! Perl : V5.6.1 ARSPerl: 1.73 OS: HPUX 11 API: 5 ARS: 5.1.2 Regards PC Wai Senior Software Specialist TELUS Corporation Inc. =20 |
|
From: Das, M. <md...@ti...> - 2005-06-06 21:58:01
|
After we installed Sun cc, it worked fine. Jeff, Thank you so much. Regards, Mano -----Original Message----- From: ars...@ar... [mailto:ars...@ar...]On Behalf Of Jeff Murphy Sent: Friday, June 03, 2005 7:46 AM To: ars...@ar... Subject: Re: [Arsperl-users] ARSPerl install with cc On Thu, 2005-06-02 at 15:01 -0500, Das, Manojit wrote: > Hi, > When I am running make it says "/usr/ucb/cc: language optional > software package not installed ". > =20 ARSperl wants to be built (as all perl modules do) with the same compiler that perl itself was built with.=20 you most likely installed a pre-built (binary) copy of perl that was built with SUN's compiler. your current machine does not have SUN's compiler, therefor you are experiencing the above problem. > Does it mean we need to reinstall cc or what? How can I resolve this? > Installing gcc is not an option for me as it will not be allowed in > production env. then you need to get CC installed, or, if it is already installed, you need to determine where it is installed and place it's location at the front of your PATH.=20 then re-attempt the "make" step. jeff > =20 > ------------------------------------- > $ > /usr/ccs/bin/make=20 >=20 > /usr/ucb/cc -c -I/opt/ar/api/include -xO3 -xdepend = -DVERSION=3D\"1.8001 > \" -DXS_VERSION=3D\"1.8001\" -KPIC -I/usr/perl5/5.00503/suc >=20 > /usr/ucb/cc: language optional software package not installed=20 >=20 > *** Error code 1=20 >=20 > make: Fatal error: Command failed for target `ARS.o'=20 >=20 > $ > =20 >=20 > ------------------------------------- >=20 > Regards, >=20 > Mano=20 >=20 >=20 --=20 Jeff Murphy <jcm...@je...> ------------------------------------------------------- This SF.Net email is sponsored by Yahoo. Introducing Yahoo! Search Developer Network - Create apps using Yahoo! Search APIs Find out how you can build Yahoo! directly into your own Applications - visit = http://developer.yahoo.net/?fr=3Doffad-ysdn-ostg-q22005 _______________________________________________ Arsperl-users mailing list Ars...@ar... https://lists.sourceforge.net/lists/listinfo/arsperl-users |
|
From: Jeff M. <jcm...@je...> - 2005-06-06 19:16:55
|
On Mon, 2005-06-06 at 14:09 -0500, Das, Manojit wrote: > Hi, > The env is :(ARSPerl 1.81, Perl 5.005_03, Solaris 8, Ora 9i, installing ARSPerl as nonroot). > > Why am I getting this while doing "make test" > you are using an old copy of perl that doesnt include the Test::More module. options: a) skip the 'make test' b) install Test::More (www.cpan.org) c) upgrade perl jeff > -------------------------------- > dledz $ make test > PERL_DL_NONLAZY=1 /usr/bin/perl -Iblib/arch -Iblib/lib -I/usr/perl5/5.00503/sun4-solaris -I/usr/perl5/5.00503 -e 'use Test::Harnesst > t/00connect.........Can't locate auto/ARS/AR_RETURN_W.al in @INC (@INC contains: blib/arch blib/lib /usr/perl5/5.00503/sun4-solaris3 > dubious > > t/10getlist.........Can't locate Test/More.pm in @INC (@INC contains: blib/arch blib/lib /usr/perl5/5.00503/sun4-solaris /usr/perl5 > BEGIN failed--compilation aborted at t/10getlist.t line 7. > dubious > Test returned status 2 (wstat 512, 0x200) > > -------------------------------- > Here is the full log of make test > > ****************************************************************************** > dledz $ make test > PERL_DL_NONLAZY=1 /usr/bin/perl -Iblib/arch -Iblib/lib -I/usr/perl5/5.00503/sun4-solaris -I/usr/perl5/5.00503 -e 'use Test::Harnesst > t/00connect.........Can't locate auto/ARS/AR_RETURN_W.al in @INC (@INC contains: blib/arch blib/lib /usr/perl5/5.00503/sun4-solaris3 > dubious > Test returned status 2 (wstat 512, 0x200) > DIED. FAILED test 3 > Failed 1/3 tests, 66.67% okay > t/01import..........Argument "ARS::AR_SCHEMA_FORCE_DELETE" isn't numeric in entersub at t/01import.t line 31. > Argument "ARS::AR_SCHEMA_FORCE_DELETE" isn't numeric in entersub at t/01import.t line 32. > Argument "ARS::AR_SCHEMA_FORCE_DELETE" isn't numeric in entersub at t/01import.t line 33. > FAILED test 1 > Failed 1/1 tests, 0.00% okay > t/02export..........Use of uninitialized value at t/02export.t line 30. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > Use of uninitialized value at t/02export.t line 41. > ok > t/09qualifier.......FAILED tests 2-4 > Failed 3/4 tests, 25.00% okay > t/10alink...........ok > t/10entry...........Can't locate auto/ARS/AR_RETURN_W.al in @INC (@INC contains: blib/arch blib/lib /usr/perl5/5.00503/sun4-solaris3 > dubious > Test returned status 2 (wstat 512, 0x200) > DIED. FAILED tests 1-10 > Failed 10/10 tests, 0.00% okay > t/10getescalation...FAILED tests 3-4 > Failed 2/4 tests, 50.00% okay > t/10getftinfo.......ok > t/10getlist.........Can't locate Test/More.pm in @INC (@INC contains: blib/arch blib/lib /usr/perl5/5.00503/sun4-solaris /usr/perl5. > BEGIN failed--compilation aborted at t/10getlist.t line 7. > dubious > Test returned status 2 (wstat 512, 0x200) > t/11entry...........ok > t/12lotsoffields....FAILED tests 2-104 > Failed 103/104 tests, 0.96% okay > t/13join............FAILED tests 2-7 > Failed 6/7 tests, 14.29% okay > t/20merge...........FAILED tests 2-5 > Failed 4/5 tests, 20.00% okay > Failed Test Status Wstat Total Fail Failed List of failed > ------------------------------------------------------------------------------- > t/00connect.t 2 512 3 1 33.33% 3 > t/01import.t 1 1 100.00% 1 > t/09qualifier.t 4 3 75.00% 2-4 > t/10entry.t 2 512 10 10 100.00% 1-10 > t/10getescalati 4 2 50.00% 3-4 > t/10getlist.t 2 512 ?? ?? % ?? > t/12lotsoffield 104 103 99.04% 2-104 > t/13join.t 7 6 85.71% 2-7 > t/20merge.t 5 4 80.00% 2-5 > Failed 9/13 test scripts, 30.77% okay. 130/157 subtests failed, 17.20% okay. > *** Error code 29 > make: Fatal error: Command failed for target `test_dynamic' > dledz $ > ****************************************************************************** > > Regards, > Mano > > > > ------------------------------------------------------- > This SF.Net email is sponsored by: NEC IT Guy Games. How far can you shotput > a projector? How fast can you ride your desk chair down the office luge track? > If you want to score the big prize, get to know the little guy. > Play to win an NEC 61" plasma display: http://www.necitguy.com/?r > _______________________________________________ > Arsperl-users mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-users > -- Jeff Murphy <jcm...@je...> |
|
From: Das, M. <md...@ti...> - 2005-06-06 19:09:58
|
Hi,=20
The env is :(ARSPerl 1.81, Perl 5.005_03, Solaris 8, Ora 9i, installing =
ARSPerl as nonroot).
Why am I getting this while doing "make test"
--------------------------------
dledz $ make test =
=20
PERL_DL_NONLAZY=3D1 /usr/bin/perl -Iblib/arch -Iblib/lib =
-I/usr/perl5/5.00503/sun4-solaris -I/usr/perl5/5.00503 -e 'use =
Test::Harnesst
t/00connect.........Can't locate auto/ARS/AR_RETURN_W.al in @INC (@INC =
contains: blib/arch blib/lib /usr/perl5/5.00503/sun4-solaris3
dubious =
=20
t/10getlist.........Can't locate Test/More.pm in @INC (@INC contains: =
blib/arch blib/lib /usr/perl5/5.00503/sun4-solaris /usr/perl5
BEGIN failed--compilation aborted at t/10getlist.t line 7. =
=20
dubious =
=20
Test returned status 2 (wstat 512, 0x200) =20
--------------------------------
Here is the full log of make test
*************************************************************************=
*****
dledz $ make test =
=20
PERL_DL_NONLAZY=3D1 /usr/bin/perl -Iblib/arch -Iblib/lib =
-I/usr/perl5/5.00503/sun4-solaris -I/usr/perl5/5.00503 -e 'use =
Test::Harnesst
t/00connect.........Can't locate auto/ARS/AR_RETURN_W.al in @INC (@INC =
contains: blib/arch blib/lib /usr/perl5/5.00503/sun4-solaris3
dubious =
=20
Test returned status 2 (wstat 512, 0x200) =
=20
DIED. FAILED test 3 =
=20
Failed 1/3 tests, 66.67% okay =
=20
t/01import..........Argument "ARS::AR_SCHEMA_FORCE_DELETE" isn't numeric =
in entersub at t/01import.t line 31. =20
Argument "ARS::AR_SCHEMA_FORCE_DELETE" isn't numeric in entersub at =
t/01import.t line 32. =20
Argument "ARS::AR_SCHEMA_FORCE_DELETE" isn't numeric in entersub at =
t/01import.t line 33. =20
FAILED test 1 =
=20
Failed 1/1 tests, 0.00% okay =
=20
t/02export..........Use of uninitialized value at t/02export.t line 30. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
Use of uninitialized value at t/02export.t line 41. =
=20
ok =
=20
t/09qualifier.......FAILED tests 2-4 =
=20
Failed 3/4 tests, 25.00% okay =
=20
t/10alink...........ok =
=20
t/10entry...........Can't locate auto/ARS/AR_RETURN_W.al in @INC (@INC =
contains: blib/arch blib/lib /usr/perl5/5.00503/sun4-solaris3
dubious =
=20
Test returned status 2 (wstat 512, 0x200) =
=20
DIED. FAILED tests 1-10 =
=20
Failed 10/10 tests, 0.00% okay =
=20
t/10getescalation...FAILED tests 3-4 =
=20
Failed 2/4 tests, 50.00% okay =
=20
t/10getftinfo.......ok =
=20
t/10getlist.........Can't locate Test/More.pm in @INC (@INC contains: =
blib/arch blib/lib /usr/perl5/5.00503/sun4-solaris /usr/perl5.
BEGIN failed--compilation aborted at t/10getlist.t line 7. =
=20
dubious =
=20
Test returned status 2 (wstat 512, 0x200) =
=20
t/11entry...........ok =
=20
t/12lotsoffields....FAILED tests 2-104 =
=20
Failed 103/104 tests, 0.96% okay =
=20
t/13join............FAILED tests 2-7 =
=20
Failed 6/7 tests, 14.29% okay =
=20
t/20merge...........FAILED tests 2-5 =
=20
Failed 4/5 tests, 20.00% okay =
=20
Failed Test Status Wstat Total Fail Failed List of failed =
=20
-------------------------------------------------------------------------=
------ =20
t/00connect.t 2 512 3 1 33.33% 3 =
=20
t/01import.t 1 1 100.00% 1 =
=20
t/09qualifier.t 4 3 75.00% 2-4 =
=20
t/10entry.t 2 512 10 10 100.00% 1-10 =
=20
t/10getescalati 4 2 50.00% 3-4 =
=20
t/10getlist.t 2 512 ?? ?? % ?? =
=20
t/12lotsoffield 104 103 99.04% 2-104 =
=20
t/13join.t 7 6 85.71% 2-7 =
=20
t/20merge.t 5 4 80.00% 2-5 =
=20
Failed 9/13 test scripts, 30.77% okay. 130/157 subtests failed, 17.20% =
okay. =20
*** Error code 29 =
=20
make: Fatal error: Command failed for target `test_dynamic' =
=20
dledz $ =
=20
*************************************************************************=
*****
Regards,
Mano
|
96 messages has been excluded from this view by a project administrator.
