diff --git a/B4A/C_Cliente.bas b/B4A/C_Cliente.bas index fd32320..d6dfecc 100644 --- a/B4A/C_Cliente.bas +++ b/B4A/C_Cliente.bas @@ -5431,7 +5431,7 @@ Sub EnviarPDFWhatsAppNumero(NumeroTelefono As String) fd.Dir = Starter.fFileProvider.SharedFolder fd.FileName = archivoTicketPDF fd.ContentType = "application/pdf" - Private link As String = "http://keymon.lat:9000/v1/ticketpdf" + Private link As String = "http://keymon.net:9000/v1/ticketpdf" Private campos As Map = CreateMap( "message":"Tu compra de Guna va ser a *crédito* por el monto de $${NumberFormat2(monto, 1, 2, 2, True)}\n\nManda *1* para confirmar\nManda *0* para rechazar\n\n*Nota:* Si este mensaje no se contesta, se considerará que el pago es en *EFECTIVO*.\n\n(Solo el *número* por favor)") campos.Put("number", NumeroTelefono) campos.Put("message","Tu recibo") @@ -5600,7 +5600,7 @@ Sub mandaWAMsgCredito(numTel As String, monto As String) Private ALMACEN As String = Subs.traeAlmacen '"1" ' CON POST - Private link As String = "http://keymon.lat:9000/v1/messages" + Private link As String = "http://keymon.net:9000/v1/messages" Private elJSON As String = $"{ "number":"${numTel}", "message":"Tu compra de Guna va ser a *crédito* por el monto de $${NumberFormat2(monto, 1, 2, 2, True)}\n\nManda *1* para confirmar\nManda *0* para rechazar\n\n*Nota:* Si este mensaje no se contesta, se considerará que el pago es en *EFECTIVO*.\n\n(Solo el *número* por favor)", diff --git a/B4A/Guna Vistas V3.1.b4a b/B4A/Guna Vistas V3.1.b4a index fe9a144..44833f3 100644 --- a/B4A/Guna Vistas V3.1.b4a +++ b/B4A/Guna Vistas V3.1.b4a @@ -266,7 +266,7 @@ Version=12.8 #Region Project Attributes #ApplicationLabel: Guna Preventa #VersionCode: 1 - #VersionName: 5.03.25_NS + #VersionName: 5.07.25 'SupportedOrientations possible values: unspecified, landscape or portrait. #SupportedOrientations: portrait #CanInstallToExternalStorage: False diff --git a/B4A/Guna Vistas V3.1.b4a.meta b/B4A/Guna Vistas V3.1.b4a.meta index 1d77619..36fdb46 100644 --- a/B4A/Guna Vistas V3.1.b4a.meta +++ b/B4A/Guna Vistas V3.1.b4a.meta @@ -72,7 +72,7 @@ ModuleClosedNodes21= ModuleClosedNodes22= ModuleClosedNodes23= ModuleClosedNodes24= -ModuleClosedNodes25=4,6,7,8,9 +ModuleClosedNodes25= ModuleClosedNodes26= ModuleClosedNodes27= ModuleClosedNodes3= @@ -82,6 +82,6 @@ ModuleClosedNodes6= ModuleClosedNodes7=5,6,8,9,10,11 ModuleClosedNodes8= ModuleClosedNodes9= -NavigationStack=C_Cliente,b_comentarios_Click,5658,0,Diseñador Visual,cliente.bal,-100,4,C_Cliente,B4XPage_Appear,1104,6,Starter,Process_Globals,15,3,B4XMainPage,i_engrane_Click,813,0,Main,Globals,23,0,C_Principal,Class_Globals,0,0,C_Principal,connecta_Click,2240,0,C_Principal,JobDone,1259,0,B4XMainPage,i_engrane_LongClick,1067,0,C_Cliente,gest_Click,1544,0 +NavigationStack=C_Cliente,Label19_LongClick,5734,0,C_Cliente,b_comentarios_Click,5658,0,C_Cliente,B4XPage_Appear,1096,6,C_Cliente,b_enviarTicket_Click,5379,0,Diseñador Visual,cliente.bal,-100,6,C_Cliente,b_envioPDF_Click,5522,0,C_Cliente,b_enviarTicket_LongClick,5395,0,C_Cliente,enviaTicket,5411,0,C_Cliente,mandaWAMsgCredito,5594,2,C_Cliente,EnviarPDFWhatsAppNumero,5427,3 SelectedBuild=0 VisibleModules=25,2,14,26,5,10,15,11,20,19