Information générale
Catégorie:
Codage, syntaxe et commandes
I have modified your code, as I was using 2 master/parent fields, so both values should be saved, here is the modified version :-
Dimension lcLastCode(2)
lcLastCode(1) = space(6) && len for pgno - master/parent field
lcLastCode(2) = space(40) && len for desc - master/parent field
select ;
HideRepValue(master.pgno,1) as pgno,HideRepValue(master.desc,2) as desc, ;
delivery.date, delivery.qty ;
from ;
master, delivery ;
where ;
master.pgno=delivery.pgno
function HideRepValue
lparameter lcFieldValue, nValue
if lcFieldValue == lcLastCode(nValue)
return space(len(lcFieldValue))
else
lcLastCode(nValue) = lcFieldValue
return lcFieldValue
endif
but the only problem I am facing now is the first record, is showing me blanks in parent fields, & I can't figure it out why it is happening !!
Any suggestions ??
& thanks once again for your reply, U have saved me as this problem was troubling me from last 15-20 days. I really thank you from my heart !!
Précédent
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