The selected change manager is invalid - ARERR #1441146

2014-09-27 Thread Tim Lank
1. OS (operating system) version (RHEL 5.8 32-bit)
2. Perl version (output from perl -v) (This is perl, v5.8.8 built for
i386-linux-thread-multi)
3. ARSystem version you are connecting to (7.6.04)
4. API version you compiled against (764sp1)
5. ARSperl version (1.93)

when running the script below, I get the following error output string.
The Change Manager - Ben Johnson and all of the values below work fine to
create a CRQ through the Web User Interface.

[ERROR]  (The selected change manager is invalid. Reselect the change
manager using the menu provided, then reapply. If no change manager is
available using the menu, notify your administrator.) (ARERR #1441146) at ./
testcreate.pl line 95.

thank you in advance for any assistance.

#!/usr/bin/perl

use ARS;
use Term::ReadPassword;
use Term::ReadLine;
use DBI;

$server = remedy.example.com;
$port = 10005;

$term = new Term::ReadLine 'ProgramName';
$term-ornaments(0);
$login = $term-readline('username: ');
$passwd = read_password('password: ');

# login to the ARServer
($ctrl = ars_Login($server, $login, $passwd, , , $port)) || die Can't
login to the server: $ars_errstr\n;

$schema = CHG:ChangeInterface_Create;

$id1 = 100341;   # Support Group Name2
$id2 = 10;   # Description
$id3 = 100568;   # Change Timing
$id4 = 100163;   # Impact
$id5 = 100162;   # Urgency
$id6 = 100180;   # Risk Level
# $id7 = 103264;  # Approval Status
$id8 = 100015;   # Support Group Name
$id9 = 100182;   # Infrastructure Change ID
$id10 = 100082;  # Company
$id11 = 100019;  # First Name
$id12 = 100018;  # Last Name
$id13 = 11;  # Location Company
$id14 = 100063;  # Categorization Tier 1
$id15 = 100064;  # Categorization Tier 2
$id16 = 100065;  # Categorization Tier 3
$id17 = 101270;  # Product Cat Tier 1
$id18 = 101271;  # Product Cat Tier 2
$id19 = 101272;  # Product Cat Tier 3
$id20 = 102268;  # Product Name (2)
$id21 = 103229;  # ASGRP
$id22 = 103230;  # ASCHG
$id23 = 100403;  # CAB Manager ( Change Co-ord )
$id24 = 103234;  # ASGRPID
$id25 = 100079;  # Support Group ID
$id26 = 100427;  # Support Group ID 2
$id27 = 100010;  # Organization
$id28 = 100014;  # Support Organization
$id29 = 100251;  # Company3
$id30 = 301581400;   # TemplateID
$id31 = 103227;  # ASORG
$id32 = 103228;  # ASCPY
$id33 = 100076;  # z1D_Action
$id34 = 100181;  # Change Type
$val1 = SE Services;
$val2 = this is a test script-created CRQ;
$val3 = 6000;
$val4 = 4000;
$val5 = 4000;
$val6 = 0;
# $val7 = 0;
$val8 = SE SVCS;
$val9 = CRQ0111;
$val10 = SVC Desk;
$val11 = William;
$val12 = Smith;
$val13 = SVC Desk;
$val14 = Non-Production;
$val15 = Build;
$val16 = Server: RH;
$val17 = EIP;
$val18 = ITFACPRG;
$val19 = SRV;
$val20 = SRV HW;
$val21 = SE SVCS;
$val22 = John Smith;
$val23 = Ben Johnson;
$val24 = SGP0205;
$val25 = SGP0205;
$val26 = SGP0205;
$val27 = CIO;
$val28 = ENG;
$val29 = SVC Desk;
$val30 = ID001a4a709742_7bXUwcOfKlQgnte;
$val31 = ENG;
$val32 = SVC Desk;
$val33 = CREATE;
$val34 = 2000;


($entry_id = ars_CreateEntry($ctrl, $schema, $id1, $val1, $id2, $val2,
$id3, $val3, $id4, $val4, $id5, $val5, $id6, $val6, $id8, $val8, $id9,
$val9, $id10, $val10, $id11, $val11, $id12, $val12, $id13, $val13, $id14,
$val14, $id15, $val15, $id16, $val16, $id17, $val17, $id18, $val18, $id19,
$val19, $id20, $val20, $id21, $val21, $id22, $val22, $id23, $val23, $id27,
$val27, $id28, $val28, $id29, $val29, $id30, $val30, $id31, $val31, $id32,
$val32, $id33, $val33, $id34, $val34)) || die $ars_errstr;


print Entry ID:  $entry_id\n;

ars_Logoff($ctrl);

___
UNSUBSCRIBE or access ARSlist Archives at www.arslist.org
Where the Answers Are, and have been for 20 years


The selected change manager is invalid - ARERR #1441146

2014-09-27 Thread Tim Lank
1. OS (operating system) version (RHEL 5.8 32-bit)
2. Perl version (output from perl -v) (This is perl, v5.8.8 built for 
i386-linux-thread-multi)
3. ARSystem version you are connecting to (7.6.04)
4. API version you compiled against (764sp1)
5. ARSperl version (1.93)

when running the script below, I get the following error output string.  The 
Change Manager - Ben Johnson and all of the values below work fine to create a 
CRQ through the Web User Interface.
 
[ERROR]  (The selected change manager is invalid. Reselect the change manager 
using the menu provided, then reapply. If no change manager is available using 
the menu, notify your administrator.) (ARERR #1441146) at ./testcreate.pl line 
95.

thank you in advance for any assistance.

#!/usr/bin/perl

use ARS;
use Term::ReadPassword;
use Term::ReadLine;
use DBI;

$server = remedy.example.com;
$port = 10005;

$term = new Term::ReadLine 'ProgramName';
$term-ornaments(0);
$login = $term-readline('username: ');
$passwd = read_password('password: ');

# login to the ARServer
($ctrl = ars_Login($server, $login, $passwd, , , $port)) || die Can't 
login to the server: $ars_errstr\n;

$schema = CHG:ChangeInterface_Create;

$id1 = 100341;   # Support Group Name2
$id2 = 10;   # Description
$id3 = 100568;   # Change Timing
$id4 = 100163;   # Impact
$id5 = 100162;   # Urgency
$id6 = 100180;   # Risk Level
# $id7 = 103264;  # Approval Status
$id8 = 100015;   # Support Group Name
$id9 = 100182;   # Infrastructure Change ID
$id10 = 100082;  # Company
$id11 = 100019;  # First Name
$id12 = 100018;  # Last Name
$id13 = 11;  # Location Company
$id14 = 100063;  # Categorization Tier 1
$id15 = 100064;  # Categorization Tier 2
$id16 = 100065;  # Categorization Tier 3
$id17 = 101270;  # Product Cat Tier 1
$id18 = 101271;  # Product Cat Tier 2
$id19 = 101272;  # Product Cat Tier 3
$id20 = 102268;  # Product Name (2)
$id21 = 103229;  # ASGRP
$id22 = 103230;  # ASCHG
$id23 = 100403;  # CAB Manager ( Change Co-ord )
$id24 = 103234;  # ASGRPID
$id25 = 100079;  # Support Group ID
$id26 = 100427;  # Support Group ID 2
$id27 = 100010;  # Organization
$id28 = 100014;  # Support Organization
$id29 = 100251;  # Company3
$id30 = 301581400;   # TemplateID
$id31 = 103227;  # ASORG
$id32 = 103228;  # ASCPY
$id33 = 100076;  # z1D_Action
$id34 = 100181;  # Change Type
$val1 = SE Services;
$val2 = this is a test script-created CRQ;
$val3 = 6000;
$val4 = 4000;
$val5 = 4000;
$val6 = 0;
# $val7 = 0;
$val8 = SE SVCS;
$val9 = CRQ0111;
$val10 = SVC Desk;
$val11 = William;
$val12 = Smith;
$val13 = SVC Desk;
$val14 = Non-Production;
$val15 = Build;
$val16 = Server: RH;
$val17 = EIP;
$val18 = ITFACPRG;
$val19 = SRV;
$val20 = SRV HW;
$val21 = SE SVCS;
$val22 = John Smith;
$val23 = Ben Johnson;
$val24 = SGP0205;
$val25 = SGP0205;
$val26 = SGP0205;
$val27 = CIO;
$val28 = ENG;
$val29 = SVC Desk;
$val30 = ID001a4a709742_7bXUwcOfKlQgnte;
$val31 = ENG;
$val32 = SVC Desk;
$val33 = CREATE;
$val34 = 2000;


($entry_id = ars_CreateEntry($ctrl, $schema, $id1, $val1, $id2, $val2, $id3, 
$val3, $id4, $val4, $id5, $val5, $id6, $val6, $id8, $val8, $id9, $val9, $id10, 
$val10, $id11, $val11, $id12, $val12, $id13, $val13, $id14, $val14, $id15, 
$val15, $id16, $val16, $id17, $val17, $id18, $val18, $id19, $val19, $id20, 
$val20, $id21, $val21, $id22, $val22, $id23, $val23, $id27, $val27, $id28, 
$val28, $id29, $val29, $id30, $val30, $id31, $val31, $id32, $val32, $id33, 
$val33, $id34, $val34)) || die $ars_errstr;


print Entry ID:  $entry_id\n;

ars_Logoff($ctrl);

___
UNSUBSCRIBE or access ARSlist Archives at www.arslist.org
Where the Answers Are, and have been for 20 years


Re: The selected change manager is invalid - ARERR #1441146

2014-09-27 Thread Tauf Chowdhury
What are you passing for the CAB Manager? I recall at some point, you either 
need to pass the login ID or the full name. 
When you test through the web interface, you're going directly to the 
Chg:Infrastructure Change form. When you're using the integration, it's most 
likely passing data to the CHG:ChangeInterface_Create form. You should navigate 
to that form and try to input your values directly there. You will most likely 
run into the same error. 

Sent from my iPhone

 On Sep 27, 2014, at 6:09 PM, Tim Lank timl...@timlank.com wrote:
 
 **
 1. OS (operating system) version (RHEL 5.8 32-bit)
 2. Perl version (output from perl -v) (This is perl, v5.8.8 built for 
 i386-linux-thread-multi)
 3. ARSystem version you are connecting to (7.6.04)
 4. API version you compiled against (764sp1)
 5. ARSperl version (1.93)
 
 when running the script below, I get the following error output string.  The 
 Change Manager - Ben Johnson and all of the values below work fine to create 
 a CRQ through the Web User Interface.
  
 [ERROR]  (The selected change manager is invalid. Reselect the change manager 
 using the menu provided, then reapply. If no change manager is available 
 using the menu, notify your administrator.) (ARERR #1441146) at 
 ./testcreate.pl line 95.
 
 thank you in advance for any assistance.
 
 #!/usr/bin/perl
 
 use ARS;
 use Term::ReadPassword;
 use Term::ReadLine;
 use DBI;
 
 $server = remedy.example.com;
 $port = 10005;
 
 $term = new Term::ReadLine 'ProgramName';
 $term-ornaments(0);
 $login = $term-readline('username: ');
 $passwd = read_password('password: ');
 
 # login to the ARServer
 ($ctrl = ars_Login($server, $login, $passwd, , , $port)) || die Can't 
 login to the server: $ars_errstr\n;
 
 $schema = CHG:ChangeInterface_Create;
 
 $id1 = 100341;   # Support Group Name2
 $id2 = 10;   # Description
 $id3 = 100568;   # Change Timing
 $id4 = 100163;   # Impact
 $id5 = 100162;   # Urgency
 $id6 = 100180;   # Risk Level
 # $id7 = 103264;  # Approval Status
 $id8 = 100015;   # Support Group Name
 $id9 = 100182;   # Infrastructure Change ID
 $id10 = 100082;  # Company
 $id11 = 100019;  # First Name
 $id12 = 100018;  # Last Name
 $id13 = 11;  # Location Company
 $id14 = 100063;  # Categorization Tier 1
 $id15 = 100064;  # Categorization Tier 2
 $id16 = 100065;  # Categorization Tier 3
 $id17 = 101270;  # Product Cat Tier 1
 $id18 = 101271;  # Product Cat Tier 2
 $id19 = 101272;  # Product Cat Tier 3
 $id20 = 102268;  # Product Name (2)
 $id21 = 103229;  # ASGRP
 $id22 = 103230;  # ASCHG
 $id23 = 100403;  # CAB Manager ( Change Co-ord )
 $id24 = 103234;  # ASGRPID
 $id25 = 100079;  # Support Group ID
 $id26 = 100427;  # Support Group ID 2
 $id27 = 100010;  # Organization
 $id28 = 100014;  # Support Organization
 $id29 = 100251;  # Company3
 $id30 = 301581400;   # TemplateID
 $id31 = 103227;  # ASORG
 $id32 = 103228;  # ASCPY
 $id33 = 100076;  # z1D_Action
 $id34 = 100181;  # Change Type
 $val1 = SE Services;
 $val2 = this is a test script-created CRQ;
 $val3 = 6000;
 $val4 = 4000;
 $val5 = 4000;
 $val6 = 0;
 # $val7 = 0;
 $val8 = SE SVCS;
 $val9 = CRQ0111;
 $val10 = SVC Desk;
 $val11 = William;
 $val12 = Smith;
 $val13 = SVC Desk;
 $val14 = Non-Production;
 $val15 = Build;
 $val16 = Server: RH;
 $val17 = EIP;
 $val18 = ITFACPRG;
 $val19 = SRV;
 $val20 = SRV HW;
 $val21 = SE SVCS;
 $val22 = John Smith;
 $val23 = Ben Johnson;
 $val24 = SGP0205;
 $val25 = SGP0205;
 $val26 = SGP0205;
 $val27 = CIO;
 $val28 = ENG;
 $val29 = SVC Desk;
 $val30 = ID001a4a709742_7bXUwcOfKlQgnte;
 $val31 = ENG;
 $val32 = SVC Desk;
 $val33 = CREATE;
 $val34 = 2000;
 
 
 ($entry_id = ars_CreateEntry($ctrl, $schema, $id1, $val1, $id2, $val2, $id3, 
 $val3, $id4, $val4, $id5, $val5, $id6, $val6, $id8, $val8, $id9, $val9, 
 $id10, $val10, $id11, $val11, $id12, $val12, $id13, $val13, $id14, $val14, 
 $id15, $val15, $id16, $val16, $id17, $val17, $id18, $val18, $id19, $val19, 
 $id20, $val20, $id21, $val21, $id22, $val22, $id23, $val23, $id27, $val27, 
 $id28, $val28, $id29, $val29, $id30, $val30, $id31, $val31, $id32, $val32, 
 $id33, $val33, $id34, $val34)) || die $ars_errstr;
 
 
 print Entry ID:  $entry_id\n;
 
 ars_Logoff($ctrl);
 _ARSlist: Where the Answers Are and have been for 20 years_


Re: The selected change manager is invalid - ARERR #1441146

2014-09-27 Thread Tim Lank
Thank you very much Tauf.

You led me to the answer and it worked.

What I did was add the following:

$id35 = 100408;  # CAB_Manager_Login
$id36 = 103231;  # ASLOGID
$val35 = bjohnson;
$val36 = wsmith;

Changed the following to add the ids/values and also took out the
Infrastructure Change ID (100182) so that the system auto-generates the
next one rather than explicitly setting it

($entry_id = ars_CreateEntry($ctrl, $schema, $id1, $val1, $id2, $val2,
$id3, $val3, $id4, $val4, $id5, $val5, $id6, $val6, $id8, $val8, $id10,
$val10, $id11, $val11, $id12, $val12, $id13, $val13, $id14, $val14, $id15,
$val15, $id16, $val16, $id17, $val17, $id18, $val18, $id19, $val19, $id20,
$val20, $id21, $val21, $id22, $val22, $id23, $val23, $id27, $val27, $id28,
$val28, $id29, $val29, $id30, $val30, $id31, $val31, $id32, $val32, $id33,
$val33, $id34, $val34, $id35, $val35, $id36, $val36)) || die $ars_errstr;

all using the same CHG:ChangeInterface_Create schema.

The script now responds with an Entry ID number and the record gets created
in the DB.

Thanks again for the help.

On Sat, Sep 27, 2014 at 6:09 PM, Tim Lank timl...@timlank.com wrote:

 1. OS (operating system) version (RHEL 5.8 32-bit)
 2. Perl version (output from perl -v) (This is perl, v5.8.8 built for
 i386-linux-thread-multi)
 3. ARSystem version you are connecting to (7.6.04)
 4. API version you compiled against (764sp1)
 5. ARSperl version (1.93)

 when running the script below, I get the following error output string.
 The Change Manager - Ben Johnson and all of the values below work fine to
 create a CRQ through the Web User Interface.

 [ERROR]  (The selected change manager is invalid. Reselect the change
 manager using the menu provided, then reapply. If no change manager is
 available using the menu, notify your administrator.) (ARERR #1441146) at ./
 testcreate.pl line 95.

 thank you in advance for any assistance.

 #!/usr/bin/perl

 use ARS;
 use Term::ReadPassword;
 use Term::ReadLine;
 use DBI;

 $server = remedy.example.com;
 $port = 10005;

 $term = new Term::ReadLine 'ProgramName';
 $term-ornaments(0);
 $login = $term-readline('username: ');
 $passwd = read_password('password: ');

 # login to the ARServer
 ($ctrl = ars_Login($server, $login, $passwd, , , $port)) || die Can't
 login to the server: $ars_errstr\n;

 $schema = CHG:ChangeInterface_Create;

 $id1 = 100341;   # Support Group Name2
 $id2 = 10;   # Description
 $id3 = 100568;   # Change Timing
 $id4 = 100163;   # Impact
 $id5 = 100162;   # Urgency
 $id6 = 100180;   # Risk Level
 # $id7 = 103264;  # Approval Status
 $id8 = 100015;   # Support Group Name
 $id9 = 100182;   # Infrastructure Change ID
 $id10 = 100082;  # Company
 $id11 = 100019;  # First Name
 $id12 = 100018;  # Last Name
 $id13 = 11;  # Location Company
 $id14 = 100063;  # Categorization Tier 1
 $id15 = 100064;  # Categorization Tier 2
 $id16 = 100065;  # Categorization Tier 3
 $id17 = 101270;  # Product Cat Tier 1
 $id18 = 101271;  # Product Cat Tier 2
 $id19 = 101272;  # Product Cat Tier 3
 $id20 = 102268;  # Product Name (2)
 $id21 = 103229;  # ASGRP
 $id22 = 103230;  # ASCHG
 $id23 = 100403;  # CAB Manager ( Change Co-ord )
 $id24 = 103234;  # ASGRPID
 $id25 = 100079;  # Support Group ID
 $id26 = 100427;  # Support Group ID 2
 $id27 = 100010;  # Organization
 $id28 = 100014;  # Support Organization
 $id29 = 100251;  # Company3
 $id30 = 301581400;   # TemplateID
 $id31 = 103227;  # ASORG
 $id32 = 103228;  # ASCPY
 $id33 = 100076;  # z1D_Action
 $id34 = 100181;  # Change Type
 $val1 = SE Services;
 $val2 = this is a test script-created CRQ;
 $val3 = 6000;
 $val4 = 4000;
 $val5 = 4000;
 $val6 = 0;
 # $val7 = 0;
 $val8 = SE SVCS;
 $val9 = CRQ0111;
 $val10 = SVC Desk;
 $val11 = William;
 $val12 = Smith;
 $val13 = SVC Desk;
 $val14 = Non-Production;
 $val15 = Build;
 $val16 = Server: RH;
 $val17 = EIP;
 $val18 = ITFACPRG;
 $val19 = SRV;
 $val20 = SRV HW;
 $val21 = SE SVCS;
 $val22 = John Smith;
 $val23 = Ben Johnson;
 $val24 = SGP0205;
 $val25 = SGP0205;
 $val26 = SGP0205;
 $val27 = CIO;
 $val28 = ENG;
 $val29 = SVC Desk;
 $val30 = ID001a4a709742_7bXUwcOfKlQgnte;
 $val31 = ENG;
 $val32 = SVC Desk;
 $val33 = CREATE;
 $val34 = 2000;


 ($entry_id = ars_CreateEntry($ctrl,