FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour C贸mo llamar una funci贸n incluida en un oFld en otro prg
Posts: 152
Joined: Mon Feb 13, 2006 08:23 PM

C贸mo llamar una funci贸n incluida en un oFld en otro prg

Posted: Wed Nov 11, 2020 09:52 PM

Hola a todos

Ver茅s, estoy haciendo un programa con varios oFld y se est谩 extendiendo demasiado en el mismo prg, por lo que gustar铆a saber c贸mo separar las funciones incluidas en un oFld en otros prgs.

Por ejemplo:

@ 190, 25 BUTTON "Editar " OF oFld:aDialogs[ 2 ] SIZE 40,20 PIXEL ACTION editsoc(cnum, cdenom, nptasti, neuti, nRecnoSoc, obrwsoc)

Dado que tengo muchos folders que a su vez tienen muchas funciones, me gustar铆a crear un prg por folder, pero no s茅 c贸mo hacerlo.

De la misma manera que sin folders llamar铆a a la funci贸n en otro prg de la siguiente manera

include "FiveWin.Ch"c

include "ord.ch"

include "xbrowse.ch"

function editsoc(cnum, cdenom, nptasti, neuti, nRecnoSoc, obrwsoc,odlg)

驴En el supuesto de una funci贸n incluida en un oFld c贸mo se har铆a?
Gracias

FWH 20.12 BCC7
Posts: 152
Joined: Mon Feb 13, 2006 08:23 PM

Re: C贸mo llamar una funci贸n incluida en un oFld en otro prg

Posted: Wed Nov 11, 2020 10:02 PM

Se me olvidaba decir que en cada folder uso una base de datos diferente, eso relacionadas entre s铆 con SET RELATION.

Por ejemplo: oFld:aDialogs[ 1 ] los datos de la empresa: en oFld:aDialogs[ 2 ] los de los trabajadores; en oFld3:aDialogs [ 3} datos de contacto.

Un saludo

FWH 20.12 BCC7
Posts: 152
Joined: Mon Feb 13, 2006 08:23 PM

Re: C贸mo llamar una funci贸n incluida en un oFld en otro prg

Posted: Sat Nov 14, 2020 02:00 PM

Hola
Igual no me explicado bien.
Se trata de un oDlg con cuatro oFld. Cada oFld muestra la informaci么n de una base de datos diferente pero relacionadas con las dem谩s bases de datos.
Ejemplo:
oFld:aDialogs[1]-> dbf de empresas
oFld:aDialogs[2]-> dbf de trabajadores
oFld:aDialogs[3]-> dbf de integrantes del consejo rector
oFld:aDialogs[4]-> dbf de informaci贸n de contacto

Las 4 bases de datos est谩n relacionadas entre s铆.
Hasta ahora el programa est芒 casi todo en un fichero prg y conforme voy ampliando se va haciendo m谩s engorroso.

De ah卯 la pregunta de si hay alguna forma de que cada oFld est茅 en un prg diferente y sin que se rompa la relaci贸n de las dbfs.

Un saludo

FWH 20.12 BCC7
Posts: 199
Joined: Wed Jan 02, 2019 08:36 AM

Re: C贸mo llamar una funci贸n incluida en un oFld en otro prg

Posted: Sun Nov 15, 2020 11:08 AM

Buenos dias

Como veo que nadie te contesta.....

Las funciones pueden estar en .prg diferentes.

Simplemente escribe la funci贸n de esta manera

FUNCTION MiFuncion( parametros)

RETURN( resultado )

no pongas STATIC delante, solo ser铆a accesible en el .prg donde esta escrito.

Es muy importante que la funcion reciba los parametros necesarios y devuelva la informaci贸n requerida a la funci贸n que le llama.

Espero que te ayude.

Yo lo utilizo por ejemplo en el m贸dulo de pedidos. Si los art铆culos tienen tallas (por ejemplo camisas), todas las funciones referentes al manejo de tallas est谩n en otro prg.

Ya nos contar谩s

Jes煤s Mar铆n

Jes煤s Mar铆n
deumare@gmail.com
Posts: 152
Joined: Mon Feb 13, 2006 08:23 PM

Re: C贸mo llamar una funci贸n incluida en un oFld en otro prg

Posted: Sun Nov 22, 2020 04:32 PM

Gracias, Jes煤s. He pasado por aqu卯 por curiosidad y he visto tu respuesta. Dado que apremiaba el tema y no ve卯a respuesta (pero visitas muchas) he optado por dejarlo como estaba y he renunciado a la opci贸n que planteaba en la consulta.

En f卯n, qu茅 le voy a hacer, es lo que hay.

De todas formas, gracias por haberte tomado la molestia de contestar.

FWH 20.12 BCC7

Continue the discussion