mariadb

mariadb

Postby Dioni » Sun May 16, 2021 4:11 pm

Buen dia...
Una consulta como puedo eliminar un registro pero que cumpla la condicion
bcodi es en nombre de un campo de la tabla cont0500

oRs := oCn:RowSet( "cont0500" ) // "lecturas" es una tabla de cDatabasename
oRs:GoTop()
Whil !oRs:Eof()
If Subs(oRs:bcodi,1,1)="1"
oRs:Delete();oRs:Save()
Endi
oRs:Skip(1)
End
XBROWSER oRs FASTEDIT
Dioni
 
Posts: 37
Joined: Tue May 12, 2009 8:45 pm
Location: Lima - Perú

Re: mariadb

Postby Dioni » Wed May 19, 2021 8:16 pm

Hola nadie sabe como eliminar un registro?
en mariadb
Dioni
 
Posts: 37
Joined: Tue May 12, 2009 8:45 pm
Location: Lima - Perú

Re: mariadb

Postby sysctrl2 » Thu May 20, 2021 12:09 am

Hola te recomiendo que uses codigo nativo de SQL.
Cesar Cortes Cruz
SysCtrl Software
Mexico

' Sin +- FWH es mejor "
User avatar
sysctrl2
 
Posts: 1022
Joined: Mon Feb 05, 2007 7:15 pm

Re: mariadb

Postby sysctrl2 » Thu May 20, 2021 12:12 am

/* oRs := oCn:RowSet( "cont0500" ) // "lecturas" es una tabla de cDatabasename
oRs:GoTop()
Whil !oRs:Eof()
If Subs(oRs:bcodi,1,1)="1"
oRs:Delete();oRs:Save()
Endi
oRs:Skip(1) */

cQry := "DELETE FROM cont0500" + CLRF
cQry += "WHERE bcodi=" + ClipValue2SQL( "1" )
oCn:Execute( cQry )
Cesar Cortes Cruz
SysCtrl Software
Mexico

' Sin +- FWH es mejor "
User avatar
sysctrl2
 
Posts: 1022
Joined: Mon Feb 05, 2007 7:15 pm

Re: mariadb

Postby sysctrl2 » Thu May 20, 2021 12:15 am

cQry := "DELETE FROM cont0500" + CLRF
cQry += "WHERE SUBSTRING(bcodi,1,1)=" + ClipValue2SQL( "1" )
oCn:Execute( cQry )
Cesar Cortes Cruz
SysCtrl Software
Mexico

' Sin +- FWH es mejor "
User avatar
sysctrl2
 
Posts: 1022
Joined: Mon Feb 05, 2007 7:15 pm

Re: mariadb

Postby nageswaragunupudi » Thu May 20, 2021 1:25 pm

Dioni wrote:Buen dia...
Una consulta como puedo eliminar un registro pero que cumpla la condicion
bcodi es en nombre de un campo de la tabla cont0500

oRs := oCn:RowSet( "cont0500" ) // "lecturas" es una tabla de cDatabasename
oRs:GoTop()
Whil !oRs:Eof()
If Subs(oRs:bcodi,1,1)="1"
oRs:Delete();oRs:Save()
Endi
oRs:Skip(1)
End
XBROWSER oRs FASTEDIT


Code: Select all  Expand view  RUN

oCn:Execute( "DELETE FROM `cont0500` WHERE `bcodi` LIKE '1%'" )
oRs := oCn:RowSet( "cont0500" )
XBROWSER oRs FASTEDIT
 
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10646
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: mariadb

Postby Dioni » Sat May 22, 2021 3:00 am

Excelente amigos Gracias por la ayuda Funciono

si busco, y quiero eliminar todos los registros que cumplan un acondision
bcodi:='102125225212252'

If Subs(oRs:bcodi,4,2)="1" asi se hace en archivos dbf's

y en mariadb seria asi ?
oCn:Execute( "DELETE FROM `cont0500` WHERE `bcodi` LIKE '12%'" )

como le digo que subs(bcodi,4,2)='12'

soy nuevo en mariadb gracias
Dioni
 
Posts: 37
Joined: Tue May 12, 2009 8:45 pm
Location: Lima - Perú

Re: mariadb

Postby nageswaragunupudi » Sat May 22, 2021 3:39 am

"WHERE bcodi LIKE '12%'" is same as "SUBSTR( bcodi, 1, 2 ) = '12'"
"WHERE bcode LIKE '___12%'" is same as "SUBSTR( bcodi, 4, 2 ) = '12'"

LIKE is case insensitive

The percentage ( % ) wildcard matches any string of zero or more characters.
The underscore ( _ ) wildcard matches any single character.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10646
Joined: Sun Nov 19, 2006 5:22 am
Location: India


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 70 guests