/[cvs]/nfo/perl/libs/OEF/YAA/Jobs.pm
ViewVC logotype

Diff of /nfo/perl/libs/OEF/YAA/Jobs.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by joko, Fri Mar 28 03:07:41 2003 UTC revision 1.3 by joko, Fri Apr 4 17:29:49 2003 UTC
# Line 2  Line 2 
2  ##  $Id$  ##  $Id$
3  ## -------------------------------------------------------------------------  ## -------------------------------------------------------------------------
4  ##  $Log$  ##  $Log$
5    ##  Revision 1.3  2003/04/04 17:29:49  joko
6    ##  updated signatures: session-based service
7    ##  enabled method protection
8    ##
9  ##  Revision 1.2  2003/03/28 03:07:41  joko  ##  Revision 1.2  2003/03/28 03:07:41  joko
10  ##  minor fix: 'run_cmd' required here  ##  minor fix: 'run_cmd' required here
11  ##  ##
# Line 50  my $bizProcess = $main::bizProcess; Line 54  my $bizProcess = $main::bizProcess;
54      my $procs = [      my $procs = [
55        {        {
56          name => "getTaskList",          name => "getTaskList",
57          version => "0.02",          version => "0.03",
58          hidden => 0,          hidden => 0,
59          code => \&getTaskList,          code => \&getTaskList,
60          signature => [ 'struct string' ],          signature => [
61              'struct string',             # w/o session
62              'struct string struct',    # session initialized (a struct containing a key 'RPCSESSID' will get propagated!)
63            ],
64          help => "",          help => "",
65            protected => 1,
66        },        },
67        {        {
68          name => "getTaskInfo",          name => "getTaskInfo",
# Line 63  my $bizProcess = $main::bizProcess; Line 71  my $bizProcess = $main::bizProcess;
71          code => \&getTaskInfo,          code => \&getTaskInfo,
72          signature => [ 'struct string' ],          signature => [ 'struct string' ],
73          help => "",          help => "",
74            protected => 1,
75        },        },
76        {        {
77          name => "runTask",          name => "runTask",
# Line 71  my $bizProcess = $main::bizProcess; Line 80  my $bizProcess = $main::bizProcess;
80          code => \&runTask,          code => \&runTask,
81          signature => [ 'string string' ],          signature => [ 'string string' ],
82          help => "",          help => "",
83            protected => 1,
84        },        },
85      ];      ];
86      $self->register($procs);      $self->register($procs);
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed