Information générale
Catégorie:
Gestionnaire d'écran & Écrans
i am trying to use my own find command button on my form which contains 4 grids, master, 3 child. heres the code(behind click of command button):
do form inquiry with 'Inquiry' to mmastid
mmastid = mmastid
select master
set near on
seek mmastid
mm_length = Len(trim(mmastid))
if MMastid <> SUBSTR(Master.mastid,1,MM_LENGTH)
GO TOP
ENDIF
select trans
seek mastid
select sum(trans.hostcnt) as sumhostcnt, sum(trans.hostamt) as sumhostamt,;
sum(trans.outbal) as sumoutbal from fsmain where trans.mastid = merchant.mastid into cursor curtemp
thisform.pageframe1.page1.text1.value = curtemp.sumhostcnt
thisform.pageframe1.page1.text2.value = curtemp.sumhostamt
thisform.pageframe1.page1.text3.value = curtemp.sumoutbal
use in curtemp
THISFORM.PAGEFRAME1.PAGE1.TEXT1.VISIBLE = .T.
THISFORM.PAGEFRAME1.PAGE1.TEXT2.VISIBLE = .T.
THISFORM.PAGEFRAME1.PAGE1.TEXT3.VISIBLE = .T.
this code fisrt displays form to get user input for master id # then
does the following sum's. it totals the records properly but does not move the grids. I probably am not accessing the dataenvironment cursors properly, i am not sure how to do this.
help!!!
thank you
frank
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement