t/api/customfield.t

8 use_ok('RT::CustomField');
14 my $cf = RT::CustomField->new(RT->SystemUser);
15 ok($cf, "Have a CustomField object");
39 $cf = RT::CustomField->new(RT->SystemUser);
58 $cf = RT::CustomField->new( RT->SystemUser );
64 $cf = RT::CustomField->new( RT->SystemUser );
70 $cf = RT::CustomField->new( RT->SystemUser );
76 $cf = RT::CustomField->new( RT->SystemUser );
82 $cf = RT::CustomField->new( RT->SystemUser );
88 $cf = RT::CustomField->new( RT->SystemUser );
95 $cf = RT::CustomField->new( RT->SystemUser );
101 $cf = RT::CustomField->new( RT->SystemUser );
109 $cf = RT::CustomField->new( RT->SystemUser );
117 $cf = RT::CustomField->new( RT->SystemUser );
125 $cf = RT::CustomField->new( RT->SystemUser );
136 ( $ok, $msg ) = $ocf->LoadByCols( CustomField => $cf->id, ObjectId => 0 );
140 ( $ok, $msg ) = $ocf->Add( CustomField => $cf->id, ObjectId => 1 );
144 $cf = RT::CustomField->new( RT->SystemUser );
150 $cf = RT::CustomField->new( RT->SystemUser );
156 $cf = RT::CustomField->new( RT->SystemUser );
162 $cf = RT::CustomField->new( RT->SystemUser );
168 $cf = RT::CustomField->new( RT->SystemUser );
175 $cf = RT::CustomField->new( RT->SystemUser );
182 $cf = RT::CustomField->new( RT->SystemUser );
188 $cf = RT::CustomField->new( RT->SystemUser );
200 ( $ok, $msg ) = $ocf->Add( CustomField => $cf->id, ObjectId => 0 );
204 $cf = RT::CustomField->new( RT->SystemUser );
209 $cf = RT::CustomField->new( RT->SystemUser );
214 $cf = RT::CustomField->new( RT->SystemUser );
219 $cf = RT::CustomField->new( RT->SystemUser );
224 $cf = RT::CustomField->new( RT->SystemUser );
229 $cf = RT::CustomField->new( RT->SystemUser );
234 $cf = RT::CustomField->new( RT->SystemUser );
239 $cf = RT::CustomField->new( RT->SystemUser );
245 $cf = RT::CustomField->new( RT->SystemUser );
256 ( $ok, $msg ) = $ocf->Add( CustomField => $cf->id, ObjectId => 0 );
260 $cf = RT::CustomField->new( RT->SystemUser );
265 $cf = RT::CustomField->new( RT->SystemUser );
270 $cf = RT::CustomField->new( RT->SystemUser );
280 ( $ok, $msg ) = $ocf->Add( CustomField => $cf->id, ObjectId => 0 );
284 $cf = RT::CustomField->new( RT->SystemUser );
289 $cf = RT::CustomField->new( RT->SystemUser );
294 $cf = RT::CustomField->new( RT->SystemUser );
299 $cf = RT::CustomField->new( RT->SystemUser );
304 $cf = RT::CustomField->new( RT->SystemUser );
315 ( $ok, $msg ) = $ocf->Add( CustomField => $cf->id, ObjectId => 0 );
329 $cf = RT::CustomField->new( RT->SystemUser );
334 $cf = RT::CustomField->new( RT->SystemUser );
339 $cf = RT::CustomField->new( RT->SystemUser );
344 $cf = RT::CustomField->new( RT->SystemUser );
349 $cf = RT::CustomField->new( RT->SystemUser );
366 $cf = RT::CustomField->new( RT->SystemUser );
371 $cf = RT::CustomField->new( RT->SystemUser );
376 $cf = RT::CustomField->new( RT->SystemUser );
381 $cf = RT::CustomField->new( RT->SystemUser );
416 $cf = RT::CustomField->new( RT->SystemUser );
434     ( $ok, $msg ) = $ocf->LoadByCols( CustomField => $cf->id, ObjectId => 0 );
440 $cf = RT::CustomField->new( RT->SystemUser );
446 $cf = RT::CustomField->new( RT->SystemUser );
449 ( $ok, $msg ) = $ocf->LoadByCols( CustomField => $cf->id, ObjectId => 0 );
455 $cf = RT::CustomField->new( RT->SystemUser );
458 ( $ok, $msg ) = $ocf->LoadByCols( CustomField => $cf->id, ObjectId => 0 );
464 $cf = RT::CustomField->new( RT->SystemUser );
469 ( $ok, $msg ) = $ocf->LoadByCols( CustomField => $cf->id, ObjectId => 0 );