Information générale
Catégorie:
Gestionnaire de rapports & Rapports
Titre:
Changing frx table with program
Versions des environnements
Hello Everybody
I have a report with several hundred fields per detail record.
(Shift-planing with n fields per day)
I do changes to this report with a programm
use
use xyz.frx
FOR i = 1 TO 31
l_nr = ALLTRIM(STR(i))
l_sucher = "*MYCURSOR.ENDE"+l_nr+"*"
LOCATE for LIKE(l_sucher, UPPER(expr))
IF FOUND()
l_usertext = "*:LISTENER BACKCOLOR = mycursor.bcolor"+ALLTRIM(STR(i))
replace user WITH l_usertext
replace mode WITH 0 &&opal
replace supexpr WITH "" && no print when
ENDif
ENDFOR
FOR i = 1 TO 31
l_nr = ALLTRIM(STR(i))
l_sucher = "*MYCURSOR.START"+l_nr+"*"
LOCATE for LIKE(l_sucher, UPPER(expr))
IF FOUND()
l_usertext = "*:LISTENER BACKCOLOR = mycursor.bcolor"+ALLTRIM(STR(i))
replace user WITH l_usertext
replace mode WITH 0 &&opal
replace supexpr WITH "" && no print when
ENDif
ENDFOR
use
Now i want to change some formating:
For numeric formats: left justify, blank if zero, currency
For charater formats: alignment left or right, to upper case
I don't know which columns of the frx table i have to change with which values.
Any help welcomed
Best regards
Albert
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