FoxPro/Visual FoxPro - Declaracion de funciones visual FOX

   
Vista:

Declaracion de funciones visual FOX

Publicado por Ricardo M itchar23@gmail.com (3 intervenciones) el 11/09/2013 01:48:06
Hola que tal , soy nuevo en fox pro, entonces por ahi quiero declarar unas funciones que anteriormente he estado usando en visual basic. y me gustaria saber como declarar dichas estructuras y funciones en VISUAL FOX,

las funciones en Visual Basic son las siguientes:

Public Declare Function fAltaDocumento Lib "MGW_SDK.DLL" (ByRef aIdDocto As Long, aDocto As tDocumento) As Long

Public Declare Function fAltaMovimiento Lib "MGW_SDK.DLL" (ByVal aDoctoId As Long, ByRef aMovtoId As Long, aMovto As tMovimiento) As Long


estructuras:

Dim estructura_doc As tDocumento

estructura_doc.aFolio =
estructura_doc.aNumMoneda =
estructura_doc.aTipoCambio =
estructura_doc.aImporte =
estructura_doc.aDescuentoDoc1 =
estructura_doc.aDescuentoDoc2 =
estructura_doc.aSistemaOrigen =
estructura_doc.aAfecta =



Dim estructura_movimientos As tMovimiento

estructura_movimientos.aConsecutivo =
estructura_movimientos.aUnidades =
estructura_movimientos.aPrecio =
estructura_movimientos.aCosto =

todo esto para poder dar de alta un documento en VFP.

saludos.
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

Declaracion de funciones visual FOX

Publicado por Saul (676 intervenciones) el 13/09/2013 00:27:41
Hay varias formas de clarar lo que tu quieres..

Te digo una de las mas faciles.

a.- En tu programa principal ( llamase Inicio, Principal Etc)
tienes que hacer referencia a un archivo PRG.

b.- Tines que hacer un programa PRG y alli puedes poner tantas funciones quieras.
LIBRERIA.PRG

FUNCTION HOLA()
PARAMETERS _Hola
WAIT WINDOWS _Hola NOWATI
ENDFUCTION

c.- Puedes parametrisar tu PRG llamandolo asi. en tu pograma principal (a.)
SET PROCEDURE TO libreria.prg

d:- lo llamas asi en cualquier lugar de tu sistema.

=Hola("Hola mundo")

Suerte..

Sha
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