Thread: Re: [Arsperl-users] REmedy problem
Brought to you by:
jeffmurphy
|
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: 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: 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: 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: 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 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: 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 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: 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: 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 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-10 01:24:38
|
yes it does.
Amen.
>From: Steve McDonald <ste...@ch...>
>Reply-To: ars...@ar...
>To: ars...@ar...
>Subject: RE: [Arsperl-users] REmedy problem
>Date: Thu, 09 Jun 2005 13:28:54 -0700
>
>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
>
>
>
>-------------------------------------------------------
>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: PC W. <PC...@TE...> - 2005-06-13 20:10:10
|
I guess the text file should be created in the owner's home directory.
Regards
PC=20
-----Original Message-----
From: ars...@ar... =
[mailto:ars...@ar...] On Behalf Of Amen Asemota
Sent: Thursday, June 09, 2005 18:20
To: ars...@ar...
Subject: RE: [Arsperl-users] REmedy problem
yes it does.
Amen.
>From: Steve McDonald <ste...@ch...>
>Reply-To: ars...@ar...
>To: ars...@ar...
>Subject: RE: [Arsperl-users] REmedy problem
>Date: Thu, 09 Jun 2005 13:28:54 -0700
>
>Does the script user(remedy install user) have permissions to create=20
>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=20
>creating
>
>a text file also but it's not doing that. It just sets the field and=20
>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=20
> >to
>the
> >script and the modules?
> >
> >Regards
> >PC
> >
> >-----Original Message-----
> >From: ars...@ar...=20
> >[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=20
> >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...=20
> > >[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=20
> > >ARS;
> > >#open(TXT,">datafile.txt") ||die printf "unable to open flat=20
> > >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=20
> > >Error\n"; #$query =3D "'650001031' !=3D \$NULL\$"; #my $query =3D=20
> > >"'Assigned To' !=3D \$NULL\$"; my $query =3D "'PO Flag?'!=3D =
\$NULL\$";=20
> > >my $qual =3D ars_LoadQualifier($ctrl, "Schema",$query);
> > >if(!defined($qual))
> > >{
> > > $error =3D "Unable to create Schema Load qualifier=20
> > >$ars_errstr"; }
> > >
> > ># 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=20
> > >keys
> > >%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=20
> > >print TXT "H","0001","0000000","000000","000","0000000000";
> > >print TXT "00000","00000","00000000"; # Retrieving the Items for=20
> > >this DTR table
> > >
> > >$qualb =3D ars_LoadQualifier($ctrl,"Schema2", "1=3D1");
> > >if(!defined($qualb))
> > > {
> > > $error =3D "Unable to create Schema2 Load qual=20
> > >ifier $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$=20
> > >/path/file.pl because I want it to Set a text field in the filter=20
> > >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]=20
> > >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=20
> > > >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=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=20
> > > >System(Remedy)
> > > >
> > > >Solution =3D People + Process + Tools Fast, Accurate, Cheap....=20
> > > >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=20
> > > > > getting ARERR
> > > >[38]
> > > > > Filter/escalation 'set field' process returned an error.
> > > > >
> > > > > Iam trying to use the $PROCESS$ command to set a field .=20
> > > > > Please
> >help..
> > > > >
> > > > > ______________________________________________________________
> > > > > ___ Express yourself instantly with MSN Messenger! Download=20
> > > > > 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=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.
> > > > > 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
> > > > >
> > > >
> > > >
> > > >
> > > >-------------------------------------------------------
> > > >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=20
> > > >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=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=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
> >
> >_________________________________________________________________
> >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=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: 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 > |