[Trello] nos avisos de cobranca o nib sair com separação de 4 digitos e espaco para ser mais facil ler

GCI/Reports/Aviso.rdlc

@@ -1059,7 +1059,7 @@
                                     <Paragraph>
                                       <TextRuns>
                                         <TextRun>
-                                          <Value>=First(Fields!NIBCondominio.Value) &amp; " (" &amp; First(Fields!BancoCondominio.Value) &amp; ")"</Value>
+                                          <Value>=Code.AddSpaces(First(Fields!NIBCondominio.Value)) &amp; " (" &amp; First(Fields!BancoCondominio.Value) &amp; ")"</Value>
                                           <Style>
                                             <FontSize>9pt</FontSize>
                                             <FontWeight>Bold</FontWeight>
@@ -1926,6 +1926,20 @@ First(Fields!MoradaCondomino.Value))</Value>
       </CellDefinitions>
     </GridLayoutDefinition>
   </ReportParametersLayout>
+  <Code>Function AddSpaces(inputString As String) As String
+    Dim resultString As String = ""
+    Dim i As Integer
+
+    For i = 1 To Len(inputString)
+        resultString &amp;= Mid(inputString, i, 1)
+
+        If i Mod 4 = 0 And i &lt;&gt; Len(inputString) Then
+            resultString &amp;= " "
+        End If
+    Next i
+
+    Return resultString
+End Function</Code>
   <EmbeddedImages>
     <EmbeddedImage Name="logo1">
       <MIMEType>image/jpeg</MIMEType>