Power Builder - concurrencia

   
Vista:

concurrencia

Publicado por Jose Luis (3 intervenciones) el 12/10/2007 22:06:32
UNA CONSULTA:

TENGO UNA APLICACION CON UN SOLO CORRELATIVO QUE TIENEN QUE USAR COMO 5 USUARIO, UNO EN VARIAS MOMENTOS .

TENGO UN MODULO DE REGISTRO : DE ALTAS, BAJAS, CAMBIOS , GRABAR Y BORRAR NORMAL UN ABC..

QUIERO UN SEGMENTO DE CODIGO PARA LA OPCION NUEVO Y GRABAR EN POWER BUILDER PODRIAN DARME ESE SEGMENTO DE CODIGO PF....CON LAS INSTRUCTIVAS NECESARIAS..OK..

AGRADECERE SU APORTE...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:concurrencia

Publicado por francisco portales (192 intervenciones) el 19/10/2007 00:16:29
llama esta funcion desde tu codigo

// f_db_correlativo
// return integer

INTEGER LI_CORRELATIVO

LI_CORRELATIVO=0

SELECT ISNULL(CORRELATIVO,0) INTO :LI_CORRELATIVO
FROM DBO.GIS_CORRELATIVO
WHERE IDCORRELATIVO=1;

if sqlca.sqlcode = 0 then
sqlca.of_commit()

// podria ser commit;
// si no es pfc
else
sqlca.of_rollback()

end if

UPDATE DBO.GIS_CORRELATIVO
SET CORRELATIVO=:LI_CORRELATIVO+1
WHERE IDCORRELATIVO=1;

if sqlca.sqlcode = 0 then
sqlca.of_commit()
else
sqlca.of_rollback()

end if

RETURN LI_CORRELATIVO
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar