11.01.24

EnvelopeGenerator.Form/frmEnvelopeEditor.vb

@@ -101,9 +101,19 @@ Partial Public Class frmEnvelopeEditor
         RepositoryItemComboBox1.Items.Clear()
         RepositoryItemComboBox1.Items.AddRange(AllReceiverEmails)
 
+        SetAccessCodeColumnVisible()
+
         SetFormTitle(Controller.Envelope.Title)
     End Sub
 
+    Private Sub SetAccessCodeColumnVisible()
+        If Controller.Envelope.UseAccessCode Then
+            colAccessCode.Visible = True
+        Else
+            colAccessCode.Visible = False
+        End If
+    End Sub
+
     Private Sub btnDeleteFile_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnDeleteFile.ItemClick
         If ViewDocuments.GetSelectedRows().Count > 0 Then
 
@@ -336,6 +346,8 @@ Partial Public Class frmEnvelopeEditor
         }
         oForm.ShowDialog()
 
+        SetAccessCodeColumnVisible()
+
         SetFormTitle(Controller.Envelope.Title)
     End Sub