- VERSION 5.01.18

- Se agregó "Cerrdao permanente" a las opciones en "No Venta"

B4A/C_Historico.bas

@@ -7,7 +7,6 @@ Version=11.5
 Sub Class_Globals
 	Private Root As B4XView 'ignore
 	Private xui As XUI 'ignore
-
 	Dim g As GPS
 	Dim clie_id As String
 	Dim sDate,sTime As String
@@ -39,7 +38,7 @@ End Sub
 
 'This event will be called once, before the page becomes visible.
 Private Sub B4XPage_Created (Root1 As B4XView)
-	B4XPages.SetTitle(Me, $"${subs.capitalizar(B4XPages.GetPageId(Me))} - ${Application.VersionName}"$)
+	B4XPages.SetTitle(Me, $"${Subs.capitalizar(B4XPages.GetPageId(Me))} - ${Application.VersionName}"$)
 	Root = Root1
 	'load the layout to Root
 	ruta = File.DirInternal