VERSION 5.12.17

- Se agrego codigo para que el label de la notificacion tenga scroll vertical y se vaya al inicio del texto

B4A/B4XMainPage.bas

@@ -18,7 +18,9 @@ Version=9.85
 	'######################      PUSH TORTOISE GIT     #########################################################
 	'Ctrl + click ide://run?file=%WINDIR%\System32\WindowsPowerShell\v1.0\powershell.exe&Args=TortoiseGitProc&Args=/command:commit&Args=/path:"./../../"&Args=/closeonend:2
 	'###########################################################################################################
+	'######################      PUSH TORTOISE GIT CON TAG    ##################################################
 	'Ctrl + clic para Git: ide://run?file=%WINDIR%\System32\WindowsPowerShell\v1.0\powershell.exe&Args=-ExecutionPolicy&Args=Bypass&Args=-File&Args=..\_git_tag.ps1&Args=%22%PROJECT%%22&Args=%22%PROJECT_NAME%%22
+	'###########################################################################################################
 #End Region
  
 'Ctrl + click ide://run?file=%WINDIR%\System32\cmd.exe&Args=/c&Args=github&Args=..\..\

B4A/KelloggsV4.b4a

@@ -917,7 +917,7 @@ Version=12.8
 #Region  Project Attributes	
 	#ApplicationLabel: Kelloggs Venta
 	#VersionCode: 3000
-	#VersionName: 5.12.15.test
+	#VersionName: 5.12.17
 	#SupportedOrientations: portrait
 	#CanInstallToExternalStorage: False
 	#BridgeLogger:true

B4A/KelloggsV4.b4a.meta

@@ -100,6 +100,6 @@ ModuleClosedNodes6=
 ModuleClosedNodes7=
 ModuleClosedNodes8=
 ModuleClosedNodes9=
-NavigationStack=C_Principal,cargar_Click,1031,0,Subs,modTrendSpending,2210,3,C_TrendSpending,modTrendSpending,112,2,C_Productos,B4XPage_Appear,236,0,C_TrendSpending,traeDescXSku,59,0,C_TrendSpending,traeInfoTrendSpending,73,2,C_Principal,JobDone,2240,0,Main,Activity_Create,43,0,B4XMainPage,Class_Globals,119,0,B4XMainPage,Initialize,127,0
+NavigationStack=C_Principal,cargar_Click,1031,0,Subs,modTrendSpending,2210,3,C_TrendSpending,modTrendSpending,112,2,C_Productos,B4XPage_Appear,236,0,C_TrendSpending,traeDescXSku,59,0,C_TrendSpending,traeInfoTrendSpending,73,2,C_Principal,JobDone,2240,0,Main,Activity_Create,43,0,B4XMainPage,Class_Globals,119,0,B4XMainPage,Initialize,129,0
 SelectedBuild=0
-VisibleModules=31,1,12,3,32,13,14,20,19,33,16
+VisibleModules=31,1,12,3,32,13,14,20,19,33

B4A/_git_tag.ps1

@@ -43,7 +43,7 @@ Write-Host "Abriendo TortoiseGit..."
 
 # Argumentos limpios
 $pathArg = '/path:"{0}"' -f $projectPath
-$msgArg = '/logmsg:"Version {0}"' -f $version
+$msgArg = '/logmsg:"VERSION {0}"' -f $version
 $cmdArg = "/command:commit"
 
 $process = Start-Process "TortoiseGitProc.exe" -ArgumentList $cmdArg, $pathArg, $msgArg -Wait -PassThru
@@ -53,17 +53,20 @@ $newCommit = git rev-parse HEAD
 # 5. VALIDACIÓN
 if ($oldCommit -eq $newCommit) {
     Write-Warning "Commit cancelado."
+	git tag -d $tagName 2>$null  # Borra tag local previo si existe para actualizarlo al nuevo commit
     return
 }
 
 Write-Host ">> Commit detectado."
 
 # 6. GESTIÓN DE TAGS (VISUAL TOPMOST)
+Write-Host "git ls-remote --tags origin $tagName"
 $remoteTagInfo = git ls-remote --tags origin $tagName
 
 if ($remoteTagInfo) {
     # --- TRUCO PARA QUE LA VENTANA SALGA AL FRENTE ---
     # Creamos un formulario invisible que esté "Siempre Visible" (TopMost)
+	Write-Host "Recibimos remoteTagInfo"
     $topForm = New-Object System.Windows.Forms.Form
     $topForm.TopMost = $true
     $topForm.Opacity = 0 # Invisible
@@ -72,12 +75,14 @@ if ($remoteTagInfo) {
     $topForm.Show()
     $topForm.Activate()
     
+    [System.Console]::Beep(1000, 200)
     [System.Console]::Beep(1000, 200)
     
     $msgBody = "El tag '$tagName' YA EXISTE en GitHub.`n`nDeseas SOBRESCRIBIRLO?`n`nSi = Borrar anterior y actualizar (Force Push).`nNo = Subir solo codigo (mantener tag viejo)."
     $msgTitle = "⚠️ Conflicto de Versiones - $projectName"
     
     # El mensaje ahora es "hijo" del formulario invisible, heredando su propiedad TopMost
+	Write-Host "Preguntamos que hacer con el tag"
     $respuesta = [System.Windows.Forms.MessageBox]::Show($topForm, $msgBody, $msgTitle, "YesNo", "Warning")
     
     $topForm.Dispose() # Limpiamos el formulario invisible