Excelente!!!
Saludos.
Esteban.
Excelente artículos. un comentario
este codigo es de la capa de negocio en el artículo La Interfaz, las reglas de negocio y los Datos
*-- ARTICULO_DB.PRG
Define Class cl_articulo As Custom
PROCEDURE DevolverDatosArticulo
LPARAMETERS tcCodArt, taDatosArt
SELECT * FROM ARTICULOS ;
WHERE CodArt = THISFORM.txtCodArt.Value ;
INTO ARRAY taDatosArt
RETURN _TALLY
ENDPROC
EndDefine
el THISFORM.txtCodArt.Value pertenece a la interfaz y deberia ser reemplazado por tcCodArt.
El miércoles, 13 de mayo de 2015, 19:11:57 (UTC-5), Fernando D. Bozzo escribió: