Suporte a campos dinamicos.

Envio para a fila adequada conforme unidade selecionada.

Suporte a campos dinamicos.
Envio para a fila adequada conforme unidade selecionada.
Rodrigo Gonçalves
1 parent 71c2f26d
Showing 5 changed files with 161 additions and 5 deletions Show diff stats
InPersonTicket.sopm
Kernel/Config/Files/InPersonTicket.xml
Kernel/Language/pt_BR_InPersonTicket.pm
Kernel/Modules/InPersonTicket.pm
Kernel/Output/HTML/Templates/Standard/InPersonTicket.tt
 <?xml version="1.0" encoding="utf-8" ?>
 <otrs_package version="1.0">
     <Name>InPersonTicket</Name>
-    <Version>1.1.0</Version>
+    <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>
@@ -21,7 +21,18 @@
 		</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>
@@ -82,4 +93,24 @@
 		</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
@@ -20,6 +20,8 @@ sub Data {
 	$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;
 }
@@ -25,6 +25,9 @@ our @ObjectDependencies = (
 	"Kernel::Config",
 	"Kernel::System::CustomerUser",
 	"Kernel::System::Service",	
+	"Kernel::System::DynamicField::Backend",
+	"Kernel::System::DynamicField",
+	"Kernel::System::User"
 );
 sub new {
@@ -45,8 +48,10 @@ sub Run {
 	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" ));
@@ -89,6 +94,50 @@ sub GetUserName {
 }
+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 ) = @_;
@@ -147,19 +196,43 @@ sub GetQueueID() {
 	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"};
-	# Checks if there is a field for the queue
 	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 );
 }
@@ -174,7 +247,10 @@ sub CreateTicket {
 	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;
@@ -198,6 +274,38 @@ sub CreateTicket {
 		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
@@ -50,6 +50,19 @@
 								[% 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" >
	@@ -21,7 +21,18 @@		@@ -21,7 +21,18 @@
21	</Setting>	21	</Setting>
22	</ConfigItem>	22	</ConfigItem>
23		23
24	-	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	+
25	<ConfigItem Name="Ticket::Frontend::InPersonTicket###TypeID"	36	<ConfigItem Name="Ticket::Frontend::InPersonTicket###TypeID"
26	Required="1" Valid="1">	37	Required="1" Valid="1">
27	<Description>Default type ID for tickets</Description>	38	<Description>Default type ID for tickets</Description>
	@@ -82,4 +93,24 @@		@@ -82,4 +93,24 @@
82	</Setting>	93	</Setting>
83	</ConfigItem>	94	</ConfigItem>
84		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	+
85	</otrs_config>	116	</otrs_config>
86	\ No newline at end of file	117	\ No newline at end of file
	@@ -25,6 +25,9 @@ our @ObjectDependencies = (		@@ -25,6 +25,9 @@ our @ObjectDependencies = (
25	"Kernel::Config",	25	"Kernel::Config",
26	"Kernel::System::CustomerUser",	26	"Kernel::System::CustomerUser",
27	"Kernel::System::Service",	27	"Kernel::System::Service",
		28	+ "Kernel::System::DynamicField::Backend",
		29	+ "Kernel::System::DynamicField",
		30	+ "Kernel::System::User"
28	);	31	);
29		32
30	sub new {	33	sub new {
	@@ -45,8 +48,10 @@ sub Run {		@@ -45,8 +48,10 @@ sub Run {
45	my $paramObject = $Kernel::OM->Get("Kernel::System::Web::Request");	48	my $paramObject = $Kernel::OM->Get("Kernel::System::Web::Request");
46	my $dbObject = $Kernel::OM->Get("Kernel::System::DB");	49	my $dbObject = $Kernel::OM->Get("Kernel::System::DB");
47	my $serviceObject = $Kernel::OM->Get("Kernel::System::Service");	50	my $serviceObject = $Kernel::OM->Get("Kernel::System::Service");
48	-	51	+
49	$Self->BuildServiceBlock();	52	$Self->BuildServiceBlock();
		53	+ $Self->BuildDynamicFieldsFields();
		54	+
50		55
51	if ( $paramObject->GetParam( Param => "Subaction" ) && ($paramObject->GetParam( Param => "Subaction" ) eq "GetUserName") ) {	56	if ( $paramObject->GetParam( Param => "Subaction" ) && ($paramObject->GetParam( Param => "Subaction" ) eq "GetUserName") ) {
52	my $content = $Self->GetUserName(UserID => $paramObject->GetParam( Param => "UserID" ));	57	my $content = $Self->GetUserName(UserID => $paramObject->GetParam( Param => "UserID" ));
	@@ -89,6 +94,50 @@ sub GetUserName {		@@ -89,6 +94,50 @@ sub GetUserName {
89		94
90	}	95	}
91		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	+
92	sub BuildServiceBlock {	141	sub BuildServiceBlock {
93	my ( $Self, %Param ) = @_;	142	my ( $Self, %Param ) = @_;
94		143
	@@ -147,19 +196,43 @@ sub GetQueueID() {		@@ -147,19 +196,43 @@ sub GetQueueID() {
147		196
148	my $ParamObject = $Kernel::OM->Get("Kernel::System::Web::Request");	197	my $ParamObject = $Kernel::OM->Get("Kernel::System::Web::Request");
149	my $QueueObject = $Kernel::OM->Get("Kernel::System::Queue");	198	my $QueueObject = $Kernel::OM->Get("Kernel::System::Queue");
		199	+ my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
150	my $ConfigObject = $Kernel::OM->Get("Kernel::Config");	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');
151		203
152	# Gets default Queue	204	# Gets default Queue
153	my $ConfigTicket = $ConfigObject->Get("Ticket::Frontend::CustomerTicketMessage");	205	my $ConfigTicket = $ConfigObject->Get("Ticket::Frontend::CustomerTicketMessage");
154		206
155	my $QueueDefault = $ConfigTicket->{"QueueDefault"};	207	my $QueueDefault = $ConfigTicket->{"QueueDefault"};
156		208
157	- # Checks if there is a field for the queue
158	my %QueueListID = $QueueObject->QueueList( Valid => 1 );	209	my %QueueListID = $QueueObject->QueueList( Valid => 1 );
159	my %QueueList = reverse $QueueObject->QueueList( Valid => 1 );	210	my %QueueList = reverse $QueueObject->QueueList( Valid => 1 );
160	my $QueueID = $QueueList{$QueueDefault};	211	my $QueueID = $QueueList{$QueueDefault};
161	my $Queue = $QueueListID{$QueueID};	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";
162		229
		230	+ if ( $QueueList{$QueueName} ) {
		231	+ $QueueID = $QueueList{$QueueName};
		232	+ $Queue = $QueueName;
		233	+ }
		234	+ }
		235	+
163	return ( $Queue, $QueueID );	236	return ( $Queue, $QueueID );
164	}	237	}
165		238
	@@ -174,7 +247,10 @@ sub CreateTicket {		@@ -174,7 +247,10 @@ sub CreateTicket {
174	my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");	247	my $DynamicFieldObject = $Kernel::OM->Get("Kernel::System::DynamicField");
175	my $CustomerUserObject = $Kernel::OM->Get("Kernel::System::CustomerUser");	248	my $CustomerUserObject = $Kernel::OM->Get("Kernel::System::CustomerUser");
176	my $LayoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");	249	my $LayoutObject = $Kernel::OM->Get("Kernel::Output::HTML::Layout");
177	-	250	+ my $userObject = $Kernel::OM->Get("Kernel::System::User");
		251	+ my $DynamicFieldBackendObject = $Kernel::OM->Get('Kernel::System::DynamicField::Backend');
		252	+
		253	+
178	# Queue	254	# Queue
179	my ( $Queue, $QueueID ) = $Self->GetQueueID(%Param);	255	my ( $Queue, $QueueID ) = $Self->GetQueueID(%Param);
180	$Data{QueueID} = $QueueID;	256	$Data{QueueID} = $QueueID;
	@@ -198,6 +274,38 @@ sub CreateTicket {		@@ -198,6 +274,38 @@ sub CreateTicket {
198	UserID => $Self->{ConfigModule}->{DefaultOwnerID},	274	UserID => $Self->{ConfigModule}->{DefaultOwnerID},
199	);	275	);
200		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	+
201	my $MimeType = 'text/plain';	309	my $MimeType = 'text/plain';
202		310
203	# Create article	311	# Create article
	@@ -50,6 +50,19 @@		@@ -50,6 +50,19 @@
50	[% RenderBlockEnd("selectService") %]	50	[% RenderBlockEnd("selectService") %]
51	</select>	51	</select>
52	<div class="Clear"></div>	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	+
53		66
54	<label class="OtherMandatory" for="RichTextDescription"><span class="Marker">*</span> [% Translate("Description") \| html %]:</label>	67	<label class="OtherMandatory" for="RichTextDescription"><span class="Marker">*</span> [% Translate("Description") \| html %]:</label>
55	<div id="RichTextField" class="RichTextField" >	68	<div id="RichTextField" class="RichTextField" >