Ajustes para OTRS 6

Rodrigo Goncalves
1 parent 2de8949e
Showing 16 changed files with 1641 additions and 774 deletions Show diff stats
CreateOpm.sh
GenerateOPM.sh
InPersonTicket.sopm
Kernel/Config/Files/InPersonTicket.xml
Kernel/Language/pt_BR_InPersonTicket.pm
Kernel/Modules/InPersonTicket.pm
Kernel/Output/HTML/Templates/Standard/InPersonTicket.tt
Kernel/Output/HTML/Templates/Standard/InPersonTicketCreated.tt
LICENSE
README.md
src/InPersonTicket.sopm
src/Kernel/Config/Files/XML/InPersonTicket.xml
src/Kernel/Language/pt_BR_InPersonTicket.pm
src/Kernel/Modules/InPersonTicket.pm
src/Kernel/Output/HTML/Templates/Standard/InPersonTicket.tt
src/var/httpd/htdocs/js/InPersonTicket.js
@@ -0,0 +1,4 @@
+#!/bin/bash
+LOCAL="$PWD"
+cd /opt/otrs
+bin/otrs.Console.pl Dev::Package::Build "$LOCAL"/InPersonTicket.sopm "$LOCAL"/
@@ -1,4 +0,0 @@
-#!/bin/bash
-LOCAL="$PWD"
-cd /opt/otrs
-bin/otrs.Console.pl Dev::Package::Build "$LOCAL"/InPersonTicket.sopm "$LOCAL"/
@@ -1,26 +0,0 @@
-<?xml version="1.0" encoding="utf-8" ?>
-<otrs_package version="1.0">
-    <Name>InPersonTicket</Name>
-    <Version>1.3.0</Version>
-    <ChangeLog Version="1.0.1" Date="22/05/2015">First version</ChangeLog>
-    <ChangeLog Version="1.1.0" Date="2016-01-26">Fixes for OTRS 5.0.x</ChangeLog>
-    <ChangeLog Version="1.2.0" Date="2016-06-10">Support for dynamic fields</ChangeLog>
-    <ChangeLog Version="1.3.0" Date="2016-06-10">Support for custom queues</ChangeLog>
-    <Framework>5.0.x</Framework>
-    <Vendor>SeTIC-UFSC</Vendor>
-    <URL>setic.ufsc.br</URL>
-    <License>Free</License>
-    <Description>In person ticket</Description>
-    <IntroInstall Type="post" Title="Thank you">Module installed successfully.</IntroInstall>
-    <BuildDate>?</BuildDate>
-    <BuildHost>?</BuildHost>
-    <PackageRequired Version="1.1">Lib_setic</PackageRequired>
-    <Filelist>
-        <File Permission="644" Location="Kernel/Config/Files/InPersonTicket.xml"></File>
-        <File Permission="644" Location="Kernel/Modules/InPersonTicket.pm"></File>
-        <File Permission="644" Location="Kernel/Language/pt_BR_InPersonTicket.pm"></File>
-        
-        <File Permission="644" Location="Kernel/Output/HTML/Templates/Standard/InPersonTicket.tt"></File>
-        <File Permission="644" Location="Kernel/Output/HTML/Templates/Standard/InPersonTicketCreated.tt"></File>
-    </Filelist>
-</otrs_package>
@@ -1,116 +0,0 @@
-<?xml version="1.0" encoding="UTF-8" ?>
-<otrs_config init="Application"	version="1.0">
-	<ConfigItem Name="Frontend::Module###InPersonTicket" Required="0" Valid="1">
-		<Description>Frontend module registration for the agent interface.</Description>
-		<Group>Ticket</Group>
-		<SubGroup>Frontend::Agent::ModuleRegistration</SubGroup>
-		<Setting>
-			<FrontendModuleReg>				
-				<Description>Module for creating new ticket for in-person reception</Description>
-				<NavBarName>Ticket</NavBarName>
-				<Title>In person ticket</Title>
-				<NavBar>
-					<Description>In person ticket</Description>
-					<Name>In person ticket</Name>
-					<Link>Action=InPersonTicket</Link>
-					<NavBar>Ticket</NavBar>
-					<Type></Type>
-					<Prio>8400</Prio>
-				</NavBar>
-			</FrontendModuleReg>
-		</Setting>
-	</ConfigItem>				
-	
-	
-	<ConfigItem Name="Ticket::Frontend::InPersonTicket###DynamicFields"
-		Required="1" Valid="1">
-		<Description>Dynamic Fields IDs to Include (comma separated) - place * before fields that should use the last value for new tickets</Description>
-		<Group>Ticket</Group>
-		<SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
-		<Setting>
-			<String Regex=""></String>
-		</Setting>
-	</ConfigItem>		
-	
-			
-	<ConfigItem Name="Ticket::Frontend::InPersonTicket###TypeID"
-		Required="1" Valid="1">
-		<Description>Default type ID for tickets</Description>
-		<Group>Ticket</Group>
-		<SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
-		<Setting>
-			<String Regex="">6</String>
-		</Setting>
-	</ConfigItem>		
-	
-	<ConfigItem Name="Ticket::Frontend::InPersonTicket###DefaultCustomerID"
-		Required="1" Valid="1">
-		<Description>Default customer  ID for tickets</Description>
-		<Group>Ticket</Group>
-		<SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
-		<Setting>
-			<String Regex="">paginas@sistemas.ufsc.br</String>
-		</Setting>
-	</ConfigItem>
-	
-	<ConfigItem Name="Ticket::Frontend::InPersonTicket###DefaultOwnerID"
-		Required="1" Valid="1">
-		<Description>Default Owner ID for tickets</Description>
-		<Group>Ticket</Group>
-		<SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
-		<Setting>
-			<String Regex="">1</String>
-		</Setting>
-	</ConfigItem>	
-	
-		<ConfigItem Name="Ticket::Frontend::InPersonTicket###DefaultUserDomain"
-		Required="1" Valid="1">
-		<Description>Default domain for user e-mails.</Description>
-		<Group>Ticket</Group>
-		<SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
-		<Setting>
-			<String Regex="">ufsc.br,grad.ufsc.br,posgrad.ufsc.br</String>
-		</Setting>
-	</ConfigItem>		
-	
-		<ConfigItem Name="Ticket::Frontend::InPersonTicket###ReplyModelID"
-		Required="1" Valid="1">
-		<Description>Model to use for reply to users.</Description>
-		<Group>Ticket</Group>
-		<SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
-		<Setting>
-			<String Regex="">22</String>
-		</Setting>
-	</ConfigItem>		
-	
-		<ConfigItem Name="Ticket::Frontend::InPersonTicket###ReplyModelIDClosed"
-		Required="1" Valid="1">
-		<Description>Model to use for reply to users when ticket is closed.</Description>
-		<Group>Ticket</Group>
-		<SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
-		<Setting>
-			<String Regex="">5</String>
-		</Setting>
-	</ConfigItem>		
-	
-<ConfigItem Name="Ticket::Frontend::InPersonTicket###QueuePrefix"
-		Required="0" Valid="1">
-		<Description>When the queue comes from a field in the form, a prefix can be attached to the value while searching for the queue. A space is added between this and the queue name.</Description>
-		<Group>Ticket</Group>
-		<SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
-		<Setting>
-			<String Regex="">Primeiro nível -</String>
-		</Setting>
-	</ConfigItem>
-	
-	<ConfigItem Name="Ticket::Frontend::InPersonTicket###QueueField"
-		Required="0" Valid="1">
-		<Description>Name of the field in the form which indicates the queue to send the ticket.</Description>
-		<Group>Ticket</Group>
-		<SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
-		<Setting>
-			<String Regex="">DF_unidade</String>
-		</Setting>
-	</ConfigItem>	
-	
-</otrs_config>
 \ No newline at end of file
@@ -1,28 +0,0 @@
-# --
-# Kernel/Modules/pt_BR_StatisticsGraphs.pm - translations for StatisticsGraphs Module
-# Translations
-# 
-# Copyright (C) 2015 (Rodrigo Goncalves) (rodrigo.g@ufsc.br)
-# --
-# This software comes with ABSOLUTELY NO WARRANTY. For details, see
-# the enclosed file COPYING for license information (AGPL). If you
-# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
-# --
-package Kernel::Language::pt_BR_InPersonTicket;
-
-use strict;
-use warnings;
-use utf8;
-
-sub Data {
-    my $Self = shift;
-
-	$Self->{Translation}->{'Concluded'} = 'Concluído';
-	$Self->{Translation}->{'In person ticket'} = 'Atendimento presencial';
-	$Self->{Translation}->{'The ticket has been created with number:'} = 'Chamado criado com número: ';
-	$Self->{Translation}->{'Dynamic Fields IDs to Include (comma separated)'} = 'IDs dos campos dinâmicos, separados por vírgula - coloque * antes de campos que não devem usar o último valor para novos tickets';
-	
-	    
-    return 1;
-}
-1;
 \ No newline at end of file
@@ -1,428 +0,0 @@
-# --
-# Kernel/Modules/OcurrenceControl.pm - frontend module
-# Copyright (C) (2013) (Carlos Rebelato) (carlos.rebelato@grad.ufsc.br)
-# --
-# $Id: writing-otrs-application.xml,v 1.1 2010/08/13 08:59:28 mg Exp $
-# --
-# This software comes with ABSOLUTELY NO WARRANTY. For details, see
-# the enclosed file COPYING for license information (AGPL). If you
-# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
-# --
-# Autor: Rodrigo Gonçalves
-# Data.: 18/05/2015 - Versão inicial
-#
-package Kernel::Modules::InPersonTicket;
-
-use strict;
-use warnings;
-use Data::Dumper;
-
-our @ObjectDependencies = (
-	"Kernel::Output::HTML::Layout",
-	"Kernel::System::Log",
-	"Kernel::System::Web::Request",    # OLD ParamObject
-	"Kernel::System::DB",
-	"Kernel::Config",
-	"Kernel::System::CustomerUser",
-	"Kernel::System::Service",	
-	"Kernel::System::DynamicField::Backend",
-	"Kernel::System::DynamicField",
-	"Kernel::System::User"
-);
-
-sub new {
-	my ( $Type, %Param ) = @_;
-
-	# allocate new hash for object
-	my $Self = {%Param};
-	bless( $Self, $Type );
-
-	return $Self;
-}
-
-sub Run {
-	my ( $Self, %Param ) = @_;
-	my %Data = ();
-
-	my $layoutObject  = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
-	my $paramObject   = $Kernel::OM->Get("Kernel::System::Web::Request");
-	my $dbObject      = $Kernel::OM->Get("Kernel::System::DB");
-	my $serviceObject = $Kernel::OM->Get("Kernel::System::Service");
-	
-	$Self->BuildServiceBlock();
-	$Self->BuildDynamicFieldsFields();
-	
-	
-    if ( $paramObject->GetParam( Param => "Subaction" ) && ($paramObject->GetParam( Param => "Subaction" ) eq "GetUserName") ) {
-		my $content = $Self->GetUserName(UserID => $paramObject->GetParam( Param => "UserID" ));
-
-		return $layoutObject->Attachment(
-			ContentType => 'application/text; charset=' . $layoutObject->{Charset},
-			Content     => $content,
-			Type        => 'inline',
-			NoCache     => 1,
-		);
-	} elsif ( $paramObject->GetParam( Param => "Subaction" ) && ($paramObject->GetParam( Param => "Subaction" ) eq "Add") ) {
-		return $Self->CreateTicket();
-	}
-	
-	
-	my $Output = $layoutObject->Header( Title => "In person ticket" );
-	$Output .= $layoutObject->NavigationBar();
-	$Output .= $layoutObject->Output(
-		TemplateFile => 'InPersonTicket'
-	);
-
-	$Output .= $layoutObject->Footer();
-	return $Output;
-
-	return $Output;
-
-}
-
-sub GetUserName {
-	my ( $Self, %Param ) = @_;
-	
-	my $userObject = $Kernel::OM->Get("Kernel::System::CustomerUser");
-    my %dados = $userObject->CustomerUserDataGet(User => $Param{"UserID"});
-   	
-   	if (%dados) {
-    	return $dados{UserFirstname};
-    } else {
-    	return "";
-    }    
-	
-}
-
-sub BuildDynamicFieldsFields {
-	my ( $Self, %Param ) = @_;
-	
-	my $DynamicFieldBackendObject = $Kernel::OM->Get('Kernel::System::DynamicField::Backend');	
-	my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
-	my $ConfigObject = $Kernel::OM->Get("Kernel::Config");
-	my $config = $ConfigObject->Get("Ticket::Frontend::InPersonTicket");
-	my $layoutObject  = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
-	my $paramObject   = $Kernel::OM->Get("Kernel::System::Web::Request");
-	my $userObject    = $Kernel::OM->Get("Kernel::System::User");
-	my @dfieldList = @{ $DynamicFieldObject->DynamicFieldListGet( Valid => 1 ) };
-	my @dynamicFieldsInuse = split(",", $config->{DynamicFields} || "unidade");
-	my %prefs = $userObject->GetPreferences(UserID => $Self->{UserID});
-	
-	foreach (@dfieldList) {
-		my $field = $_;
-		if ($field->{Name} ~~ @dynamicFieldsInuse || '*' . $field->{Name} ~~ @dynamicFieldsInuse) {
-			
-			my $defValue = "";
-			
-			if ($field->{Name} ~~ @dynamicFieldsInuse) { 
-				$defValue = $prefs{"IPT_DF_" . $field->{Name}};
-			}
-			
-			my $DynamicFieldHTML = $DynamicFieldBackendObject->EditFieldRender(				
-                DynamicFieldConfig   => $field,
-                LayoutObject         => $layoutObject,
-                ParamObject          => $paramObject,
-                Value			     => $defValue,
-            );
-			
-            $layoutObject->Block(
-	            Name => 'DynamicField',
-	            Data => {
-	                Name  => $field->{Name},
-	                Label => $DynamicFieldHTML->{Label},
-	                Field => $DynamicFieldHTML->{Field},
-	            },
-        	);
-		}
-	}	
-	
-}
-
-sub BuildServiceBlock {
-	my ( $Self, %Param ) = @_;
-	
-	my $layoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
-    my $paramObject = $Kernel::OM->Get("Kernel::System::Web::Request");
-    my $dbObject = $Kernel::OM->Get("Kernel::System::DB"); 
-    my $ocurrenceObject = $Kernel::OM->Get("Kernel::System::Ocurrence"); 
-    my $serviceObject = $Kernel::OM->Get("Kernel::System::Service");
-    my $serviceResponsibility = $Kernel::OM->Get("Kernel::System::ServiceResponsibility");
-
-	my $services = $serviceObject->ServiceListGet( Valid => 1, UserID => 1);
-	my @services = @$services;
-	@services = sort {$a->{Name} cmp $b->{Name}} @services;
-	
-	foreach my $service (@services) {
-		$layoutObject->Block(
-			Name => 'selectService',
-			Data => {
-				ServiceID   => $service->{ServiceID},
-				ServiceName => $Self->GetServiceName(Services => \@services, ServiceID => $service->{ServiceID}, ServiceName => $service->{Name}),
-				Disabled    => $Self->LeafService(Services => \@services, ServiceID => $service->{ServiceID}) ? "" : "disabled"
-			}
-		);
-	}
-}
-
-sub GetServiceName {
-	my ( $Self, %Param ) = @_;
-	
-	if ($Self->LeafService(%Param)) {		
-		my @tokens = split("::", $Param{ServiceName});
-		return "&nbsp;&nbsp;" x (@tokens - 1) . @tokens[@tokens - 1];	
-	} else {
-		return $Param{ServiceName};
-	}
-}
-
-sub LeafService {
-	my ( $Self, %Param ) = @_;
-		
-	my $services = $Param{Services};
-	my @services = @$services;
-	my $serviceID = $Param{ServiceID};
-	
-	foreach my $service (@services) {
-		if ((exists $service->{ParentID}) && ($service->{ParentID} == $serviceID)) {
-			return 0;
-		}
-	}
-	
-	return 1;	
-}
-
-sub GetQueueID() {
-	my ( $Self, %Param ) = @_;
-	
-	my $ParamObject = $Kernel::OM->Get("Kernel::System::Web::Request");
-	my $QueueObject = $Kernel::OM->Get("Kernel::System::Queue");
-	my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
-	my $ConfigObject = $Kernel::OM->Get("Kernel::Config");
-	my $LayoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
-	my $DynamicFieldBackendObject = $Kernel::OM->Get('Kernel::System::DynamicField::Backend');		
-
-	# Gets default Queue
-	my $ConfigTicket       = $ConfigObject->Get("Ticket::Frontend::CustomerTicketMessage");
-
-	my $QueueDefault = $ConfigTicket->{"QueueDefault"};
-
-	my %QueueListID = $QueueObject->QueueList( Valid         => 1 );
-	my %QueueList   = reverse $QueueObject->QueueList( Valid => 1 );
-	my $QueueID = $QueueList{$QueueDefault};
-	my $Queue = $QueueListID{$QueueID};
-	
-	$Self->{ConfigModule} = $ConfigObject->Get("Ticket::Frontend::InPersonTicket");
-	
-	# Checks if there is a field for the queue
-	my $QueuePrefix = $Self->{ConfigModule}->{"QueuePrefix"};
-	my $QueueField  = $Self->{ConfigModule}->{"QueueField"};
-
-	if ( $QueuePrefix && $QueueField ) {
-		my $dynFieldQueue = $DynamicFieldObject->DynamicFieldGet( Name => $QueueField );		
-		my $QueueSelected = $DynamicFieldBackendObject->EditFieldValueGet(
-		            DynamicFieldConfig => $dynFieldQueue,
-		            ParamObject        => $ParamObject,
-		            LayoutObject       => $LayoutObject,
-		        );		
-		
-		my $QueueName = "$QueuePrefix $QueueSelected";
-
-		if ( $QueueList{$QueueName} ) {
-			$QueueID = $QueueList{$QueueName};
-			$Queue   = $QueueName;
-		}
-	}
-	
-	return ( $Queue, $QueueID );
-}
-
-sub CreateTicket {
-	my ( $Self, %Param ) = @_;
-	my %Data = ();
-	
-	my $TicketObject = $Kernel::OM->Get("Kernel::System::Ticket");
-	my $ConfigObject = $Kernel::OM->Get("Kernel::Config");
-	my $ParamObject = $Kernel::OM->Get("Kernel::System::Web::Request");
-	my $BackendObject = $Kernel::OM->Get("Kernel::System::DynamicField::Backend");
-	my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
-	my $CustomerUserObject = $Kernel::OM->Get("Kernel::System::CustomerUser");
-	my $LayoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
-	my $userObject    = $Kernel::OM->Get("Kernel::System::User");
-	my $DynamicFieldBackendObject = $Kernel::OM->Get('Kernel::System::DynamicField::Backend');	
-	
-	
-	# Queue
-	my ( $Queue, $QueueID ) = $Self->GetQueueID(%Param);
-	$Data{QueueID} = $QueueID;
-	my $email = $ParamObject->GetParam( Param => "userID" );
-
-	$Self->{Config} = $ConfigObject->Get("Ticket::Frontend::CustomerTicketMessage");
-	
-	$Self->{ConfigModule} = $ConfigObject->Get("Ticket::Frontend::InPersonTicket");
-
-	my $TicketID = $TicketObject->TicketCreate(
-		Title        => "Atendimento presencial",
-		QueueID      => $QueueID,
-		Priority     => $Self->{Config}->{PriorityDefault},
-		Lock         => 'unlock',
-		State        => ($ParamObject->GetParam(Param => "concluded") ? 'closed successful' : 'new'),
-		ServiceID    => $ParamObject->GetParam( Param => "ServiceID" ),
-		TypeID       => $Self->{ConfigModule}->{TypeID},
-		CustomerID   => $Self->GetUserIDFromEmail( EMail => $email, DefaultUserDomain => $Self->{ConfigModule}->{DefaultUserDomain}, DefaultCustomerID => $Self->{ConfigModule}->{DefaultCustomerID}),
-		CustomerUser => $Self->GetUserIDFromEmail( EMail => $email, DefaultUserDomain => $Self->{ConfigModule}->{DefaultUserDomain}, DefaultCustomerID => $Self->{ConfigModule}->{DefaultCustomerID}),
-		OwnerID      => $Self->{ConfigModule}->{DefaultOwnerID},
-		UserID       => $Self->{ConfigModule}->{DefaultOwnerID},
-	);
-
-	my @dfieldList = @{ $DynamicFieldObject->DynamicFieldListGet( Valid => 1 ) };
-	my @dynamicFieldsInuse = split(",", $Self->{ConfigModule}->{DynamicFields} || "unidade");	
-	
-	foreach (@dfieldList) {
-		my $field = $_;
-		
-		if ($field->{Name} ~~ @dynamicFieldsInuse || '*' . $field->{Name} ~~ @dynamicFieldsInuse) {
-			my $value = $DynamicFieldBackendObject->EditFieldValueGet(
-		            DynamicFieldConfig => $field,
-		            ParamObject        => $ParamObject,
-		            LayoutObject       => $LayoutObject,
-		        );			
-
-			if ($field->{Name} ~~ @dynamicFieldsInuse) {
-	        	$userObject->SetPreferences(
-					UserID => $Self->{UserID},
-					Key    => "IPT_DF_" . $field->{Name},
-					Value  => $value,
-				);
-			}
-	        
-	        if ($value) {
-	        	$DynamicFieldBackendObject->ValueSet(
-					DynamicFieldConfig => $field,
-					ObjectID           => $TicketID,
-					Value  => $value,
-					UserID => $Self->{UserID},
-				);
-	        }
-		}
-	}
-	
-	my $MimeType      = 'text/plain';
-
-	# Create article
-	my $FullName  = $ParamObject->GetParam( Param => "UserName" );
-	
-	my $From      = "\"$FullName\" <$email>";
-	my $ArticleID = $TicketObject->ArticleCreate(
-		TicketID         => $TicketID,
-		ArticleType      => 'phone',
-		SenderType       => 'customer',
-		From             => $email,
-		To               => $Queue,
-		Subject          => "Registro de atendimento",
-		Body             => $ParamObject->GetParam( Param => "Description" ),
-		MimeType         => $MimeType,
-		Charset          => $LayoutObject->{UserCharset},
-		UserID           => $Self->{ConfigModule}->{DefaultOwnerID},
-		HistoryType      => $Self->{Config}->{HistoryType},
-		HistoryComment   => $Self->{Config}->{HistoryComment} || '%%',
-		AutoResponseType => '',
-		OrigHeader => {
-			From    => $From,
-			To      => $Queue,
-			Subject => "Registro de atendimento",
-			Body    => $ParamObject->GetParam( Param => "Description" ),
-		},
-		Queue => $Queue,
-	);
-		
-	 my $ReplyUser = $Kernel::OM->Get('Kernel::System::TemplateGenerator')->Template(
-        TemplateID         => ($ParamObject->GetParam(Param => "concluded") ? $Self->{ConfigModule}->{ReplyModelIDClosed} : $Self->{ConfigModule}->{ReplyModelID}),
-        TicketID         => $TicketID,
-        UserID           => $Self->{ConfigModule}->{DefaultOwnerID},
-    );
-    
-    my $corpo = $ParamObject->GetParam( Param => "Description" );
-    $ReplyUser =~ s/CONTEUDO/$corpo/g;
-        
-      my %sysAddr = $Kernel::OM->Get('Kernel::System::SystemAddress')->SystemAddressGet(ID => 1);      
-              
-      my $FromSystem = $sysAddr{Name};
-        
-        $MimeType      = 'text/html';
-        
-     $ArticleID = $TicketObject->ArticleSend(
-       TicketID    => $TicketID,
-       ArticleType => 'note-internal',                                        # email-external|email-internal|phone|fax|...
-       SenderType  => 'agent',                                                # agent|system|customer
-       From		   => $FromSystem,
-       To          => $email,             # not required but useful
-       Subject     => 'Registro de atendimento',                               # required
-       Body        => $ReplyUser,                                     # required
-       Charset          => $LayoutObject->{UserCharset},
-       MimeType         => $MimeType,
-       Loop        => 0, # 1|0 used for bulk emails
-       HistoryType    => 'AddNote',  # Move|AddNote|PriorityUpdate|WebRequestCustomer|...
-       HistoryComment => 'Auto-reply ao usuário',
-       NoAgentNotify  => 0,            # if you don't want to send agent notifications
-       UserID         => $Self->{ConfigModule}->{DefaultOwnerID},
-   );	
-
-	$Data{TicketNumber} = $TicketObject->TicketNumberLookup( TicketID => $TicketID );
-
-	# build output
-	my $Output = $LayoutObject->Header( Title => "In person ticket" );
-	my %BlockData = ();
-	$BlockData{TicketNumber} = '<a href="/otrs/index.pl?Action=AgentTicketZoom;TicketID=' . $TicketID . '">' . $Data{TicketNumber} . '</a>';
-	$LayoutObject->Block(
-				Name => 'NewTicketCreated',
-				Data => \%BlockData				
-			);
-	
-	$Output .= $LayoutObject->NavigationBar();
-	$Output .= $LayoutObject->Output(
-		Data         => \%Data,
-		TemplateFile => 'InPersonTicketCreated',
-	);
-	$Output .= $LayoutObject->Footer();
-	return $Output;
-}
-
-
-sub GetUserIDFromEmail {
-	my ( $Self, %Param ) = @_;
-	
-	my $email = $Param{EMail};
-	my $result     = $Param{DefaultCustomerID};
-	my $domainList = $Param{DefaultUserDomain};
-	
-	if (index($email, '@') == -1) {
-		return $email;
-	}
-	
-	my $CustomerUserObject = $Kernel::OM->Get("Kernel::System::CustomerUser");
-
-	if ($domainList) {
-		my @domains = split( ",", $domainList );
-		
-		for my $domain (@domains) {
-			my @parts = split( "@", $email );
-			if ( $parts[1] eq $domain ) {
-				my $id   = $parts[0];
-				my %List = $CustomerUserObject->CustomerSearch(
-					UserLogin => $id,
-					Valid     => 1,              # not required, default 1
-				);
-				if ( keys %List ) {
-					$result = $id;
-					return $result;
-				}
-			}
-		}
-	}
-
-	return $result;
-}
-
-
-
-1;
@@ -1,141 +0,0 @@
-# --
-# Kernel/Output/HTML/Standard/EditOcurrence.tt - overview
-# Copyright (C) (2014) (Carlos Rebelatto) (carlos.rebelatto@grad.ufsc.br)
-# --
-# $Id: writing-otrs-application.xml,v 1.1 2010/08/13 08:59:28 mg Exp $
-# --
-# This software comes with ABSOLUTELY NO WARRANTY. For details, see
-# the enclosed file COPYING for license information (AGPL). If you
-# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
-# --
-<div class="MainBox ARIARoleMain LayoutFixedSidebar SidebarFirst">
-
-	<h1>[% Translate("In person ticket") | html %]</h1>
-
-
-	<div class="ContentColumn">
-		<div class="WidgetSimple">
-			<div class="Header">
-				<h2>[% Translate("New ticket") | html %]</h2>
-			</div>
-			
-	[% RenderBlockStart("NewTicketCreated") %]
-	<div class="Header">
-		<h2 style="text-align: right; font-weight: bolder; font-size: larger; color: red">[% Translate("The ticket has been created with number:") | html %][% Data.TicketNumber %]
-	</div>	
-	[% RenderBlockEnd("NewTicketCreated") %]
-			
-			
-			<div class="Content SpacingBottom ">
-
-				<form action="[% Env("CGIHandle") %]" method="post" enctype="multipart/form-data" name="compose" id="InPersonTicket" class="Validate PreventMultipleSubmits">
-
-					<input type="hidden" name="Action" value="[% Env("Action") %]"/>
-					<input type="hidden" name="Subaction" value="Add"/>
-
-						<fieldset class="TableLike">
-							<label for="userID" class="Mandatory"><span class="Marker">*</span> [% Translate("E-mail") | html %]:</label>
-							<input class="Validate_Required" type="text" name="userID" id="userID" style="margin-left: 10px; width: 400px" />
-							<div class="Clear"></div>
-							
-							<label for="UserName" class="Mandatory"><span class="Marker">*</span> [% Translate("Nome") | html %]:</label>
-							<input class="Validate_Required" type="text" name="UserName" id="UserName" style="margin-left: 10px; width: 400px" />
-							<div class="Clear"></div>
-
-							<label for="SelectService" class="Mandatory"><span class="Marker">*</span> [% Translate("Serviço") | html %]:</label>
-								<select class="Validate_Required" style="margin-left: 10px" name="ServiceID" id="SelectService">
-									<option selected disabled value="0">[% Translate("Select a service") | html %]</option>
-								[% RenderBlockStart("selectService") %]
-									<option [% Data.Disabled %] value="[% Data.ServiceID | html %]">[% Data.ServiceName %]</option>
-								[% RenderBlockEnd("selectService") %]
-								</select>							
-							<div class="Clear"></div>
-														
-							
-							[% RenderBlockStart("DynamicField") %]
-								[% Data.Label %]
-								<div class="Field">											
-								[% Data.Field %]	
-								</div>			
-							<div class="Clear"></div>
-							
-							
-								
-							[% RenderBlockEnd("DynamicField") %]
-								
-
-							<label class="OtherMandatory" for="RichTextDescription"><span class="Marker">*</span> [% Translate("Description") | html %]:</label>
-                   			<div id="RichTextField" class="RichTextField" >
-
-								[% RenderBlockStart("RichText") %]
-								[% InsertTemplate("RichTextEditor.tt") %]
-								[% RenderBlockEnd("RichText") %]
-
-                        		<textarea style="width: 800px; height: 200px" id="RichTextDescription" class="RichText Validate_Required [% Data.BodyInvalid | html %]" name="Description" title="Description">[% Data.Description %]</textarea>
-                       			<div id="RichTextError" class="TooltipErrorMessage"><p>[% Translate("This field is required.") | html %]</p></div>
-                       		 	<div id="RichTextServerError" class="TooltipErrorMessage"><p>[% Translate("This field is required.") | html %]</p></div>
-                       		 	
-                       		 	<div style="display: block; padding: 5px; border-style: solid; border-color: black; border-width: 1px">
-                       		 		Atalhos: 
-                       		 	      <button type="button" onclick="javascript:modeloServicoConfigurado()">Serviço configurado</button>
-                       		 	      </div>                 		 	
-                   		 	</div>
-							<div class="Clear"></div>
-							
-							<label for="UserId" class="Mandatory"><span class="Marker">*</span> [% Translate("Concluded") | html %]:</label>
-							<input type="checkbox" name="concluded" id="concluded" checked />
-							<div class="Clear"></div>
-							
-                  		
-							<input id='Cadastro' type='submit'  value='Registrar chamado' style="margin-left: 40%; font-weight: bolder; font-size: x-larger"/>	
-						</fieldset>
-					</div>
-				</form>
-			</div>
-		</div>
-	</div>
-</div>
-
-<script type="text/javascript" >
-
-function modeloServicoConfigurado() {
-	$("#RichTextDescription").val("O serviço foi ativado e/ou configurado no equipamento do usuário. Foram efetuados testes com sucesso.");
-	return false;
-}
-
-
-
-function dealEmail(email) {
-
-	var arr = email.split("@");
-	if (arr[0]) {
-
-	var url = "/otrs/index.pl?Action=InPersonTicket;Subaction=GetUserName;UserID=" + arr[0];
-	
-	$.get(url, function(data) {
-		$("#UserName").val(data);
-		if (data) {
-			$("#SelectService").focus();
-		}
-		
-	
-    }).fail(function(jqXHR, textStatus, errorThrown) {
-    	alert(textStatus);
-  });
-  }
-  
-  
-}
-
-</script>
-
-
-[% WRAPPER JSOnDocumentComplete %]
-$("#SelectService").val([% Data.ServiceID %]);
-
-$("#userID").blur(function() {
-	dealEmail($("#userID").val());  
-});
-
-[% END %]
-
@@ -1,31 +0,0 @@
-# --
-# Kernel/Output/HTML/Standard/EditOcurrence.tt - overview
-# Copyright (C) (2014) (Carlos Rebelatto) (carlos.rebelatto@grad.ufsc.br)
-# --
-# $Id: writing-otrs-application.xml,v 1.1 2010/08/13 08:59:28 mg Exp $
-# --
-# This software comes with ABSOLUTELY NO WARRANTY. For details, see
-# the enclosed file COPYING for license information (AGPL). If you
-# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
-# --
-<div class="MainBox ARIARoleMain LayoutFixedSidebar SidebarFirst">
-
-	<h1>[% Translate("In person ticket") | html %]</h1>
-
-
-	<div class="ContentColumn">
-		<div class="WidgetSimple">
-			<div class="Header">
-				<h2>[% Translate("New ticket") | html %]</h2>
-			</div>
-			
-	[% RenderBlockStart("NewTicketCreated") %]
-	<div class="Header">
-		<h2 style="text-align: center; font-weight: bolder; font-size: x-larger; color: red">[% Translate("The ticket has been created with number:") | html %][% Data.TicketNumber %]
-	</div>	
-	[% RenderBlockEnd("NewTicketCreated") %]
-		
-		</div>
-	</div>
-</div>
-
@@ -0,0 +1,661 @@
+                    GNU AFFERO GENERAL PUBLIC LICENSE
+                       Version 3, 19 November 2007
+
+ Copyright (C) 2007 Free Software Foundation, Inc. <http://fsf.org/>
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The GNU Affero General Public License is a free, copyleft license for
+software and other kinds of works, specifically designed to ensure
+cooperation with the community in the case of network server software.
+
+  The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+our General Public Licenses are intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+  Developers that use our General Public Licenses protect your rights
+with two steps: (1) assert copyright on the software, and (2) offer
+you this License which gives you legal permission to copy, distribute
+and/or modify the software.
+
+  A secondary benefit of defending all users' freedom is that
+improvements made in alternate versions of the program, if they
+receive widespread use, become available for other developers to
+incorporate.  Many developers of free software are heartened and
+encouraged by the resulting cooperation.  However, in the case of
+software used on network servers, this result may fail to come about.
+The GNU General Public License permits making a modified version and
+letting the public access it on a server without ever releasing its
+source code to the public.
+
+  The GNU Affero General Public License is designed specifically to
+ensure that, in such cases, the modified source code becomes available
+to the community.  It requires the operator of a network server to
+provide the source code of the modified version running there to the
+users of that server.  Therefore, public use of a modified version, on
+a publicly accessible server, gives the public access to the source
+code of the modified version.
+
+  An older license, called the Affero General Public License and
+published by Affero, was designed to accomplish similar goals.  This is
+a different license, not a version of the Affero GPL, but Affero has
+released a new version of the Affero GPL which permits relicensing under
+this license.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+                       TERMS AND CONDITIONS
+
+  0. Definitions.
+
+  "This License" refers to version 3 of the GNU Affero General Public License.
+
+  "Copyright" also means copyright-like laws that apply to other kinds of
+works, such as semiconductor masks.
+
+  "The Program" refers to any copyrightable work licensed under this
+License.  Each licensee is addressed as "you".  "Licensees" and
+"recipients" may be individuals or organizations.
+
+  To "modify" a work means to copy from or adapt all or part of the work
+in a fashion requiring copyright permission, other than the making of an
+exact copy.  The resulting work is called a "modified version" of the
+earlier work or a work "based on" the earlier work.
+
+  A "covered work" means either the unmodified Program or a work based
+on the Program.
+
+  To "propagate" a work means to do anything with it that, without
+permission, would make you directly or secondarily liable for
+infringement under applicable copyright law, except executing it on a
+computer or modifying a private copy.  Propagation includes copying,
+distribution (with or without modification), making available to the
+public, and in some countries other activities as well.
+
+  To "convey" a work means any kind of propagation that enables other
+parties to make or receive copies.  Mere interaction with a user through
+a computer network, with no transfer of a copy, is not conveying.
+
+  An interactive user interface displays "Appropriate Legal Notices"
+to the extent that it includes a convenient and prominently visible
+feature that (1) displays an appropriate copyright notice, and (2)
+tells the user that there is no warranty for the work (except to the
+extent that warranties are provided), that licensees may convey the
+work under this License, and how to view a copy of this License.  If
+the interface presents a list of user commands or options, such as a
+menu, a prominent item in the list meets this criterion.
+
+  1. Source Code.
+
+  The "source code" for a work means the preferred form of the work
+for making modifications to it.  "Object code" means any non-source
+form of a work.
+
+  A "Standard Interface" means an interface that either is an official
+standard defined by a recognized standards body, or, in the case of
+interfaces specified for a particular programming language, one that
+is widely used among developers working in that language.
+
+  The "System Libraries" of an executable work include anything, other
+than the work as a whole, that (a) is included in the normal form of
+packaging a Major Component, but which is not part of that Major
+Component, and (b) serves only to enable use of the work with that
+Major Component, or to implement a Standard Interface for which an
+implementation is available to the public in source code form.  A
+"Major Component", in this context, means a major essential component
+(kernel, window system, and so on) of the specific operating system
+(if any) on which the executable work runs, or a compiler used to
+produce the work, or an object code interpreter used to run it.
+
+  The "Corresponding Source" for a work in object code form means all
+the source code needed to generate, install, and (for an executable
+work) run the object code and to modify the work, including scripts to
+control those activities.  However, it does not include the work's
+System Libraries, or general-purpose tools or generally available free
+programs which are used unmodified in performing those activities but
+which are not part of the work.  For example, Corresponding Source
+includes interface definition files associated with source files for
+the work, and the source code for shared libraries and dynamically
+linked subprograms that the work is specifically designed to require,
+such as by intimate data communication or control flow between those
+subprograms and other parts of the work.
+
+  The Corresponding Source need not include anything that users
+can regenerate automatically from other parts of the Corresponding
+Source.
+
+  The Corresponding Source for a work in source code form is that
+same work.
+
+  2. Basic Permissions.
+
+  All rights granted under this License are granted for the term of
+copyright on the Program, and are irrevocable provided the stated
+conditions are met.  This License explicitly affirms your unlimited
+permission to run the unmodified Program.  The output from running a
+covered work is covered by this License only if the output, given its
+content, constitutes a covered work.  This License acknowledges your
+rights of fair use or other equivalent, as provided by copyright law.
+
+  You may make, run and propagate covered works that you do not
+convey, without conditions so long as your license otherwise remains
+in force.  You may convey covered works to others for the sole purpose
+of having them make modifications exclusively for you, or provide you
+with facilities for running those works, provided that you comply with
+the terms of this License in conveying all material for which you do
+not control copyright.  Those thus making or running the covered works
+for you must do so exclusively on your behalf, under your direction
+and control, on terms that prohibit them from making any copies of
+your copyrighted material outside their relationship with you.
+
+  Conveying under any other circumstances is permitted solely under
+the conditions stated below.  Sublicensing is not allowed; section 10
+makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+  No covered work shall be deemed part of an effective technological
+measure under any applicable law fulfilling obligations under article
+11 of the WIPO copyright treaty adopted on 20 December 1996, or
+similar laws prohibiting or restricting circumvention of such
+measures.
+
+  When you convey a covered work, you waive any legal power to forbid
+circumvention of technological measures to the extent such circumvention
+is effected by exercising rights under this License with respect to
+the covered work, and you disclaim any intention to limit operation or
+modification of the work as a means of enforcing, against the work's
+users, your or third parties' legal rights to forbid circumvention of
+technological measures.
+
+  4. Conveying Verbatim Copies.
+
+  You may convey verbatim copies of the Program's source code as you
+receive it, in any medium, provided that you conspicuously and
+appropriately publish on each copy an appropriate copyright notice;
+keep intact all notices stating that this License and any
+non-permissive terms added in accord with section 7 apply to the code;
+keep intact all notices of the absence of any warranty; and give all
+recipients a copy of this License along with the Program.
+
+  You may charge any price or no price for each copy that you convey,
+and you may offer support or warranty protection for a fee.
+
+  5. Conveying Modified Source Versions.
+
+  You may convey a work based on the Program, or the modifications to
+produce it from the Program, in the form of source code under the
+terms of section 4, provided that you also meet all of these conditions:
+
+    a) The work must carry prominent notices stating that you modified
+    it, and giving a relevant date.
+
+    b) The work must carry prominent notices stating that it is
+    released under this License and any conditions added under section
+    7.  This requirement modifies the requirement in section 4 to
+    "keep intact all notices".
+
+    c) You must license the entire work, as a whole, under this
+    License to anyone who comes into possession of a copy.  This
+    License will therefore apply, along with any applicable section 7
+    additional terms, to the whole of the work, and all its parts,
+    regardless of how they are packaged.  This License gives no
+    permission to license the work in any other way, but it does not
+    invalidate such permission if you have separately received it.
+
+    d) If the work has interactive user interfaces, each must display
+    Appropriate Legal Notices; however, if the Program has interactive
+    interfaces that do not display Appropriate Legal Notices, your
+    work need not make them do so.
+
+  A compilation of a covered work with other separate and independent
+works, which are not by their nature extensions of the covered work,
+and which are not combined with it such as to form a larger program,
+in or on a volume of a storage or distribution medium, is called an
+"aggregate" if the compilation and its resulting copyright are not
+used to limit the access or legal rights of the compilation's users
+beyond what the individual works permit.  Inclusion of a covered work
+in an aggregate does not cause this License to apply to the other
+parts of the aggregate.
+
+  6. Conveying Non-Source Forms.
+
+  You may convey a covered work in object code form under the terms
+of sections 4 and 5, provided that you also convey the
+machine-readable Corresponding Source under the terms of this License,
+in one of these ways:
+
+    a) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by the
+    Corresponding Source fixed on a durable physical medium
+    customarily used for software interchange.
+
+    b) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by a
+    written offer, valid for at least three years and valid for as
+    long as you offer spare parts or customer support for that product
+    model, to give anyone who possesses the object code either (1) a
+    copy of the Corresponding Source for all the software in the
+    product that is covered by this License, on a durable physical
+    medium customarily used for software interchange, for a price no
+    more than your reasonable cost of physically performing this
+    conveying of source, or (2) access to copy the
+    Corresponding Source from a network server at no charge.
+
+    c) Convey individual copies of the object code with a copy of the
+    written offer to provide the Corresponding Source.  This
+    alternative is allowed only occasionally and noncommercially, and
+    only if you received the object code with such an offer, in accord
+    with subsection 6b.
+
+    d) Convey the object code by offering access from a designated
+    place (gratis or for a charge), and offer equivalent access to the
+    Corresponding Source in the same way through the same place at no
+    further charge.  You need not require recipients to copy the
+    Corresponding Source along with the object code.  If the place to
+    copy the object code is a network server, the Corresponding Source
+    may be on a different server (operated by you or a third party)
+    that supports equivalent copying facilities, provided you maintain
+    clear directions next to the object code saying where to find the
+    Corresponding Source.  Regardless of what server hosts the
+    Corresponding Source, you remain obligated to ensure that it is
+    available for as long as needed to satisfy these requirements.
+
+    e) Convey the object code using peer-to-peer transmission, provided
+    you inform other peers where the object code and Corresponding
+    Source of the work are being offered to the general public at no
+    charge under subsection 6d.
+
+  A separable portion of the object code, whose source code is excluded
+from the Corresponding Source as a System Library, need not be
+included in conveying the object code work.
+
+  A "User Product" is either (1) a "consumer product", which means any
+tangible personal property which is normally used for personal, family,
+or household purposes, or (2) anything designed or sold for incorporation
+into a dwelling.  In determining whether a product is a consumer product,
+doubtful cases shall be resolved in favor of coverage.  For a particular
+product received by a particular user, "normally used" refers to a
+typical or common use of that class of product, regardless of the status
+of the particular user or of the way in which the particular user
+actually uses, or expects or is expected to use, the product.  A product
+is a consumer product regardless of whether the product has substantial
+commercial, industrial or non-consumer uses, unless such uses represent
+the only significant mode of use of the product.
+
+  "Installation Information" for a User Product means any methods,
+procedures, authorization keys, or other information required to install
+and execute modified versions of a covered work in that User Product from
+a modified version of its Corresponding Source.  The information must
+suffice to ensure that the continued functioning of the modified object
+code is in no case prevented or interfered with solely because
+modification has been made.
+
+  If you convey an object code work under this section in, or with, or
+specifically for use in, a User Product, and the conveying occurs as
+part of a transaction in which the right of possession and use of the
+User Product is transferred to the recipient in perpetuity or for a
+fixed term (regardless of how the transaction is characterized), the
+Corresponding Source conveyed under this section must be accompanied
+by the Installation Information.  But this requirement does not apply
+if neither you nor any third party retains the ability to install
+modified object code on the User Product (for example, the work has
+been installed in ROM).
+
+  The requirement to provide Installation Information does not include a
+requirement to continue to provide support service, warranty, or updates
+for a work that has been modified or installed by the recipient, or for
+the User Product in which it has been modified or installed.  Access to a
+network may be denied when the modification itself materially and
+adversely affects the operation of the network or violates the rules and
+protocols for communication across the network.
+
+  Corresponding Source conveyed, and Installation Information provided,
+in accord with this section must be in a format that is publicly
+documented (and with an implementation available to the public in
+source code form), and must require no special password or key for
+unpacking, reading or copying.
+
+  7. Additional Terms.
+
+  "Additional permissions" are terms that supplement the terms of this
+License by making exceptions from one or more of its conditions.
+Additional permissions that are applicable to the entire Program shall
+be treated as though they were included in this License, to the extent
+that they are valid under applicable law.  If additional permissions
+apply only to part of the Program, that part may be used separately
+under those permissions, but the entire Program remains governed by
+this License without regard to the additional permissions.
+
+  When you convey a copy of a covered work, you may at your option
+remove any additional permissions from that copy, or from any part of
+it.  (Additional permissions may be written to require their own
+removal in certain cases when you modify the work.)  You may place
+additional permissions on material, added by you to a covered work,
+for which you have or can give appropriate copyright permission.
+
+  Notwithstanding any other provision of this License, for material you
+add to a covered work, you may (if authorized by the copyright holders of
+that material) supplement the terms of this License with terms:
+
+    a) Disclaiming warranty or limiting liability differently from the
+    terms of sections 15 and 16 of this License; or
+
+    b) Requiring preservation of specified reasonable legal notices or
+    author attributions in that material or in the Appropriate Legal
+    Notices displayed by works containing it; or
+
+    c) Prohibiting misrepresentation of the origin of that material, or
+    requiring that modified versions of such material be marked in
+    reasonable ways as different from the original version; or
+
+    d) Limiting the use for publicity purposes of names of licensors or
+    authors of the material; or
+
+    e) Declining to grant rights under trademark law for use of some
+    trade names, trademarks, or service marks; or
+
+    f) Requiring indemnification of licensors and authors of that
+    material by anyone who conveys the material (or modified versions of
+    it) with contractual assumptions of liability to the recipient, for
+    any liability that these contractual assumptions directly impose on
+    those licensors and authors.
+
+  All other non-permissive additional terms are considered "further
+restrictions" within the meaning of section 10.  If the Program as you
+received it, or any part of it, contains a notice stating that it is
+governed by this License along with a term that is a further
+restriction, you may remove that term.  If a license document contains
+a further restriction but permits relicensing or conveying under this
+License, you may add to a covered work material governed by the terms
+of that license document, provided that the further restriction does
+not survive such relicensing or conveying.
+
+  If you add terms to a covered work in accord with this section, you
+must place, in the relevant source files, a statement of the
+additional terms that apply to those files, or a notice indicating
+where to find the applicable terms.
+
+  Additional terms, permissive or non-permissive, may be stated in the
+form of a separately written license, or stated as exceptions;
+the above requirements apply either way.
+
+  8. Termination.
+
+  You may not propagate or modify a covered work except as expressly
+provided under this License.  Any attempt otherwise to propagate or
+modify it is void, and will automatically terminate your rights under
+this License (including any patent licenses granted under the third
+paragraph of section 11).
+
+  However, if you cease all violation of this License, then your
+license from a particular copyright holder is reinstated (a)
+provisionally, unless and until the copyright holder explicitly and
+finally terminates your license, and (b) permanently, if the copyright
+holder fails to notify you of the violation by some reasonable means
+prior to 60 days after the cessation.
+
+  Moreover, your license from a particular copyright holder is
+reinstated permanently if the copyright holder notifies you of the
+violation by some reasonable means, this is the first time you have
+received notice of violation of this License (for any work) from that
+copyright holder, and you cure the violation prior to 30 days after
+your receipt of the notice.
+
+  Termination of your rights under this section does not terminate the
+licenses of parties who have received copies or rights from you under
+this License.  If your rights have been terminated and not permanently
+reinstated, you do not qualify to receive new licenses for the same
+material under section 10.
+
+  9. Acceptance Not Required for Having Copies.
+
+  You are not required to accept this License in order to receive or
+run a copy of the Program.  Ancillary propagation of a covered work
+occurring solely as a consequence of using peer-to-peer transmission
+to receive a copy likewise does not require acceptance.  However,
+nothing other than this License grants you permission to propagate or
+modify any covered work.  These actions infringe copyright if you do
+not accept this License.  Therefore, by modifying or propagating a
+covered work, you indicate your acceptance of this License to do so.
+
+  10. Automatic Licensing of Downstream Recipients.
+
+  Each time you convey a covered work, the recipient automatically
+receives a license from the original licensors, to run, modify and
+propagate that work, subject to this License.  You are not responsible
+for enforcing compliance by third parties with this License.
+
+  An "entity transaction" is a transaction transferring control of an
+organization, or substantially all assets of one, or subdividing an
+organization, or merging organizations.  If propagation of a covered
+work results from an entity transaction, each party to that
+transaction who receives a copy of the work also receives whatever
+licenses to the work the party's predecessor in interest had or could
+give under the previous paragraph, plus a right to possession of the
+Corresponding Source of the work from the predecessor in interest, if
+the predecessor has it or can get it with reasonable efforts.
+
+  You may not impose any further restrictions on the exercise of the
+rights granted or affirmed under this License.  For example, you may
+not impose a license fee, royalty, or other charge for exercise of
+rights granted under this License, and you may not initiate litigation
+(including a cross-claim or counterclaim in a lawsuit) alleging that
+any patent claim is infringed by making, using, selling, offering for
+sale, or importing the Program or any portion of it.
+
+  11. Patents.
+
+  A "contributor" is a copyright holder who authorizes use under this
+License of the Program or a work on which the Program is based.  The
+work thus licensed is called the contributor's "contributor version".
+
+  A contributor's "essential patent claims" are all patent claims
+owned or controlled by the contributor, whether already acquired or
+hereafter acquired, that would be infringed by some manner, permitted
+by this License, of making, using, or selling its contributor version,
+but do not include claims that would be infringed only as a
+consequence of further modification of the contributor version.  For
+purposes of this definition, "control" includes the right to grant
+patent sublicenses in a manner consistent with the requirements of
+this License.
+
+  Each contributor grants you a non-exclusive, worldwide, royalty-free
+patent license under the contributor's essential patent claims, to
+make, use, sell, offer for sale, import and otherwise run, modify and
+propagate the contents of its contributor version.
+
+  In the following three paragraphs, a "patent license" is any express
+agreement or commitment, however denominated, not to enforce a patent
+(such as an express permission to practice a patent or covenant not to
+sue for patent infringement).  To "grant" such a patent license to a
+party means to make such an agreement or commitment not to enforce a
+patent against the party.
+
+  If you convey a covered work, knowingly relying on a patent license,
+and the Corresponding Source of the work is not available for anyone
+to copy, free of charge and under the terms of this License, through a
+publicly available network server or other readily accessible means,
+then you must either (1) cause the Corresponding Source to be so
+available, or (2) arrange to deprive yourself of the benefit of the
+patent license for this particular work, or (3) arrange, in a manner
+consistent with the requirements of this License, to extend the patent
+license to downstream recipients.  "Knowingly relying" means you have
+actual knowledge that, but for the patent license, your conveying the
+covered work in a country, or your recipient's use of the covered work
+in a country, would infringe one or more identifiable patents in that
+country that you have reason to believe are valid.
+
+  If, pursuant to or in connection with a single transaction or
+arrangement, you convey, or propagate by procuring conveyance of, a
+covered work, and grant a patent license to some of the parties
+receiving the covered work authorizing them to use, propagate, modify
+or convey a specific copy of the covered work, then the patent license
+you grant is automatically extended to all recipients of the covered
+work and works based on it.
+
+  A patent license is "discriminatory" if it does not include within
+the scope of its coverage, prohibits the exercise of, or is
+conditioned on the non-exercise of one or more of the rights that are
+specifically granted under this License.  You may not convey a covered
+work if you are a party to an arrangement with a third party that is
+in the business of distributing software, under which you make payment
+to the third party based on the extent of your activity of conveying
+the work, and under which the third party grants, to any of the
+parties who would receive the covered work from you, a discriminatory
+patent license (a) in connection with copies of the covered work
+conveyed by you (or copies made from those copies), or (b) primarily
+for and in connection with specific products or compilations that
+contain the covered work, unless you entered into that arrangement,
+or that patent license was granted, prior to 28 March 2007.
+
+  Nothing in this License shall be construed as excluding or limiting
+any implied license or other defenses to infringement that may
+otherwise be available to you under applicable patent law.
+
+  12. No Surrender of Others' Freedom.
+
+  If conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot convey a
+covered work so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you may
+not convey it at all.  For example, if you agree to terms that obligate you
+to collect a royalty for further conveying from those to whom you convey
+the Program, the only way you could satisfy both those terms and this
+License would be to refrain entirely from conveying the Program.
+
+  13. Remote Network Interaction; Use with the GNU General Public License.
+
+  Notwithstanding any other provision of this License, if you modify the
+Program, your modified version must prominently offer all users
+interacting with it remotely through a computer network (if your version
+supports such interaction) an opportunity to receive the Corresponding
+Source of your version by providing access to the Corresponding Source
+from a network server at no charge, through some standard or customary
+means of facilitating copying of software.  This Corresponding Source
+shall include the Corresponding Source for any work covered by version 3
+of the GNU General Public License that is incorporated pursuant to the
+following paragraph.
+
+  Notwithstanding any other provision of this License, you have
+permission to link or combine any covered work with a work licensed
+under version 3 of the GNU General Public License into a single
+combined work, and to convey the resulting work.  The terms of this
+License will continue to apply to the part which is the covered work,
+but the work with which it is combined will remain governed by version
+3 of the GNU General Public License.
+
+  14. Revised Versions of this License.
+
+  The Free Software Foundation may publish revised and/or new versions of
+the GNU Affero General Public License from time to time.  Such new versions
+will be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+  Each version is given a distinguishing version number.  If the
+Program specifies that a certain numbered version of the GNU Affero General
+Public License "or any later version" applies to it, you have the
+option of following the terms and conditions either of that numbered
+version or of any later version published by the Free Software
+Foundation.  If the Program does not specify a version number of the
+GNU Affero General Public License, you may choose any version ever published
+by the Free Software Foundation.
+
+  If the Program specifies that a proxy can decide which future
+versions of the GNU Affero General Public License can be used, that proxy's
+public statement of acceptance of a version permanently authorizes you
+to choose that version for the Program.
+
+  Later license versions may give you additional or different
+permissions.  However, no additional obligations are imposed on any
+author or copyright holder as a result of your choosing to follow a
+later version.
+
+  15. Disclaimer of Warranty.
+
+  THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
+HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
+OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
+THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
+IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
+ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+  16. Limitation of Liability.
+
+  IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
+THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
+GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
+USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
+DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
+EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGES.
+
+  17. Interpretation of Sections 15 and 16.
+
+  If the disclaimer of warranty and limitation of liability provided
+above cannot be given local legal effect according to their terms,
+reviewing courts shall apply local law that most closely approximates
+an absolute waiver of all civil liability in connection with the
+Program, unless a warranty or assumption of liability accompanies a
+copy of the Program in return for a fee.
+
+                     END OF TERMS AND CONDITIONS
+
+            How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+state the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the GNU Affero General Public License as published
+    by the Free Software Foundation, either version 3 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU Affero General Public License for more details.
+
+    You should have received a copy of the GNU Affero General Public License
+    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+Also add information on how to contact you by electronic and paper mail.
+
+  If your software can interact with users remotely through a computer
+network, you should also make sure that it provides a way for users to
+get its source.  For example, if your program is a web application, its
+interface could display a "Source" link that leads users to an archive
+of the code.  There are many ways you could offer source, and different
+solutions will be better for different programs; see section 13 for the
+specific requirements.
+
+  You should also get your employer (if you work as a programmer) or school,
+if any, to sign a "copyright disclaimer" for the program, if necessary.
+For more information on this, and how to apply and follow the GNU AGPL, see
+<http://www.gnu.org/licenses/>.
@@ -0,0 +1,36 @@
+In Person Ticket
+==================
+
+Simple interface to quickly register an in person customer service.
+
+
+Required PERL Packages:
+-----------------------
+
+
+
+Requires OTRS Packages:
+-----------------------
+
+
+
+Config required:
+----------------
+
+All settings with the keyword "InPersonTicket" in its name should be revised prior to utilization.
+
+
+Package building:
+-----------------
+
+To build the package, do the following:
+
+	./CreateOpm.sh
+	
+The generated package will be on the `dist` directory
+
+
+Issues:
+-------
+
+This module was developed in-house and thus is provided without warranty or support. If you have a problem, please open an issue at https://softwarepublico.gov.br/gitlab/setic-ufsc/otrs-in-person-ticket/
 \ No newline at end of file
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="utf-8" ?>
+<otrs_package version="1.0">
+    <Name>InPersonTicket</Name>
+    <Version>1.4.0</Version>
+    <ChangeLog Version="1.0.1" Date="22/05/2015">First version</ChangeLog>
+    <ChangeLog Version="1.1.0" Date="2016-01-26">Fixes for OTRS 5.0.x</ChangeLog>
+    <ChangeLog Version="1.2.0" Date="2016-06-10">Support for dynamic fields</ChangeLog>
+    <ChangeLog Version="1.3.0" Date="2016-06-10">Support for custom queues</ChangeLog>
+    <ChangeLog Version="1.4.0" Date="2018-02-02">Support for OTRS 6.0.x</ChangeLog>
+    <Framework>6.0.x</Framework>
+    <Vendor>SeTIC-UFSC</Vendor>
+    <URL>setic.ufsc.br</URL>
+    <License>AGPL</License>
+    <Description>In person ticket</Description>
+    <IntroInstall Type="post" Title="Thank you">Module installed successfully.</IntroInstall>
+    <BuildDate>?</BuildDate>
+    <BuildHost>?</BuildHost>
+    <Filelist>
+        <File Permission="644" Location="Kernel/Config/Files/XML/InPersonTicket.xml"></File>
+        <File Permission="644" Location="Kernel/Modules/InPersonTicket.pm"></File>
+        <File Permission="644" Location="Kernel/Language/pt_BR_InPersonTicket.pm"></File>
+        
+        <File Permission="644" Location="Kernel/Output/HTML/Templates/Standard/InPersonTicket.tt"></File>
+        
+        <File Permission="644" Location="var/httpd/htdocs/js/InPersonTicket.js"></File>
+    </Filelist>
+</otrs_package>
@@ -0,0 +1,214 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<otrs_config init="Application" version="2.0">
+	<Setting Name="Frontend::Module###InPersonTicket" Required="0"
+		Valid="1">
+		<Description>Frontend module registration for the agent interface.
+		</Description>
+		<Navigation>Frontend::Agent::ModuleRegistration</Navigation>
+		<Value>
+			<Item ValueType="FrontendRegistration">
+				<Hash>
+					<Item Key="Group">
+						<Array>
+						</Array>
+					</Item>
+					<Item Key="GroupRo">
+						<Array>
+						</Array>
+					</Item>
+
+					<Item Key="Description">Module for creating new ticket for in-person
+						reception</Item>
+					<Item Key="Title">In person ticket</Item>
+					<Item Key="Description" Lang="pt_BR">Módulo para criar tickets para
+						atendimentos presenciais</Item>
+					<Item Key="Title" Lang="pt_BR">Atendimento presencial</Item>
+
+					<Item Key="NavBarName">Ticket</Item>
+
+				</Hash>
+			</Item>
+		</Value>
+	</Setting>
+	<Setting Name="Frontend::Navigation###InPersonTicket###002-InPersonTicket"
+		Required="0" Valid="1">
+		<Description Translatable="1">Main menu item registration.
+		</Description>
+		<Navigation>Frontend::Agent::ModuleRegistration::MainMenu</Navigation>
+		<Value>
+			<Array>
+				<DefaultItem ValueType="FrontendNavigation">
+					<Hash>
+					</Hash>
+				</DefaultItem>
+				<Item>
+					<Hash>
+						<Item Key="Group">
+							<Array>
+							</Array>
+						</Item>
+						<Item Key="GroupRo">
+							<Array>
+							</Array>
+						</Item>
+						<Item Key="Description">In person ticket</Item>
+						<Item Key="Name">In person ticket</Item>
+						<Item Key="Description" Lang="pt_BR">Atendimento presencial</Item>
+						<Item Key="Name" Lang="pt_BR">Atendimento presencial</Item>
+						<Item Key="Link">Action=InPersonTicket</Item>
+						<Item Key="LinkOption"></Item>
+						<Item Key="NavBar">Ticket</Item>
+						<Item Key="Type"></Item>
+						<Item Key="Block"></Item>
+						<Item Key="AccessKey"></Item>
+						<Item Key="Prio">8400</Item>
+					</Hash>
+				</Item>
+			</Array>
+		</Value>
+	</Setting>
+
+
+	<Setting Name="Loader::Module::InPersonTicket###002-InPersonTicket"
+		Required="0" Valid="1">
+		<Description Translatable="1">Front-end module loader for the
+			agent interface</Description>
+		<Navigation>Frontend::Agent::ModuleRegistration::Loader</Navigation>
+		<Value>
+			<Hash>
+				<Item Key="JavaScript">
+					<Array>
+						<Item>InPersonTicket.js</Item>
+					</Array>
+				</Item>
+			</Hash>
+		</Value>
+	</Setting>
+
+
+	<Setting Name="Ticket::Frontend::InPersonTicket###DynamicFields"
+		Required="1" Valid="1">
+		<Description>Dynamic Fields IDs to Include (comma separated) - place *
+			before fields that should use the last value for new tickets
+		</Description>
+		<Description Lang="pt_BR">Campos dinâmicos que devem ser incluídos
+			(IDs separados por vírgula) - coloque * (asterisco) antes dos campos
+			que devem manter o valor do último envio</Description>
+		<Navigation>Frontend::Agent::InPersonTicket</Navigation>
+		<Value>
+			<Item ValueType="String" ValueRegex=""></Item>
+		</Value>
+	</Setting>
+
+
+	<Setting Name="Ticket::Frontend::InPersonTicket###TypeID"
+		Required="1" Valid="1">
+		<Description>Default type ID for tickets</Description>
+		<Description Lang="pt_BR">ID do tipo padrão para os tickets
+		</Description>
+		<Navigation>Frontend::Agent::InPersonTicket</Navigation>
+		<Value>
+			<Item ValueType="String" ValueRegex="^\d+$">6</Item>
+		</Value>
+	</Setting>
+
+	<Setting Name="Ticket::Frontend::InPersonTicket###DefaultCustomerID"
+		Required="1" Valid="1">
+		<Description>Default customer ID for tickets</Description>
+		<Description Lang="pt_BR">ID padrão do cliente para os tickets
+		</Description>
+		<Navigation>Frontend::Agent::InPersonTicket</Navigation>
+		<Value>
+			<Item ValueType="String" ValueRegex="">paginas@sistemas.ufsc.br
+			</Item>
+		</Value>
+	</Setting>
+
+	<Setting Name="Ticket::Frontend::InPersonTicket###DefaultOwnerID"
+		Required="1" Valid="1">
+		<Description>Default Owner ID for tickets</Description>
+		<Description Lang="pt_BR">Proprietário padrão para os tickets
+		</Description>
+		<Navigation>Frontend::Agent::InPersonTicket</Navigation>
+		<Value>
+			<Item ValueType="String" ValueRegex="^\d+$">1</Item>
+		</Value>
+	</Setting>
+
+	<Setting Name="Ticket::Frontend::InPersonTicket###DefaultUserDomain"
+		Required="1" Valid="1">
+		<Description>Default domain for user e-mails.</Description>
+		<Description Lang="pt_BR">Domínios padrões para e-mails de
+			usuários.</Description>
+		<Navigation>Frontend::Agent::InPersonTicket</Navigation>
+		<Value>
+			<Item ValueType="String" ValueRegex="">ufsc.br,grad.ufsc.br,posgrad.ufsc.br
+			</Item>
+		</Value>
+	</Setting>
+
+	<Setting Name="Ticket::Frontend::InPersonTicket###ReplyModelID"
+		Required="1" Valid="1">
+		<Description>Model to use for reply to users.</Description>
+		<Description Lang="pt_BR">Modelo usado para responder aos usuários
+			na abertura do ticket.</Description>
+		<Navigation>Frontend::Agent::InPersonTicket</Navigation>
+		<Value>
+			<Item ValueType="String" ValueRegex="^\d+$">22</Item>
+		</Value>
+	</Setting>
+
+	<Setting Name="Ticket::Frontend::InPersonTicket###ReplyModelIDClosed"
+		Required="1" Valid="1">
+		<Description>Model to use for reply to users when ticket is closed.
+		</Description>
+		<Description Lang="pt_BR">Modelo usado para responder aos usuários
+			quando o ticket é fechado.</Description>
+		<Navigation>Frontend::Agent::InPersonTicket</Navigation>
+		<Value>
+			<Item ValueType="String" ValueRegex="^\d+$">5</Item>
+		</Value>
+	</Setting>
+
+	<Setting Name="Ticket::Frontend::InPersonTicket###QueuePrefix"
+		Required="0" Valid="1">
+		<Description>When the queue comes from a field in the form, a prefix
+			can be attached to the value while searching for the queue. A space
+			is added between this and the queue name.</Description>
+		<Description Lang="pt_BR">Se definido, permite localizar de forma
+			automática a fila para qual enviar o chamado, adicionado um prefixo
+			ao valor de outro campo dinâmico. Se não encontrar, usa a fila padrão
+			para novos tickets.</Description>
+		<Navigation>Frontend::Agent::InPersonTicket</Navigation>
+		<Value>
+			<Item ValueType="String" ValueRegex="">Primeiro nível -</Item>
+		</Value>
+	</Setting>
+
+	<Setting Name="Ticket::Frontend::InPersonTicket###ServiceConfiguredMessage"
+		Required="0" Valid="1" Translatable="1">
+		<Description>Template describing that the service was configured,
+			i.e., the ticket can be closed. Sent to the customer.</Description>
+		<Description Lang="pt_BR">Mensagem descrevendo o serviço
+			configurado, i.e., o ticket pode ser fechado. Enviado ao usuário.
+		</Description>
+		<Navigation>Frontend::Agent::InPersonTicket</Navigation>
+		<Value>
+			<Item ValueType="String" ValueRegex="">The service was activated
+				and/or configure. Tests were made successfully.</Item>
+		</Value>
+	</Setting>
+
+	<Setting Name="Ticket::Frontend::InPersonTicket###QueueField"
+		Required="0" Valid="1">
+		<Description>Name of the field in the form which indicates the queue
+			to send the ticket.</Description>
+		<Description Lang="pt_BR">Nome do campo no formulário que pode ser
+			usado para montar o nome da fila para enviar o chamado.</Description>
+		<Navigation>Frontend::Agent::InPersonTicket</Navigation>
+		<Value>
+			<Item ValueType="String" ValueRegex="">DF_unidade</Item>
+		</Value>
+	</Setting>
+
+</otrs_config>
@@ -0,0 +1,33 @@
+# --
+# Kernel/Modules/pt_BR_StatisticsGraphs.pm - translations for StatisticsGraphs Module
+# Translations
+# 
+# Copyright (C) 2015-2018 - SeTIC - UFSC - http://setic.ufsc.br/
+# (Rodrigo Goncalves) (rodrigo.g@ufsc.br)
+#
+# Version 2018-01-31 - Adjustments for OTRS 6
+#
+# --
+# This software comes with ABSOLUTELY NO WARRANTY. For details, see
+# the enclosed file COPYING for license information (AGPL). If you
+# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
+# --
+package Kernel::Language::pt_BR_InPersonTicket;
+
+use strict;
+use warnings;
+use utf8;
+
+sub Data {
+    my $Self = shift;
+
+	$Self->{Translation}->{'Concluded'} = 'Concluído';
+	$Self->{Translation}->{'In person ticket'} = 'Atendimento presencial';
+	$Self->{Translation}->{'The ticket has been created with number:'} = 'Chamado criado com número: ';
+	$Self->{Translation}->{'Dynamic Fields IDs to Include (comma separated)'} = 'IDs dos campos dinâmicos, separados por vírgula - coloque * antes de campos que não devem usar o último valor para novos tickets';
+	$Self->{Translation}->{'Customer service'} = 'Registro de atendimento';
+	
+	    
+    return 1;
+}
+1;
 \ No newline at end of file
@@ -0,0 +1,506 @@
+# --
+# Kernel/Modules/OcurrenceControl.pm - frontend module
+#
+# Copyright (C) 2015-2018 - SeTIC - UFSC - http://setic.ufsc.br/
+# (Rodrigo Goncalves) (rodrigo.g@ufsc.br)
+#
+# Version 2018-01-31 - Adjustments for OTRS 6
+#
+# --
+# This software comes with ABSOLUTELY NO WARRANTY. For details, see
+# the enclosed file COPYING for license information (AGPL). If you
+# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
+# --
+#
+package Kernel::Modules::InPersonTicket;
+
+use strict;
+use warnings;
+use Data::Dumper;
+
+our @ObjectDependencies = (
+	"Kernel::Output::HTML::Layout", "Kernel::System::Log",
+	"Kernel::System::Web::Request", "Kernel::System::DB",
+	"Kernel::Config",               "Kernel::System::CustomerUser",
+	"Kernel::System::Service",      "Kernel::System::DynamicField::Backend",
+	"Kernel::System::DynamicField", "Kernel::System::User"
+);
+
+sub new {
+	my ( $Type, %Param ) = @_;
+
+	# allocate new hash for object
+	my $Self = {%Param};
+	bless( $Self, $Type );
+
+	return $Self;
+}
+
+sub Run {
+	my ( $Self, %Param ) = @_;
+	my %Data = ();
+
+	my $ConfigObject   = $Kernel::OM->Get("Kernel::Config");
+	my $languageObject = $Kernel::OM->Get("Kernel::Language");
+	my $layoutObject   = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
+	my $paramObject    = $Kernel::OM->Get("Kernel::System::Web::Request");
+	my $dbObject       = $Kernel::OM->Get("Kernel::System::DB");
+	my $serviceObject  = $Kernel::OM->Get("Kernel::System::Service");
+
+	$Self->BuildServiceBlock();
+	$Self->BuildDynamicFieldsFields();
+
+	my $config = $ConfigObject->Get("Ticket::Frontend::InPersonTicket");
+	$layoutObject->AddJSData(
+		Key   => "InPersonTicket.ServiceRealized",
+		Value => $config->{ServiceConfiguredMessage}
+	);
+
+	if ( $paramObject->GetParam( Param => "Subaction" )
+		&& ( $paramObject->GetParam( Param => "Subaction" ) eq "GetUserName" ) )
+	{
+		my $content = $Self->GetUserName(
+			UserID => $paramObject->GetParam( Param => "UserID" ) );
+
+		return $layoutObject->Attachment(
+			ContentType => 'application/text; charset='
+			  . $layoutObject->{Charset},
+			Content => $content,
+			Type    => 'inline',
+			NoCache => 1,
+		);
+	}
+	elsif ( $paramObject->GetParam( Param => "Subaction" )
+		&& ( $paramObject->GetParam( Param => "Subaction" ) eq "Add" ) )
+	{
+		return $Self->CreateTicket();
+	}
+
+	my $Output = $layoutObject->Header(
+		Title => $languageObject->Translate("In person ticket") );
+	$Output .= $layoutObject->NavigationBar();
+	$Output .= $layoutObject->Output( TemplateFile => 'InPersonTicket' );
+	
+	# set up rich text editor
+	my %ParamCK = ();
+	$layoutObject->SetRichTextParameters(
+    	Data => \%ParamCK,
+	);
+
+	$Output .= $layoutObject->Footer();
+	return $Output;
+
+	return $Output;
+
+}
+
+sub GetUserName {
+	my ( $Self, %Param ) = @_;
+
+	my $userObject = $Kernel::OM->Get("Kernel::System::CustomerUser");
+	my %dados = $userObject->CustomerUserDataGet( User => $Param{"UserID"} );
+
+	if (%dados) {
+		return $dados{UserFirstname};
+	}
+	else {
+		return "";
+	}
+
+}
+
+sub BuildDynamicFieldsFields {
+	my ( $Self, %Param ) = @_;
+
+	my $DynamicFieldBackendObject =
+	  $Kernel::OM->Get('Kernel::System::DynamicField::Backend');
+	my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
+	my $ConfigObject       = $Kernel::OM->Get("Kernel::Config");
+	my $config       = $ConfigObject->Get("Ticket::Frontend::InPersonTicket");
+	my $layoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
+	my $paramObject  = $Kernel::OM->Get("Kernel::System::Web::Request");
+	my $userObject   = $Kernel::OM->Get("Kernel::System::User");
+	my @dfieldList =
+	  @{ $DynamicFieldObject->DynamicFieldListGet( Valid => 1 ) };
+	my @dynamicFieldsInuse =
+	  split( ",", $config->{DynamicFields} || "unidade" );
+	my %prefs = $userObject->GetPreferences( UserID => $Self->{UserID} );
+
+	foreach (@dfieldList) {
+		my $field = $_;
+		if ( $field->{Name} ~~ @dynamicFieldsInuse
+			|| '*' . $field->{Name} ~~ @dynamicFieldsInuse )
+		{
+
+			my $defValue = "";
+
+			if ( $field->{Name} ~~ @dynamicFieldsInuse ) {
+				$defValue = $prefs{ "IPT_DF_" . $field->{Name} };
+			}
+
+			my $DynamicFieldHTML = $DynamicFieldBackendObject->EditFieldRender(
+				DynamicFieldConfig => $field,
+				LayoutObject       => $layoutObject,
+				ParamObject        => $paramObject,
+				Value              => $defValue,
+				Mandatory		   => 1,
+				OverridePossibleNone => 1,
+				UseDefaultValue => 0,
+				Value => ""
+			);
+
+			$layoutObject->Block(
+				Name => 'DynamicField',
+				Data => {
+					Name  => $field->{Name},
+					Label => $DynamicFieldHTML->{Label},
+					Field => $DynamicFieldHTML->{Field},
+				},
+			);
+		}
+	}
+
+}
+
+sub BuildServiceBlock {
+	my ( $Self, %Param ) = @_;
+
+	my $layoutObject    = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
+	my $paramObject     = $Kernel::OM->Get("Kernel::System::Web::Request");
+	my $dbObject        = $Kernel::OM->Get("Kernel::System::DB");
+	my $serviceObject   = $Kernel::OM->Get("Kernel::System::Service");
+
+	my $services = $serviceObject->ServiceListGet( Valid => 1, UserID => 1 );
+	my @services = @$services;
+	@services = sort { $a->{Name} cmp $b->{Name} } @services;
+
+	foreach my $service (@services) {
+		$layoutObject->Block(
+			Name => 'selectService',
+			Data => {
+				ServiceID   => $service->{ServiceID},
+				ServiceName => $Self->GetServiceName(
+					Services    => \@services,
+					ServiceID   => $service->{ServiceID},
+					ServiceName => $service->{Name}
+				),
+				Disabled => $Self->LeafService(
+					Services  => \@services,
+					ServiceID => $service->{ServiceID}
+				) ? "" : "disabled"
+			}
+		);
+	}
+}
+
+sub GetServiceName {
+	my ( $Self, %Param ) = @_;
+
+	if ( $Self->LeafService(%Param) ) {
+		my @tokens = split( "::", $Param{ServiceName} );
+		return "&nbsp;&nbsp;" x ( @tokens - 1 ) . @tokens[ @tokens - 1 ];
+	}
+	else {
+		return $Param{ServiceName};
+	}
+}
+
+sub LeafService {
+	my ( $Self, %Param ) = @_;
+
+	my $services  = $Param{Services};
+	my @services  = @$services;
+	my $serviceID = $Param{ServiceID};
+
+	foreach my $service (@services) {
+		if (   ( exists $service->{ParentID} )
+			&& ( $service->{ParentID} == $serviceID ) )
+		{
+			return 0;
+		}
+	}
+
+	return 1;
+}
+
+sub GetQueueID() {
+	my ( $Self, %Param ) = @_;
+
+	my $ParamObject        = $Kernel::OM->Get("Kernel::System::Web::Request");
+	my $QueueObject        = $Kernel::OM->Get("Kernel::System::Queue");
+	my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
+	my $ConfigObject       = $Kernel::OM->Get("Kernel::Config");
+	my $LayoutObject       = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
+	my $DynamicFieldBackendObject =
+	  $Kernel::OM->Get('Kernel::System::DynamicField::Backend');
+
+	# Gets default Queue
+	my $ConfigTicket =
+	  $ConfigObject->Get("Ticket::Frontend::CustomerTicketMessage");
+
+	my $QueueDefault = $ConfigTicket->{"QueueDefault"};
+
+	my %QueueListID = $QueueObject->QueueList( Valid => 1 );
+	my %QueueList = reverse $QueueObject->QueueList( Valid => 1 );
+	my $QueueID   = $QueueList{$QueueDefault};
+	my $Queue     = $QueueListID{$QueueID};
+
+	$Self->{ConfigModule} =
+	  $ConfigObject->Get("Ticket::Frontend::InPersonTicket");
+
+	# Checks if there is a field for the queue
+	my $QueuePrefix = $Self->{ConfigModule}->{"QueuePrefix"};
+	my $QueueField  = $Self->{ConfigModule}->{"QueueField"};
+
+	if ( $QueuePrefix && $QueueField ) {
+		my $dynFieldQueue =
+		  $DynamicFieldObject->DynamicFieldGet( Name => $QueueField );
+		my $QueueSelected = $DynamicFieldBackendObject->EditFieldValueGet(
+			DynamicFieldConfig => $dynFieldQueue,
+			ParamObject        => $ParamObject,
+			LayoutObject       => $LayoutObject,
+		);
+
+		my $QueueName = "$QueuePrefix $QueueSelected";
+
+		if ( $QueueList{$QueueName} ) {
+			$QueueID = $QueueList{$QueueName};
+			$Queue   = $QueueName;
+		}
+	}
+
+	return ( $Queue, $QueueID );
+}
+
+sub CreateTicket {
+	my ( $Self, %Param ) = @_;
+	my %Data = ();
+
+	my $languageObject = $Kernel::OM->Get("Kernel::Language");
+	my $TicketObject   = $Kernel::OM->Get("Kernel::System::Ticket");
+	my $ConfigObject   = $Kernel::OM->Get("Kernel::Config");
+	my $ParamObject    = $Kernel::OM->Get("Kernel::System::Web::Request");
+	my $BackendObject =
+	  $Kernel::OM->Get("Kernel::System::DynamicField::Backend");
+	my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
+	my $CustomerUserObject = $Kernel::OM->Get("Kernel::System::CustomerUser");
+	my $LayoutObject       = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
+	my $userObject         = $Kernel::OM->Get("Kernel::System::User");
+	my $DynamicFieldBackendObject =
+	  $Kernel::OM->Get('Kernel::System::DynamicField::Backend');
+
+	# Queue
+	my ( $Queue, $QueueID ) = $Self->GetQueueID(%Param);
+	$Data{QueueID} = $QueueID;
+	my $email = $ParamObject->GetParam( Param => "userID" );
+
+	$Self->{Config} =
+	  $ConfigObject->Get("Ticket::Frontend::CustomerTicketMessage");
+
+	$Self->{ConfigModule} =
+	  $ConfigObject->Get("Ticket::Frontend::InPersonTicket");
+
+	my $TicketID = $TicketObject->TicketCreate(
+		Title    => $languageObject->Translate("In person ticket"),
+		QueueID  => $QueueID,
+		Priority => $Self->{Config}->{PriorityDefault},
+		Lock     => 'unlock',
+		State    => (
+			$ParamObject->GetParam( Param => "concluded" )
+			? 'closed successful'
+			: 'new'
+		),
+		ServiceID  => $ParamObject->GetParam( Param => "ServiceID" ),
+		TypeID     => $Self->{ConfigModule}->{TypeID},
+		CustomerID => $Self->GetUserIDFromEmail(
+			EMail             => $email,
+			DefaultUserDomain => $Self->{ConfigModule}->{DefaultUserDomain},
+			DefaultCustomerID => $Self->{ConfigModule}->{DefaultCustomerID}
+		),
+		CustomerUser => $Self->GetUserIDFromEmail(
+			EMail             => $email,
+			DefaultUserDomain => $Self->{ConfigModule}->{DefaultUserDomain},
+			DefaultCustomerID => $Self->{ConfigModule}->{DefaultCustomerID}
+		),
+		OwnerID => $Self->{ConfigModule}->{DefaultOwnerID},
+		UserID  => $Self->{ConfigModule}->{DefaultOwnerID},
+	);
+
+	my @dfieldList =
+	  @{ $DynamicFieldObject->DynamicFieldListGet( Valid => 1 ) };
+	my @dynamicFieldsInuse =
+	  split( ",", $Self->{ConfigModule}->{DynamicFields} );
+
+	foreach (@dfieldList) {
+		my $field = $_;
+
+		if ( $field->{Name} ~~ @dynamicFieldsInuse
+			|| '*' . $field->{Name} ~~ @dynamicFieldsInuse )
+		{
+			my $value = $DynamicFieldBackendObject->EditFieldValueGet(
+				DynamicFieldConfig => $field,
+				ParamObject        => $ParamObject,
+				LayoutObject       => $LayoutObject,
+			);
+
+			if ( $field->{Name} ~~ @dynamicFieldsInuse ) {
+				$userObject->SetPreferences(
+					UserID => $Self->{UserID},
+					Key    => "IPT_DF_" . $field->{Name},
+					Value  => $value,
+				);
+			}
+
+			if ($value) {
+				$DynamicFieldBackendObject->ValueSet(
+					DynamicFieldConfig => $field,
+					ObjectID           => $TicketID,
+					Value              => $value,
+					UserID             => $Self->{UserID},
+				);
+			}
+		}
+	}
+
+	my $MimeType = 'text/plain';
+
+	# Create article
+	my $FullName = $ParamObject->GetParam( Param => "UserName" );
+
+	my $From      = "\"$FullName\" <$email>";
+	
+	my $ArticleBackendObject = $Kernel::OM->Get('Kernel::System::Ticket::Article')->BackendForChannel(ChannelName => 'Email');
+	
+	my $ArticleID = $ArticleBackendObject->ArticleCreate(
+		TicketID         => $TicketID,
+		ArticleType      => 'phone',
+		SenderType       => 'customer',
+		From             => $email,
+		To               => $Queue,
+		Subject          => $languageObject->Translate("Customer service"),
+		Body             => $ParamObject->GetParam( Param => "Description" ),
+		MimeType         => $MimeType,
+		Charset          => $LayoutObject->{UserCharset},
+		UserID           => $Self->{ConfigModule}->{DefaultOwnerID},
+		HistoryType      => $Self->{Config}->{HistoryType},
+		HistoryComment   => $Self->{Config}->{HistoryComment} || '%%',
+		AutoResponseType => '',
+		OrigHeader       => {
+			From    => $From,
+			To      => $Queue,
+			Subject => $languageObject->Translate("Customer service"),
+			Body    => $ParamObject->GetParam( Param => "Description" ),
+		},
+		Queue => $Queue,
+		IsVisibleForCustomer => 1
+	);
+
+	my $ReplyUser =
+	  $Kernel::OM->Get('Kernel::System::TemplateGenerator')->Template(
+		TemplateID => (
+			  $ParamObject->GetParam( Param => "concluded" )
+			? $Self->{ConfigModule}->{ReplyModelIDClosed}
+			: $Self->{ConfigModule}->{ReplyModelID}
+		),
+		TicketID => $TicketID,
+		UserID   => $Self->{ConfigModule}->{DefaultOwnerID},
+	  );
+
+	my $corpo = $ParamObject->GetParam( Param => "Description" );
+	$ReplyUser =~ s/CONTEUDO/$corpo/g;
+
+	my %sysAddr = $Kernel::OM->Get('Kernel::System::SystemAddress')
+	  ->SystemAddressGet( ID => 1 );
+
+	my $FromSystem = $sysAddr{Name};
+
+	$MimeType = 'text/html';
+
+	$ArticleID = $ArticleBackendObject->ArticleSend(
+		TicketID => $TicketID,
+		ArticleType =>
+		  'note-internal',    # email-external|email-internal|phone|fax|...
+		SenderType => 'agent',       # agent|system|customer
+		From       => $FromSystem,
+		To         => $email,        # not required but useful
+		Subject  => $languageObject->Translate("Customer service"),   # required
+		Body     => $ReplyUser,                                       # required
+		Charset  => $LayoutObject->{UserCharset},
+		MimeType => $MimeType,
+		Loop => 0,    # 1|0 used for bulk emails
+		HistoryType =>
+		  'AddNote',    # Move|AddNote|PriorityUpdate|WebRequestCustomer|...
+		HistoryComment => 'Auto-reply',
+		NoAgentNotify => 0,    # if you don't want to send agent notifications
+		UserID => $Self->{ConfigModule}->{DefaultOwnerID},
+		IsVisibleForCustomer => 1
+	);
+
+	$Data{TicketNumber} =
+	  $TicketObject->TicketNumberLookup( TicketID => $TicketID );
+
+	# build output
+	my $Output = $LayoutObject->Header(
+		Title => $languageObject->Translate("In person ticket") );
+	my %BlockData = ();
+	$BlockData{TicketNumber} =
+	    '<a href="/otrs/index.pl?Action=AgentTicketZoom;TicketID='
+	  . $TicketID . '">'
+	  . $Data{TicketNumber} . '</a>';
+	$LayoutObject->Block(
+		Name => 'NewTicketCreated',
+		Data => \%BlockData
+	);
+	
+	# set up rich text editor
+	my %ParamCK = ();
+	$LayoutObject->SetRichTextParameters(
+    	Data => \%ParamCK,
+	);
+	
+
+	$Output .= $LayoutObject->NavigationBar();
+	$Output .= $LayoutObject->Output(
+		Data         => \%Data,
+		TemplateFile => 'InPersonTicket',
+	);
+	$Output .= $LayoutObject->Footer();
+	return $Output;
+}
+
+sub GetUserIDFromEmail {
+	my ( $Self, %Param ) = @_;
+
+	my $email      = $Param{EMail};
+	my $result     = $Param{DefaultCustomerID};
+	my $domainList = $Param{DefaultUserDomain};
+
+	if ( index( $email, '@' ) == -1 ) {
+		return $email;
+	}
+
+	my $CustomerUserObject = $Kernel::OM->Get("Kernel::System::CustomerUser");
+
+	if ($domainList) {
+		my @domains = split( ",", $domainList );
+
+		for my $domain (@domains) {
+			my @parts = split( "@", $email );
+			if ( $parts[1] eq $domain ) {
+				my $id   = $parts[0];
+				my %List = $CustomerUserObject->CustomerSearch(
+					UserLogin => $id,
+					Valid     => 1,
+				);
+				if ( keys %List ) {
+					$result = $id;
+					return $result;
+				}
+			}
+		}
+	}
+
+	return $result;
+}
+
+1;
@@ -0,0 +1,105 @@
+# --
+# Kernel/Output/HTML/Standard/EditOcurrence.tt - overview
+#
+# Copyright (C) 2015-2018 - SeTIC - UFSC - http://setic.ufsc.br/
+# (Rodrigo Goncalves) (rodrigo.g@ufsc.br)
+#
+# Version 2018-01-31 - Adjustments for OTRS 6
+# --
+# $Id: writing-otrs-application.xml,v 1.1 2010/08/13 08:59:28 mg Exp $
+# --
+# This software comes with ABSOLUTELY NO WARRANTY. For details, see
+# the enclosed file COPYING for license information (AGPL). If you
+# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
+# --
+<div class="MainBox ARIARoleMain LayoutFixedSidebar SidebarFirst">
+
+	<h1>[% Translate("In person ticket") | html %]</h1>
+	
+  	[% BreadcrumbPath = [
+            {
+                Name => Translate('In person ticket'),
+                Link => Env("Action"),
+            },
+        ]
+    %]
+
+    [% INCLUDE "Breadcrumb.tt" Path = BreadcrumbPath %]
+    	
+
+	<div class="ContentColumn">
+		<div class="WidgetSimple">
+			<div class="Header">
+				<h2>[% Translate("New ticket") | html %]</h2>
+			</div>
+			
+	[% RenderBlockStart("NewTicketCreated") %]
+	<div class="Header">
+		<h2 style="text-align: right; font-weight: bolder; font-size: larger; color: red">[% Translate("The ticket has been created with number:") | html %][% Data.TicketNumber %]
+	</div>	
+	[% RenderBlockEnd("NewTicketCreated") %]
+			
+			
+			<div class="Content SpacingBottom ">
+
+				<form action="[% Env("CGIHandle") %]" method="post" enctype="multipart/form-data" name="compose" id="InPersonTicket" class="Validate PreventMultipleSubmits">
+
+					<input type="hidden" name="Action" value="[% Env("Action") %]"/>
+					<input type="hidden" name="Subaction" value="Add"/>
+
+						<fieldset class="TableLike">
+							<label for="userID" class="Mandatory"><span class="Marker">*</span> [% Translate("E-mail") | html %]:</label>
+							<input class="Validate_Required" type="text" name="userID" id="userID" style="margin-left: 10px; width: 400px" />
+							<div class="Clear"></div>
+							
+							<label for="UserName" class="Mandatory"><span class="Marker">*</span> [% Translate("Nome") | html %]:</label>
+							<input class="Validate_Required" type="text" name="UserName" id="UserName" style="margin-left: 10px; width: 400px" />
+							<div class="Clear"></div>
+
+							<label for="SelectService" class="Mandatory"><span class="Marker">*</span> [% Translate("Serviço") | html %]:</label>
+								<select class="Validate_Required" style="margin-left: 10px" name="ServiceID" id="SelectService">
+									<option selected disabled value="0">[% Translate("Select a service") | html %]</option>
+								[% RenderBlockStart("selectService") %]
+									<option [% Data.Disabled %] value="[% Data.ServiceID | html %]">[% Data.ServiceName %]</option>
+								[% RenderBlockEnd("selectService") %]
+								</select>							
+							<div class="Clear"></div>
+														
+							
+							[% RenderBlockStart("DynamicField") %]
+								[% Data.Label %]
+								<div class="Field">											
+								[% Data.Field %]	
+								</div>			
+							<div class="Clear"></div>
+							
+							
+								
+							[% RenderBlockEnd("DynamicField") %]
+								
+
+							<label class="OtherMandatory" for="RichTextDescription"><span class="Marker">*</span> [% Translate("Description") | html %]:</label>
+                   			<div id="RichTextField" class="RichTextField" >
+                        		<textarea style="width: 800px; height: 200px" id="RichTextDescription" class="RichText Validate_Required [% Data.BodyInvalid | html %]" name="Description" title="Description" cols="[% Config("Ticket::Frontend::TextAreaNote") %]">[% Data.Description %]</textarea>
+                       			<div id="RichTextError" class="TooltipErrorMessage"><p>[% Translate("This field is required.") | html %]</p></div>
+                       		 	<div id="RichTextServerError" class="TooltipErrorMessage"><p>[% Translate("This field is required.") | html %]</p></div>                       		 	
+                       		 	<div style="display: block; padding: 5px; border-style: solid; border-color: black; border-width: 1px">
+                       		 		Atalhos: 
+                       		 	      <button type="button" onclick="javascript:Core.Agent.InPersonTicket.modeloServicoConfigurado()">Serviço configurado</button>
+                     		 	 </div>                 		 	
+                   		 	</div>
+							<div class="Clear"></div>
+							
+							<label for="UserId" class="Mandatory"><span class="Marker">*</span> [% Translate("Concluded") | html %]:</label>
+							<input type="checkbox" name="concluded" id="concluded" checked />
+							<div class="Clear"></div>
+							
+                  		
+							<input id='Cadastro' type='submit'  value='Registrar chamado' style="margin-left: 40%; font-weight: bolder; font-size: x-larger"/>	
+						</fieldset>
+					</div>
+				</form>
+			</div>
+		</div>
+	</div>
+</div>
 \ No newline at end of file
@@ -0,0 +1,55 @@
+/**
+ * InPersonTicket module - SeTIC - UFSC - http://setic.ufsc.br/
+ * Rodrigo Gonçalves - rodrigo.g@ufsc.br
+ * 
+ * Version 2018-01-31 - Conversion to JS Module, to support OTRS 6
+ * 
+ * 
+ */
+
+var Core = Core || {};
+Core.Agent = Core.Agent || {};
+
+
+Core.Agent.InPersonTicket = (function (TargetNS) {
+	
+	TargetNS.Init = function() {
+		$("#userID").blur(function() {			
+			TargetNS.dealEmail($("#userID").val());  
+		});
+	}
+	
+    TargetNS.modeloServicoConfigurado = function () {
+    
+    	CKEDITOR.instances['RichTextDescription'].setData(Core.Config.Get('InPersonTicket.ServiceRealized'));
+		//$("#RichTextDescription").val();
+		return false;
+	}
+
+	TargetNS.dealEmail = function(email) {
+		var arr = email.split("@");
+		if (arr[0]) {
+			var url = "/otrs/index.pl?Action=InPersonTicket;Subaction=GetUserName;UserID=" + arr[0];
+			$.get(url, function(data) {
+				$("#UserName").val(data);
+				if (data) {
+					$("#SelectService").focus();
+				}			
+    		}).fail(function(jqXHR, textStatus, errorThrown) {
+    			alert(textStatus);
+  			});
+			
+  		}
+  	}
+  
+  	Core.Init.RegisterNamespace(TargetNS, 'APP_MODULE');
+	
+	return TargetNS;
+	
+}(Core.Agent.InPersonTicket || {}));
+
+
+
+
+
+
@@ -0,0 +1,4 @@		@@ -0,0 +1,4 @@
	1	+#!/bin/bash
	2	+LOCAL="$PWD"
	3	+cd /opt/otrs
	4	+bin/otrs.Console.pl Dev::Package::Build "$LOCAL"/InPersonTicket.sopm "$LOCAL"/
	@@ -1,4 +0,0 @@	@@ -1,4 +0,0 @@
1	-#!/bin/bash
2	-LOCAL="$PWD"
3	-cd /opt/otrs
4	-bin/otrs.Console.pl Dev::Package::Build "$LOCAL"/InPersonTicket.sopm "$LOCAL"/
	@@ -1,26 +0,0 @@	@@ -1,26 +0,0 @@
1	-<?xml version="1.0" encoding="utf-8" ?>
2	-<otrs_package version="1.0">
3	- <Name>InPersonTicket</Name>
4	- <Version>1.3.0</Version>
5	- <ChangeLog Version="1.0.1" Date="22/05/2015">First version</ChangeLog>
6	- <ChangeLog Version="1.1.0" Date="2016-01-26">Fixes for OTRS 5.0.x</ChangeLog>
7	- <ChangeLog Version="1.2.0" Date="2016-06-10">Support for dynamic fields</ChangeLog>
8	- <ChangeLog Version="1.3.0" Date="2016-06-10">Support for custom queues</ChangeLog>
9	- <Framework>5.0.x</Framework>
10	- <Vendor>SeTIC-UFSC</Vendor>
11	- <URL>setic.ufsc.br</URL>
12	- <License>Free</License>
13	- <Description>In person ticket</Description>
14	- <IntroInstall Type="post" Title="Thank you">Module installed successfully.</IntroInstall>
15	- <BuildDate>?</BuildDate>
16	- <BuildHost>?</BuildHost>
17	- <PackageRequired Version="1.1">Lib_setic</PackageRequired>
18	- <Filelist>
19	- <File Permission="644" Location="Kernel/Config/Files/InPersonTicket.xml"></File>
20	- <File Permission="644" Location="Kernel/Modules/InPersonTicket.pm"></File>
21	- <File Permission="644" Location="Kernel/Language/pt_BR_InPersonTicket.pm"></File>
22	-
23	- <File Permission="644" Location="Kernel/Output/HTML/Templates/Standard/InPersonTicket.tt"></File>
24	- <File Permission="644" Location="Kernel/Output/HTML/Templates/Standard/InPersonTicketCreated.tt"></File>
25	- </Filelist>
26	-</otrs_package>
	@@ -1,116 +0,0 @@		@@ -1,116 +0,0 @@
1	-<?xml version="1.0" encoding="UTF-8" ?>
2	-<otrs_config init="Application" version="1.0">
3	- <ConfigItem Name="Frontend::Module###InPersonTicket" Required="0" Valid="1">
4	- <Description>Frontend module registration for the agent interface.</Description>
5	- <Group>Ticket</Group>
6	- <SubGroup>Frontend::Agent::ModuleRegistration</SubGroup>
7	- <Setting>
8	- <FrontendModuleReg>
9	- <Description>Module for creating new ticket for in-person reception</Description>
10	- <NavBarName>Ticket</NavBarName>
11	- <Title>In person ticket</Title>
12	- <NavBar>
13	- <Description>In person ticket</Description>
14	- <Name>In person ticket</Name>
15	- <Link>Action=InPersonTicket</Link>
16	- <NavBar>Ticket</NavBar>
17	- <Type></Type>
18	- <Prio>8400</Prio>
19	- </NavBar>
20	- </FrontendModuleReg>
21	- </Setting>
22	- </ConfigItem>
23	-
24	-
25	- <ConfigItem Name="Ticket::Frontend::InPersonTicket###DynamicFields"
26	- Required="1" Valid="1">
27	- <Description>Dynamic Fields IDs to Include (comma separated) - place * before fields that should use the last value for new tickets</Description>
28	- <Group>Ticket</Group>
29	- <SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
30	- <Setting>
31	- <String Regex=""></String>
32	- </Setting>
33	- </ConfigItem>
34	-
35	-
36	- <ConfigItem Name="Ticket::Frontend::InPersonTicket###TypeID"
37	- Required="1" Valid="1">
38	- <Description>Default type ID for tickets</Description>
39	- <Group>Ticket</Group>
40	- <SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
41	- <Setting>
42	- <String Regex="">6</String>
43	- </Setting>
44	- </ConfigItem>
45	-
46	- <ConfigItem Name="Ticket::Frontend::InPersonTicket###DefaultCustomerID"
47	- Required="1" Valid="1">
48	- <Description>Default customer ID for tickets</Description>
49	- <Group>Ticket</Group>
50	- <SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
51	- <Setting>
52	- <String Regex="">paginas@sistemas.ufsc.br</String>
53	- </Setting>
54	- </ConfigItem>
55	-
56	- <ConfigItem Name="Ticket::Frontend::InPersonTicket###DefaultOwnerID"
57	- Required="1" Valid="1">
58	- <Description>Default Owner ID for tickets</Description>
59	- <Group>Ticket</Group>
60	- <SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
61	- <Setting>
62	- <String Regex="">1</String>
63	- </Setting>
64	- </ConfigItem>
65	-
66	- <ConfigItem Name="Ticket::Frontend::InPersonTicket###DefaultUserDomain"
67	- Required="1" Valid="1">
68	- <Description>Default domain for user e-mails.</Description>
69	- <Group>Ticket</Group>
70	- <SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
71	- <Setting>
72	- <String Regex="">ufsc.br,grad.ufsc.br,posgrad.ufsc.br</String>
73	- </Setting>
74	- </ConfigItem>
75	-
76	- <ConfigItem Name="Ticket::Frontend::InPersonTicket###ReplyModelID"
77	- Required="1" Valid="1">
78	- <Description>Model to use for reply to users.</Description>
79	- <Group>Ticket</Group>
80	- <SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
81	- <Setting>
82	- <String Regex="">22</String>
83	- </Setting>
84	- </ConfigItem>
85	-
86	- <ConfigItem Name="Ticket::Frontend::InPersonTicket###ReplyModelIDClosed"
87	- Required="1" Valid="1">
88	- <Description>Model to use for reply to users when ticket is closed.</Description>
89	- <Group>Ticket</Group>
90	- <SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
91	- <Setting>
92	- <String Regex="">5</String>
93	- </Setting>
94	- </ConfigItem>
95	-
96	-<ConfigItem Name="Ticket::Frontend::InPersonTicket###QueuePrefix"
97	- Required="0" Valid="1">
98	- <Description>When the queue comes from a field in the form, a prefix can be attached to the value while searching for the queue. A space is added between this and the queue name.</Description>
99	- <Group>Ticket</Group>
100	- <SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
101	- <Setting>
102	- <String Regex="">Primeiro nível -</String>
103	- </Setting>
104	- </ConfigItem>
105	-
106	- <ConfigItem Name="Ticket::Frontend::InPersonTicket###QueueField"
107	- Required="0" Valid="1">
108	- <Description>Name of the field in the form which indicates the queue to send the ticket.</Description>
109	- <Group>Ticket</Group>
110	- <SubGroup>Frontend::Agent::InPersonTicket</SubGroup>
111	- <Setting>
112	- <String Regex="">DF_unidade</String>
113	- </Setting>
114	- </ConfigItem>
115	-
116	-</otrs_config>
117	\ No newline at end of file	0	\ No newline at end of file
	@@ -1,28 +0,0 @@		@@ -1,28 +0,0 @@
1	-# --
2	-# Kernel/Modules/pt_BR_StatisticsGraphs.pm - translations for StatisticsGraphs Module
3	-# Translations
4	-#
5	-# Copyright (C) 2015 (Rodrigo Goncalves) (rodrigo.g@ufsc.br)
6	-# --
7	-# This software comes with ABSOLUTELY NO WARRANTY. For details, see
8	-# the enclosed file COPYING for license information (AGPL). If you
9	-# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
10	-# --
11	-package Kernel::Language::pt_BR_InPersonTicket;
12	-
13	-use strict;
14	-use warnings;
15	-use utf8;
16	-
17	-sub Data {
18	- my $Self = shift;
19	-
20	- $Self->{Translation}->{'Concluded'} = 'Concluído';
21	- $Self->{Translation}->{'In person ticket'} = 'Atendimento presencial';
22	- $Self->{Translation}->{'The ticket has been created with number:'} = 'Chamado criado com número: ';
23	- $Self->{Translation}->{'Dynamic Fields IDs to Include (comma separated)'} = 'IDs dos campos dinâmicos, separados por vírgula - coloque * antes de campos que não devem usar o último valor para novos tickets';
24	-
25	-
26	- return 1;
27	-}
28	-1;
29	\ No newline at end of file	0	\ No newline at end of file
	@@ -1,428 +0,0 @@	@@ -1,428 +0,0 @@
1	-# --
2	-# Kernel/Modules/OcurrenceControl.pm - frontend module
3	-# Copyright (C) (2013) (Carlos Rebelato) (carlos.rebelato@grad.ufsc.br)
4	-# --
5	-# $Id: writing-otrs-application.xml,v 1.1 2010/08/13 08:59:28 mg Exp $
6	-# --
7	-# This software comes with ABSOLUTELY NO WARRANTY. For details, see
8	-# the enclosed file COPYING for license information (AGPL). If you
9	-# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
10	-# --
11	-# Autor: Rodrigo Gonçalves
12	-# Data.: 18/05/2015 - Versão inicial
13	-#
14	-package Kernel::Modules::InPersonTicket;
15	-
16	-use strict;
17	-use warnings;
18	-use Data::Dumper;
19	-
20	-our @ObjectDependencies = (
21	- "Kernel::Output::HTML::Layout",
22	- "Kernel::System::Log",
23	- "Kernel::System::Web::Request", # OLD ParamObject
24	- "Kernel::System::DB",
25	- "Kernel::Config",
26	- "Kernel::System::CustomerUser",
27	- "Kernel::System::Service",
28	- "Kernel::System::DynamicField::Backend",
29	- "Kernel::System::DynamicField",
30	- "Kernel::System::User"
31	-);
32	-
33	-sub new {
34	- my ( $Type, %Param ) = @_;
35	-
36	- # allocate new hash for object
37	- my $Self = {%Param};
38	- bless( $Self, $Type );
39	-
40	- return $Self;
41	-}
42	-
43	-sub Run {
44	- my ( $Self, %Param ) = @_;
45	- my %Data = ();
46	-
47	- my $layoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
48	- my $paramObject = $Kernel::OM->Get("Kernel::System::Web::Request");
49	- my $dbObject = $Kernel::OM->Get("Kernel::System::DB");
50	- my $serviceObject = $Kernel::OM->Get("Kernel::System::Service");
51	-
52	- $Self->BuildServiceBlock();
53	- $Self->BuildDynamicFieldsFields();
54	-
55	-
56	- if ( $paramObject->GetParam( Param => "Subaction" ) && ($paramObject->GetParam( Param => "Subaction" ) eq "GetUserName") ) {
57	- my $content = $Self->GetUserName(UserID => $paramObject->GetParam( Param => "UserID" ));
58	-
59	- return $layoutObject->Attachment(
60	- ContentType => 'application/text; charset=' . $layoutObject->{Charset},
61	- Content => $content,
62	- Type => 'inline',
63	- NoCache => 1,
64	- );
65	- } elsif ( $paramObject->GetParam( Param => "Subaction" ) && ($paramObject->GetParam( Param => "Subaction" ) eq "Add") ) {
66	- return $Self->CreateTicket();
67	- }
68	-
69	-
70	- my $Output = $layoutObject->Header( Title => "In person ticket" );
71	- $Output .= $layoutObject->NavigationBar();
72	- $Output .= $layoutObject->Output(
73	- TemplateFile => 'InPersonTicket'
74	- );
75	-
76	- $Output .= $layoutObject->Footer();
77	- return $Output;
78	-
79	- return $Output;
80	-
81	-}
82	-
83	-sub GetUserName {
84	- my ( $Self, %Param ) = @_;
85	-
86	- my $userObject = $Kernel::OM->Get("Kernel::System::CustomerUser");
87	- my %dados = $userObject->CustomerUserDataGet(User => $Param{"UserID"});
88	-
89	- if (%dados) {
90	- return $dados{UserFirstname};
91	- } else {
92	- return "";
93	- }
94	-
95	-}
96	-
97	-sub BuildDynamicFieldsFields {
98	- my ( $Self, %Param ) = @_;
99	-
100	- my $DynamicFieldBackendObject = $Kernel::OM->Get('Kernel::System::DynamicField::Backend');
101	- my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
102	- my $ConfigObject = $Kernel::OM->Get("Kernel::Config");
103	- my $config = $ConfigObject->Get("Ticket::Frontend::InPersonTicket");
104	- my $layoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
105	- my $paramObject = $Kernel::OM->Get("Kernel::System::Web::Request");
106	- my $userObject = $Kernel::OM->Get("Kernel::System::User");
107	- my @dfieldList = @{ $DynamicFieldObject->DynamicFieldListGet( Valid => 1 ) };
108	- my @dynamicFieldsInuse = split(",", $config->{DynamicFields} \|\| "unidade");
109	- my %prefs = $userObject->GetPreferences(UserID => $Self->{UserID});
110	-
111	- foreach (@dfieldList) {
112	- my $field = $_;
113	- if ($field->{Name} ~~ @dynamicFieldsInuse \|\| '*' . $field->{Name} ~~ @dynamicFieldsInuse) {
114	-
115	- my $defValue = "";
116	-
117	- if ($field->{Name} ~~ @dynamicFieldsInuse) {
118	- $defValue = $prefs{"IPT_DF_" . $field->{Name}};
119	- }
120	-
121	- my $DynamicFieldHTML = $DynamicFieldBackendObject->EditFieldRender(
122	- DynamicFieldConfig => $field,
123	- LayoutObject => $layoutObject,
124	- ParamObject => $paramObject,
125	- Value => $defValue,
126	- );
127	-
128	- $layoutObject->Block(
129	- Name => 'DynamicField',
130	- Data => {
131	- Name => $field->{Name},
132	- Label => $DynamicFieldHTML->{Label},
133	- Field => $DynamicFieldHTML->{Field},
134	- },
135	- );
136	- }
137	- }
138	-
139	-}
140	-
141	-sub BuildServiceBlock {
142	- my ( $Self, %Param ) = @_;
143	-
144	- my $layoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
145	- my $paramObject = $Kernel::OM->Get("Kernel::System::Web::Request");
146	- my $dbObject = $Kernel::OM->Get("Kernel::System::DB");
147	- my $ocurrenceObject = $Kernel::OM->Get("Kernel::System::Ocurrence");
148	- my $serviceObject = $Kernel::OM->Get("Kernel::System::Service");
149	- my $serviceResponsibility = $Kernel::OM->Get("Kernel::System::ServiceResponsibility");
150	-
151	- my $services = $serviceObject->ServiceListGet( Valid => 1, UserID => 1);
152	- my @services = @$services;
153	- @services = sort {$a->{Name} cmp $b->{Name}} @services;
154	-
155	- foreach my $service (@services) {
156	- $layoutObject->Block(
157	- Name => 'selectService',
158	- Data => {
159	- ServiceID => $service->{ServiceID},
160	- ServiceName => $Self->GetServiceName(Services => \@services, ServiceID => $service->{ServiceID}, ServiceName => $service->{Name}),
161	- Disabled => $Self->LeafService(Services => \@services, ServiceID => $service->{ServiceID}) ? "" : "disabled"
162	- }
163	- );
164	- }
165	-}
166	-
167	-sub GetServiceName {
168	- my ( $Self, %Param ) = @_;
169	-
170	- if ($Self->LeafService(%Param)) {
171	- my @tokens = split("::", $Param{ServiceName});
172	- return "  " x (@tokens - 1) . @tokens[@tokens - 1];
173	- } else {
174	- return $Param{ServiceName};
175	- }
176	-}
177	-
178	-sub LeafService {
179	- my ( $Self, %Param ) = @_;
180	-
181	- my $services = $Param{Services};
182	- my @services = @$services;
183	- my $serviceID = $Param{ServiceID};
184	-
185	- foreach my $service (@services) {
186	- if ((exists $service->{ParentID}) && ($service->{ParentID} == $serviceID)) {
187	- return 0;
188	- }
189	- }
190	-
191	- return 1;
192	-}
193	-
194	-sub GetQueueID() {
195	- my ( $Self, %Param ) = @_;
196	-
197	- my $ParamObject = $Kernel::OM->Get("Kernel::System::Web::Request");
198	- my $QueueObject = $Kernel::OM->Get("Kernel::System::Queue");
199	- my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
200	- my $ConfigObject = $Kernel::OM->Get("Kernel::Config");
201	- my $LayoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
202	- my $DynamicFieldBackendObject = $Kernel::OM->Get('Kernel::System::DynamicField::Backend');
203	-
204	- # Gets default Queue
205	- my $ConfigTicket = $ConfigObject->Get("Ticket::Frontend::CustomerTicketMessage");
206	-
207	- my $QueueDefault = $ConfigTicket->{"QueueDefault"};
208	-
209	- my %QueueListID = $QueueObject->QueueList( Valid => 1 );
210	- my %QueueList = reverse $QueueObject->QueueList( Valid => 1 );
211	- my $QueueID = $QueueList{$QueueDefault};
212	- my $Queue = $QueueListID{$QueueID};
213	-
214	- $Self->{ConfigModule} = $ConfigObject->Get("Ticket::Frontend::InPersonTicket");
215	-
216	- # Checks if there is a field for the queue
217	- my $QueuePrefix = $Self->{ConfigModule}->{"QueuePrefix"};
218	- my $QueueField = $Self->{ConfigModule}->{"QueueField"};
219	-
220	- if ( $QueuePrefix && $QueueField ) {
221	- my $dynFieldQueue = $DynamicFieldObject->DynamicFieldGet( Name => $QueueField );
222	- my $QueueSelected = $DynamicFieldBackendObject->EditFieldValueGet(
223	- DynamicFieldConfig => $dynFieldQueue,
224	- ParamObject => $ParamObject,
225	- LayoutObject => $LayoutObject,
226	- );
227	-
228	- my $QueueName = "$QueuePrefix $QueueSelected";
229	-
230	- if ( $QueueList{$QueueName} ) {
231	- $QueueID = $QueueList{$QueueName};
232	- $Queue = $QueueName;
233	- }
234	- }
235	-
236	- return ( $Queue, $QueueID );
237	-}
238	-
239	-sub CreateTicket {
240	- my ( $Self, %Param ) = @_;
241	- my %Data = ();
242	-
243	- my $TicketObject = $Kernel::OM->Get("Kernel::System::Ticket");
244	- my $ConfigObject = $Kernel::OM->Get("Kernel::Config");
245	- my $ParamObject = $Kernel::OM->Get("Kernel::System::Web::Request");
246	- my $BackendObject = $Kernel::OM->Get("Kernel::System::DynamicField::Backend");
247	- my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
248	- my $CustomerUserObject = $Kernel::OM->Get("Kernel::System::CustomerUser");
249	- my $LayoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
250	- my $userObject = $Kernel::OM->Get("Kernel::System::User");
251	- my $DynamicFieldBackendObject = $Kernel::OM->Get('Kernel::System::DynamicField::Backend');
252	-
253	-
254	- # Queue
255	- my ( $Queue, $QueueID ) = $Self->GetQueueID(%Param);
256	- $Data{QueueID} = $QueueID;
257	- my $email = $ParamObject->GetParam( Param => "userID" );
258	-
259	- $Self->{Config} = $ConfigObject->Get("Ticket::Frontend::CustomerTicketMessage");
260	-
261	- $Self->{ConfigModule} = $ConfigObject->Get("Ticket::Frontend::InPersonTicket");
262	-
263	- my $TicketID = $TicketObject->TicketCreate(
264	- Title => "Atendimento presencial",
265	- QueueID => $QueueID,
266	- Priority => $Self->{Config}->{PriorityDefault},
267	- Lock => 'unlock',
268	- State => ($ParamObject->GetParam(Param => "concluded") ? 'closed successful' : 'new'),
269	- ServiceID => $ParamObject->GetParam( Param => "ServiceID" ),
270	- TypeID => $Self->{ConfigModule}->{TypeID},
271	- CustomerID => $Self->GetUserIDFromEmail( EMail => $email, DefaultUserDomain => $Self->{ConfigModule}->{DefaultUserDomain}, DefaultCustomerID => $Self->{ConfigModule}->{DefaultCustomerID}),
272	- CustomerUser => $Self->GetUserIDFromEmail( EMail => $email, DefaultUserDomain => $Self->{ConfigModule}->{DefaultUserDomain}, DefaultCustomerID => $Self->{ConfigModule}->{DefaultCustomerID}),
273	- OwnerID => $Self->{ConfigModule}->{DefaultOwnerID},
274	- UserID => $Self->{ConfigModule}->{DefaultOwnerID},
275	- );
276	-
277	- my @dfieldList = @{ $DynamicFieldObject->DynamicFieldListGet( Valid => 1 ) };
278	- my @dynamicFieldsInuse = split(",", $Self->{ConfigModule}->{DynamicFields} \|\| "unidade");
279	-
280	- foreach (@dfieldList) {
281	- my $field = $_;
282	-
283	- if ($field->{Name} ~~ @dynamicFieldsInuse \|\| '*' . $field->{Name} ~~ @dynamicFieldsInuse) {
284	- my $value = $DynamicFieldBackendObject->EditFieldValueGet(
285	- DynamicFieldConfig => $field,
286	- ParamObject => $ParamObject,
287	- LayoutObject => $LayoutObject,
288	- );
289	-
290	- if ($field->{Name} ~~ @dynamicFieldsInuse) {
291	- $userObject->SetPreferences(
292	- UserID => $Self->{UserID},
293	- Key => "IPT_DF_" . $field->{Name},
294	- Value => $value,
295	- );
296	- }
297	-
298	- if ($value) {
299	- $DynamicFieldBackendObject->ValueSet(
300	- DynamicFieldConfig => $field,
301	- ObjectID => $TicketID,
302	- Value => $value,
303	- UserID => $Self->{UserID},
304	- );
305	- }
306	- }
307	- }
308	-
309	- my $MimeType = 'text/plain';
310	-
311	- # Create article
312	- my $FullName = $ParamObject->GetParam( Param => "UserName" );
313	-
314	- my $From = "\"$FullName\" <$email>";
315	- my $ArticleID = $TicketObject->ArticleCreate(
316	- TicketID => $TicketID,
317	- ArticleType => 'phone',
318	- SenderType => 'customer',
319	- From => $email,
320	- To => $Queue,
321	- Subject => "Registro de atendimento",
322	- Body => $ParamObject->GetParam( Param => "Description" ),
323	- MimeType => $MimeType,
324	- Charset => $LayoutObject->{UserCharset},
325	- UserID => $Self->{ConfigModule}->{DefaultOwnerID},
326	- HistoryType => $Self->{Config}->{HistoryType},
327	- HistoryComment => $Self->{Config}->{HistoryComment} \|\| '%%',
328	- AutoResponseType => '',
329	- OrigHeader => {
330	- From => $From,
331	- To => $Queue,
332	- Subject => "Registro de atendimento",
333	- Body => $ParamObject->GetParam( Param => "Description" ),
334	- },
335	- Queue => $Queue,
336	- );
337	-
338	- my $ReplyUser = $Kernel::OM->Get('Kernel::System::TemplateGenerator')->Template(
339	- TemplateID => ($ParamObject->GetParam(Param => "concluded") ? $Self->{ConfigModule}->{ReplyModelIDClosed} : $Self->{ConfigModule}->{ReplyModelID}),
340	- TicketID => $TicketID,
341	- UserID => $Self->{ConfigModule}->{DefaultOwnerID},
342	- );
343	-
344	- my $corpo = $ParamObject->GetParam( Param => "Description" );
345	- $ReplyUser =~ s/CONTEUDO/$corpo/g;
346	-
347	- my %sysAddr = $Kernel::OM->Get('Kernel::System::SystemAddress')->SystemAddressGet(ID => 1);
348	-
349	- my $FromSystem = $sysAddr{Name};
350	-
351	- $MimeType = 'text/html';
352	-
353	- $ArticleID = $TicketObject->ArticleSend(
354	- TicketID => $TicketID,
355	- ArticleType => 'note-internal', # email-external\|email-internal\|phone\|fax\|...
356	- SenderType => 'agent', # agent\|system\|customer
357	- From => $FromSystem,
358	- To => $email, # not required but useful
359	- Subject => 'Registro de atendimento', # required
360	- Body => $ReplyUser, # required
361	- Charset => $LayoutObject->{UserCharset},
362	- MimeType => $MimeType,
363	- Loop => 0, # 1\|0 used for bulk emails
364	- HistoryType => 'AddNote', # Move\|AddNote\|PriorityUpdate\|WebRequestCustomer\|...
365	- HistoryComment => 'Auto-reply ao usuário',
366	- NoAgentNotify => 0, # if you don't want to send agent notifications
367	- UserID => $Self->{ConfigModule}->{DefaultOwnerID},
368	- );
369	-
370	- $Data{TicketNumber} = $TicketObject->TicketNumberLookup( TicketID => $TicketID );
371	-
372	- # build output
373	- my $Output = $LayoutObject->Header( Title => "In person ticket" );
374	- my %BlockData = ();
375	- $BlockData{TicketNumber} = '<a href="/otrs/index.pl?Action=AgentTicketZoom;TicketID=' . $TicketID . '">' . $Data{TicketNumber} . '</a>';
376	- $LayoutObject->Block(
377	- Name => 'NewTicketCreated',
378	- Data => \%BlockData
379	- );
380	-
381	- $Output .= $LayoutObject->NavigationBar();
382	- $Output .= $LayoutObject->Output(
383	- Data => \%Data,
384	- TemplateFile => 'InPersonTicketCreated',
385	- );
386	- $Output .= $LayoutObject->Footer();
387	- return $Output;
388	-}
389	-
390	-
391	-sub GetUserIDFromEmail {
392	- my ( $Self, %Param ) = @_;
393	-
394	- my $email = $Param{EMail};
395	- my $result = $Param{DefaultCustomerID};
396	- my $domainList = $Param{DefaultUserDomain};
397	-
398	- if (index($email, '@') == -1) {
399	- return $email;
400	- }
401	-
402	- my $CustomerUserObject = $Kernel::OM->Get("Kernel::System::CustomerUser");
403	-
404	- if ($domainList) {
405	- my @domains = split( ",", $domainList );
406	-
407	- for my $domain (@domains) {
408	- my @parts = split( "@", $email );
409	- if ( $parts[1] eq $domain ) {
410	- my $id = $parts[0];
411	- my %List = $CustomerUserObject->CustomerSearch(
412	- UserLogin => $id,
413	- Valid => 1, # not required, default 1
414	- );
415	- if ( keys %List ) {
416	- $result = $id;
417	- return $result;
418	- }
419	- }
420	- }
421	- }
422	-
423	- return $result;
424	-}
425	-
426	-
427	-
428	-1;
	@@ -1,141 +0,0 @@	@@ -1,141 +0,0 @@
1	-# --
2	-# Kernel/Output/HTML/Standard/EditOcurrence.tt - overview
3	-# Copyright (C) (2014) (Carlos Rebelatto) (carlos.rebelatto@grad.ufsc.br)
4	-# --
5	-# $Id: writing-otrs-application.xml,v 1.1 2010/08/13 08:59:28 mg Exp $
6	-# --
7	-# This software comes with ABSOLUTELY NO WARRANTY. For details, see
8	-# the enclosed file COPYING for license information (AGPL). If you
9	-# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
10	-# --
11	-<div class="MainBox ARIARoleMain LayoutFixedSidebar SidebarFirst">
12	-
13	- <h1>[% Translate("In person ticket") \| html %]</h1>
14	-
15	-
16	- <div class="ContentColumn">
17	- <div class="WidgetSimple">
18	- <div class="Header">
19	- <h2>[% Translate("New ticket") \| html %]</h2>
20	- </div>
21	-
22	- [% RenderBlockStart("NewTicketCreated") %]
23	- <div class="Header">
24	- <h2 style="text-align: right; font-weight: bolder; font-size: larger; color: red">[% Translate("The ticket has been created with number:") \| html %][% Data.TicketNumber %]
25	- </div>
26	- [% RenderBlockEnd("NewTicketCreated") %]
27	-
28	-
29	- <div class="Content SpacingBottom ">
30	-
31	- <form action="[% Env("CGIHandle") %]" method="post" enctype="multipart/form-data" name="compose" id="InPersonTicket" class="Validate PreventMultipleSubmits">
32	-
33	- <input type="hidden" name="Action" value="[% Env("Action") %]"/>
34	- <input type="hidden" name="Subaction" value="Add"/>
35	-
36	- <fieldset class="TableLike">
37	- <label for="userID" class="Mandatory"><span class="Marker">*</span> [% Translate("E-mail") \| html %]:</label>
38	- <input class="Validate_Required" type="text" name="userID" id="userID" style="margin-left: 10px; width: 400px" />
39	- <div class="Clear"></div>
40	-
41	- <label for="UserName" class="Mandatory"><span class="Marker">*</span> [% Translate("Nome") \| html %]:</label>
42	- <input class="Validate_Required" type="text" name="UserName" id="UserName" style="margin-left: 10px; width: 400px" />
43	- <div class="Clear"></div>
44	-
45	- <label for="SelectService" class="Mandatory"><span class="Marker">*</span> [% Translate("Serviço") \| html %]:</label>
46	- <select class="Validate_Required" style="margin-left: 10px" name="ServiceID" id="SelectService">
47	- <option selected disabled value="0">[% Translate("Select a service") \| html %]</option>
48	- [% RenderBlockStart("selectService") %]
49	- <option [% Data.Disabled %] value="[% Data.ServiceID \| html %]">[% Data.ServiceName %]</option>
50	- [% RenderBlockEnd("selectService") %]
51	- </select>
52	- <div class="Clear"></div>
53	-
54	-
55	- [% RenderBlockStart("DynamicField") %]
56	- [% Data.Label %]
57	- <div class="Field">
58	- [% Data.Field %]
59	- </div>
60	- <div class="Clear"></div>
61	-
62	-
63	-
64	- [% RenderBlockEnd("DynamicField") %]
65	-
66	-
67	- <label class="OtherMandatory" for="RichTextDescription"><span class="Marker">*</span> [% Translate("Description") \| html %]:</label>
68	- <div id="RichTextField" class="RichTextField" >
69	-
70	- [% RenderBlockStart("RichText") %]
71	- [% InsertTemplate("RichTextEditor.tt") %]
72	- [% RenderBlockEnd("RichText") %]
73	-
74	- <textarea style="width: 800px; height: 200px" id="RichTextDescription" class="RichText Validate_Required [% Data.BodyInvalid \| html %]" name="Description" title="Description">[% Data.Description %]</textarea>
75	- <div id="RichTextError" class="TooltipErrorMessage"><p>[% Translate("This field is required.") \| html %]</p></div>
76	- <div id="RichTextServerError" class="TooltipErrorMessage"><p>[% Translate("This field is required.") \| html %]</p></div>
77	-
78	- <div style="display: block; padding: 5px; border-style: solid; border-color: black; border-width: 1px">
79	- Atalhos:
80	- <button type="button" onclick="javascript:modeloServicoConfigurado()">Serviço configurado</button>
81	- </div>
82	- </div>
83	- <div class="Clear"></div>
84	-
85	- <label for="UserId" class="Mandatory"><span class="Marker">*</span> [% Translate("Concluded") \| html %]:</label>
86	- <input type="checkbox" name="concluded" id="concluded" checked />
87	- <div class="Clear"></div>
88	-
89	-
90	- <input id='Cadastro' type='submit' value='Registrar chamado' style="margin-left: 40%; font-weight: bolder; font-size: x-larger"/>
91	- </fieldset>
92	- </div>
93	- </form>
94	- </div>
95	- </div>
96	- </div>
97	-</div>
98	-
99	-<script type="text/javascript" >
100	-
101	-function modeloServicoConfigurado() {
102	- $("#RichTextDescription").val("O serviço foi ativado e/ou configurado no equipamento do usuário. Foram efetuados testes com sucesso.");
103	- return false;
104	-}
105	-
106	-
107	-
108	-function dealEmail(email) {
109	-
110	- var arr = email.split("@");
111	- if (arr[0]) {
112	-
113	- var url = "/otrs/index.pl?Action=InPersonTicket;Subaction=GetUserName;UserID=" + arr[0];
114	-
115	- $.get(url, function(data) {
116	- $("#UserName").val(data);
117	- if (data) {
118	- $("#SelectService").focus();
119	- }
120	-
121	-
122	- }).fail(function(jqXHR, textStatus, errorThrown) {
123	- alert(textStatus);
124	- });
125	- }
126	-
127	-
128	-}
129	-
130	-</script>
131	-
132	-
133	-[% WRAPPER JSOnDocumentComplete %]
134	-$("#SelectService").val([% Data.ServiceID %]);
135	-
136	-$("#userID").blur(function() {
137	- dealEmail($("#userID").val());
138	-});
139	-
140	-[% END %]
141	-
	@@ -1,31 +0,0 @@	@@ -1,31 +0,0 @@
1	-# --
2	-# Kernel/Output/HTML/Standard/EditOcurrence.tt - overview
3	-# Copyright (C) (2014) (Carlos Rebelatto) (carlos.rebelatto@grad.ufsc.br)
4	-# --
5	-# $Id: writing-otrs-application.xml,v 1.1 2010/08/13 08:59:28 mg Exp $
6	-# --
7	-# This software comes with ABSOLUTELY NO WARRANTY. For details, see
8	-# the enclosed file COPYING for license information (AGPL). If you
9	-# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
10	-# --
11	-<div class="MainBox ARIARoleMain LayoutFixedSidebar SidebarFirst">
12	-
13	- <h1>[% Translate("In person ticket") \| html %]</h1>
14	-
15	-
16	- <div class="ContentColumn">
17	- <div class="WidgetSimple">
18	- <div class="Header">
19	- <h2>[% Translate("New ticket") \| html %]</h2>
20	- </div>
21	-
22	- [% RenderBlockStart("NewTicketCreated") %]
23	- <div class="Header">
24	- <h2 style="text-align: center; font-weight: bolder; font-size: x-larger; color: red">[% Translate("The ticket has been created with number:") \| html %][% Data.TicketNumber %]
25	- </div>
26	- [% RenderBlockEnd("NewTicketCreated") %]
27	-
28	- </div>
29	- </div>
30	-</div>
31	-
	@@ -0,0 +1,36 @@		@@ -0,0 +1,36 @@
		1	+In Person Ticket
		2	+==================
		3	+
		4	+Simple interface to quickly register an in person customer service.
		5	+
		6	+
		7	+Required PERL Packages:
		8	+-----------------------
		9	+
		10	+
		11	+
		12	+Requires OTRS Packages:
		13	+-----------------------
		14	+
		15	+
		16	+
		17	+Config required:
		18	+----------------
		19	+
		20	+All settings with the keyword "InPersonTicket" in its name should be revised prior to utilization.
		21	+
		22	+
		23	+Package building:
		24	+-----------------
		25	+
		26	+To build the package, do the following:
		27	+
		28	+ ./CreateOpm.sh
		29	+
		30	+The generated package will be on the `dist` directory
		31	+
		32	+
		33	+Issues:
		34	+-------
		35	+
		36	+This module was developed in-house and thus is provided without warranty or support. If you have a problem, please open an issue at https://softwarepublico.gov.br/gitlab/setic-ufsc/otrs-in-person-ticket/
0	\ No newline at end of file	37	\ No newline at end of file
@@ -0,0 +1,27 @@		@@ -0,0 +1,27 @@
	1	+<?xml version="1.0" encoding="utf-8" ?>
	2	+<otrs_package version="1.0">
	3	+ <Name>InPersonTicket</Name>
	4	+ <Version>1.4.0</Version>
	5	+ <ChangeLog Version="1.0.1" Date="22/05/2015">First version</ChangeLog>
	6	+ <ChangeLog Version="1.1.0" Date="2016-01-26">Fixes for OTRS 5.0.x</ChangeLog>
	7	+ <ChangeLog Version="1.2.0" Date="2016-06-10">Support for dynamic fields</ChangeLog>
	8	+ <ChangeLog Version="1.3.0" Date="2016-06-10">Support for custom queues</ChangeLog>
	9	+ <ChangeLog Version="1.4.0" Date="2018-02-02">Support for OTRS 6.0.x</ChangeLog>
	10	+ <Framework>6.0.x</Framework>
	11	+ <Vendor>SeTIC-UFSC</Vendor>
	12	+ <URL>setic.ufsc.br</URL>
	13	+ <License>AGPL</License>
	14	+ <Description>In person ticket</Description>
	15	+ <IntroInstall Type="post" Title="Thank you">Module installed successfully.</IntroInstall>
	16	+ <BuildDate>?</BuildDate>
	17	+ <BuildHost>?</BuildHost>
	18	+ <Filelist>
	19	+ <File Permission="644" Location="Kernel/Config/Files/XML/InPersonTicket.xml"></File>
	20	+ <File Permission="644" Location="Kernel/Modules/InPersonTicket.pm"></File>
	21	+ <File Permission="644" Location="Kernel/Language/pt_BR_InPersonTicket.pm"></File>
	22	+
	23	+ <File Permission="644" Location="Kernel/Output/HTML/Templates/Standard/InPersonTicket.tt"></File>
	24	+
	25	+ <File Permission="644" Location="var/httpd/htdocs/js/InPersonTicket.js"></File>
	26	+ </Filelist>
	27	+</otrs_package>