cheveguerra/Kelloggs_V3
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Kelloggs_V3.git synced 2026-04-21 14:49:18 +00:00
Code Issues Packages Projects Releases Wiki Activity

.

Browse Source
This commit is contained in:
cvaldes1201
2023-09-25 10:03:20 -06:00
parent d09bf58c40
commit a8cb444a7d
2 changed files with 9 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
B4A/C_Principal.bas
View File

@@ -2273,7 +2273,7 @@ Sub NUEVO_Click
c=Starter.skmt.ExecQuery2("select count(*) AS COUNT from kmt_info where CAT_CL_CODIGO like ?", Array As String ("N%"))
c.Position = 0
If c.GetString("COUNT") > 2000 Then
If c.GetString("COUNT") > 2 Then
MsgboxAsync("YA NO SE PUEDEN CREAR MAS CLIENTES","AVISO")
Else
Subs.iniciaActividad("nuevocliente")