cual es la forma correcta ?
Publicado por noe (48 intervenciones) el 06/07/2024 06:37:28
Hola foro¡!!
Esperando me puedan ayudar y es con lo siguiente tengo un sistema que está alojado en un pc y acceden al sistema por medio de un exe 5 pc todo funciona de maravilla
En el load del formulario tengo esto
Esto tengo en un botón del formulario para guardar la información
El problema inicio cuando modifique el modo de insertar la información quite del load esto
En el botón del formulario para guardar la información esta así
Y se ha alentado mucho cual es la forma correcta de utilizar el insert o cual es la forma correcta ¿
Esperando me puedan ayudar y es con lo siguiente tengo un sistema que está alojado en un pc y acceden al sistema por medio de un exe 5 pc todo funciona de maravilla
En el load del formulario tengo esto
1
2
3
Close Databases All
Select 3
Use pgap
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Select pgap
Locate For numemp = pnum And concepto = 21 And periodo = periodos
If ¡found()
Select pgap
=CursorSetProp("buffering", 3)
Append Blank
Replace numemp With pnum
Replace periodo With periodos
Replace concepto With Thisform.text1.Value
Replace horaext With Thisform.text6.Value
Replace tipo With 'NR'Replace sueldo With sdo
Thisform.horas_extrasReplace importe With imp_21
Replace unico With Recno()
Replace dias With Thisform.text8.Value
=Tableupdate(.F.,.T.)
Endif
1
2
3
*Close Databases All*Select 1*Use pgap1
2
3
4
5
6
7
8
9
Select numemp,concepto,periodo From pgap Where numemp=pnum and concepto=21 and periodo=pper Into Cursor cpga
Select cpga
If _Tally() > 0
Insert Into pgap(numemp,periodo,concepto,horaext,tipo,importe,sueldo,unico,dias);
Value (pnum,pper,pcon,pgua,'NR',imp_21,sdo,tdr,pdia)
Endif
If used(‘cpga’)
Use in cpga
Endif
Valora esta pregunta
0