11-07-2017, 06:37 PM
The following routine sends correctly a message to window, the first time it is called :
Function tempf01
Window receives :
Function tempf02
However, the second time it is called, although the proper (new) values are set with tempf01, tempf02 receives the previous values, those set in the first call.
Any advice will be much appreciated. Many thanks in advance.
Function tempf01
,if eco.mcase=2 and but(id(27 hDlg))
,,str badescr=F"{eco.daTID}.{eco.daCODE}.{eco.daSERNO} - {eco.daDESCR}"
,,double baposon=eco.daPOSON
,,RCt ecba
,,ecba.bdate=badescr
,,ecba.daPOSON=baposon
,,outt F"{badescr} : {baposon} - {ecba.daPOSON}"
,,int dialogHandle=win("Σ.Ε.Σ. - Διαχείριση Οικονομικών *" "#32770")
,,SendMessage(dialogHandle WM_APP+4 0 &ecba)
Window receives :
Function tempf02
,case WM_APP+4 ;; Enter record
,RCt* ecba=+lParam
,double- bnPOSON=ecba.daPOSON
,str- bndescr=ecba.bdate
,outt F"{bndescr} : {bnPOSON}"
,BA_ECAdd
However, the second time it is called, although the proper (new) values are set with tempf01, tempf02 receives the previous values, those set in the first call.
Any advice will be much appreciated. Many thanks in advance.