Rinchi-Outlook

 view release on metacpan or  search on metacpan

lib/Rinchi/Outlook.pm  view on Meta::CPAN

=head2 $value = $Object->Address([$new_value]);

Set or get value of the Address attribute.
  
 Type: String
 Lower: 0
 Upper: 1

=cut

sub Address() {
  my $self = shift;
  if (@_) {
    $self->setAttribute('Address', shift);
  }
  return $self->getAttribute('Address');
}

#===============================================================================
# Rinchi::Outlook::AddressEntry::DisplayType

=head2 $value = $Object->DisplayType([$new_value]);

Set or get value of the DisplayType attribute.
  
 Type: OlDisplayType
 Lower: 0
 Upper: 1

=cut

sub DisplayType() {
  my $self = shift;
  if (@_) {
    if ($_[0] =~ /^[-+]?[0-9]+$/ ) {
      $self->setAttribute('DisplayType', shift);
    } else {
      if(ref($_[0])) {
        carp 'Found type \'' . ref($_[0]) . '\', expecting type \'Rinchi::Outlook::OlDisplayType\' for attribute \'DisplayType\'';
      } else {
        carp 'Found scalar \'' . $_[0] . '\', expecting type \'Rinchi::Outlook::OlDisplayType\' for attribute \'DisplayType\'';
      }
    }
  }
  return $self->getAttribute('DisplayType');
}

#===============================================================================
# Rinchi::Outlook::AddressEntry::ID

=head2 $value = $Object->ID([$new_value]);

Set or get value of the ID attribute.
  
 Type: String
 Lower: 0
 Upper: 1

=cut

sub ID() {
  my $self = shift;
  if (@_) {
    $self->setAttribute('ID', shift);
  }
  return $self->getAttribute('ID');
}

#===============================================================================
# Rinchi::Outlook::AddressEntry::Manager

=head2 $value = $Object->Manager([$new_value]);

Set or get value of the Manager attribute.
  
 Type: AddressEntry
 Lower: 0
 Upper: 1

=cut

sub Manager() {
  my $self = shift;
  if (@_) {
    my $regexp = join('|',Class::ISA::self_and_super_path(ref($_[0])));
    if ('Rinchi::Outlook::AddressEntry' =~ /$regexp/ ) {
      $self->attribute_as_element('Manager', shift);
    } else {
      carp 'Found type \'' . ref($_[0]) . '\', expecting type \'Rinchi::Outlook::AddressEntry\' for attribute \'Manager\'';
    }
  }
  return $self->attribute_as_element('Manager');
}

#===============================================================================
# Rinchi::Outlook::AddressEntry::Members

=head2 $Element = $Object->Members();

Set or get value of the Members attribute.
  
 Type: AddressEntries
 Lower: 0
 Upper: 1

=cut

sub Members() {
  my $self = shift;
  return $self->get_collection('AddressEntries','address-entries');
}

#===============================================================================
# Rinchi::Outlook::AddressEntry::Type

=head2 $value = $Object->Type([$new_value]);

Set or get value of the Type attribute.
  
 Type: String
 Lower: 0

lib/Rinchi/Outlook.pm  view on Meta::CPAN

##END_PACKAGE AddressEntry

#===============================================================================
# Generated by Hymnos Perl Code Generator
# UML Model UUID: d5d9ab96-3c43-11dd-992f-001c25551abc

package Rinchi::Outlook::AddressList;

use Carp;

our @ISA = qw(Rinchi::Outlook::Element Rinchi::Outlook::OutlookNamedEntry);
our @EXPORT = qw();
our @EXPORT_OK = qw();

=head1 DESCRIPTION of AddressList objects

Rinchi::Outlook::AddressList is used for representing AddressList objects.

=head1 METHODS for AddressList objects

=cut

#===============================================================================

{
  no strict "refs";
  *TAG_NAME = sub { return 'address-list'; };
}

#===============================================================================
# Rinchi::Outlook::AddressList::AddressEntries

=head2 $Element = $Object->AddressEntries();

Set or get value of the AddressEntries attribute.
 
 Type: AddressEntries
 Lower: 0
 Upper: 1

=cut

sub AddressEntries() {
  my $self = shift;
  return $self->get_collection('AddressEntries','address-entries');
}

#===============================================================================
# Rinchi::Outlook::AddressList::ID

=head2 $value = $Object->ID([$new_value]);

Set or get value of the ID attribute.
  
 Type: String
 Lower: 0
 Upper: 1

=cut

sub ID() {
  my $self = shift;
  if (@_) {
    $self->setAttribute('ID', shift);
  }
  return $self->getAttribute('ID');
}

#===============================================================================
# Rinchi::Outlook::AddressList::Index

=head2 $value = $Object->Index([$new_value]);

Set or get value of the Index attribute.

  
 Type: Long
 Lower: 0
 Upper: 1

=cut

sub Index() {
  my $self = shift;
  if (@_) {
    if ($_[0] =~ /^[-+]?[0-9]+$/ ) {
      $self->setAttribute('Index', shift);
    } else {
      carp 'Found type \'' . ref($_[0]) . '\', expecting type \'Long\' for attribute \'Index\'';
    }
  }
  return $self->getAttribute('Index');
}

#===============================================================================
# Rinchi::Outlook::AddressList::IsReadOnly

=head2 $value = $Object->IsReadOnly([$new_value]);

Set or get value of the IsReadOnly attribute.

  
 Type: Boolean
 Lower: 0
 Upper: 1

=cut

sub IsReadOnly() {
  my $self = shift;
  if (@_) {
    if ($_[0] =~ /^(true|false)$/i ) {
      $self->setAttribute('IsReadOnly', lc shift);
    } else {
      carp 'Found type \'' . ref($_[0]) . '\', expecting type \'Boolean\' for attribute \'IsReadOnly\'';
    }
  }
  return $self->getAttribute('IsReadOnly');
}

##END_PACKAGE AddressList

lib/Rinchi/Outlook.pm  view on Meta::CPAN

  
 Type: String
 Lower: 0
 Upper: 1

=cut

sub BCC() {
  my $self = shift;
  if (@_) {
    $self->setAttribute('BCC', shift);
  }
  return $self->getAttribute('BCC');
}

#===============================================================================
# Rinchi::Outlook::MailItem::BodyFormat

=head2 $value = $Object->BodyFormat([$new_value]);

Set or get value of the BodyFormat attribute.

  
 Type: OlBodyFormat
 Lower: 0
 Upper: 1

=cut

sub BodyFormat() {
  my $self = shift;
  if (@_) {
    if ($_[0] =~ /^[-+]?[0-9]+$/ ) {
      $self->setAttribute('BodyFormat', shift);
    } else {
      if(ref($_[0])) {
        carp 'Found type \'' . ref($_[0]) . '\', expecting type \'Rinchi::Outlook::OlBodyFormat\' for attribute \'BodyFormat\'';
      } else {
        carp 'Found scalar \'' . $_[0] . '\', expecting type \'Rinchi::Outlook::OlBodyFormat\' for attribute \'BodyFormat\'';
      }
    }
  }
  return $self->getAttribute('BodyFormat');
}

#===============================================================================
# Rinchi::Outlook::MailItem::CC

=head2 $value = $Object->CC([$new_value]);

Set or get value of the CC attribute.

  
 Type: String
 Lower: 0
 Upper: 1

=cut

sub CC() {
  my $self = shift;
  if (@_) {
    $self->setAttribute('CC', shift);
  }
  return $self->getAttribute('CC');
}

#===============================================================================
# Rinchi::Outlook::MailItem::DeferredDeliveryTime

=head2 $value = $Object->DeferredDeliveryTime([$new_value]);

Set or get value of the DeferredDeliveryTime attribute.

  
 Type: VT_DATE
 Lower: 0
 Upper: 1

=cut

sub DeferredDeliveryTime() {
  my $self = shift;
  if (@_) {
    $self->setAttribute('DeferredDeliveryTime', shift);
  }
  return $self->getAttribute('DeferredDeliveryTime');
}

#===============================================================================
# Rinchi::Outlook::MailItem::DeleteAfterSubmit

=head2 $value = $Object->DeleteAfterSubmit([$new_value]);

Set or get value of the DeleteAfterSubmit attribute.

  
 Type: Boolean
 Lower: 0
 Upper: 1

=cut

sub DeleteAfterSubmit() {
  my $self = shift;
  if (@_) {
    if ($_[0] =~ /^(true|false)$/i ) {
      $self->setAttribute('DeleteAfterSubmit', lc shift);
    } else {
      carp 'Found type \'' . ref($_[0]) . '\', expecting type \'Boolean\' for attribute \'DeleteAfterSubmit\'';
    }
  }
  return $self->getAttribute('DeleteAfterSubmit');
}

#===============================================================================
# Rinchi::Outlook::MailItem::EnableSharedAttachments

=head2 $value = $Object->EnableSharedAttachments([$new_value]);

lib/Rinchi/Outlook.pm  view on Meta::CPAN

=head2 $value = $Object->SentOnBehalfOfName([$new_value]);

Set or get value of the SentOnBehalfOfName attribute.

  
 Type: String
 Lower: 0
 Upper: 1

=cut

sub SentOnBehalfOfName() {
  my $self = shift;
  if (@_) {
    $self->setAttribute('SentOnBehalfOfName', shift);
  }
  return $self->getAttribute('SentOnBehalfOfName');
}

#===============================================================================
# Rinchi::Outlook::MailItem::Submitted

=head2 $value = $Object->Submitted([$new_value]);

Set or get value of the Submitted attribute.

  
 Type: Boolean
 Lower: 0
 Upper: 1

=cut

sub Submitted() {
  my $self = shift;
  if (@_) {
    if ($_[0] =~ /^(true|false)$/i ) {
      $self->setAttribute('Submitted', lc shift);
    } else {
      carp 'Found type \'' . ref($_[0]) . '\', expecting type \'Boolean\' for attribute \'Submitted\'';
    }
  }
  return $self->getAttribute('Submitted');
}

#===============================================================================
# Rinchi::Outlook::MailItem::To

=head2 $value = $Object->To([$new_value]);

Set or get value of the To attribute.

  
 Type: String
 Lower: 0
 Upper: 1

=cut

sub To() {
  my $self = shift;
  if (@_) {
    $self->setAttribute('To', shift);
  }
  return $self->getAttribute('To');
}

#===============================================================================
# Rinchi::Outlook::MailItem::VotingOptions

=head2 $value = $Object->VotingOptions([$new_value]);

Set or get value of the VotingOptions attribute.

  
 Type: String
 Lower: 0
 Upper: 1

=cut

sub VotingOptions() {
  my $self = shift;
  if (@_) {
    $self->setAttribute('VotingOptions', shift);
  }
  return $self->getAttribute('VotingOptions');
}

#===============================================================================
# Rinchi::Outlook::MailItem::VotingResponse

=head2 $value = $Object->VotingResponse([$new_value]);

Set or get value of the VotingResponse attribute.

  
 Type: String
 Lower: 0
 Upper: 1

=cut

sub VotingResponse() {
  my $self = shift;
  if (@_) {
    $self->setAttribute('VotingResponse', shift);
  }
  return $self->getAttribute('VotingResponse');
}

##END_PACKAGE MailItem

#===============================================================================
# Generated by Hymnos Perl Code Generator
# UML Model UUID: d5dd4544-3c43-11dd-9183-001c25551abc

package Rinchi::Outlook::MeetingItem;

use Carp;