Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
FRX Structure
Message
De
09/02/2023 16:08:09
 
 
À
09/02/2023 15:58:47
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Titre:
Divers
Thread ID:
01686161
Message ID:
01686162
Vues:
64
>Where can I find documentation on the FRX structure?
>In particular I'm looking for where the "Save Environment" switch is located.
>Thank you, Chaim

It's in the EXPR field. Use this code to clear it:
PROCEDURE RemovePrinterInfo
	LPARAMETERS lcFilter
	lcFilter='.'+lcFilter

	lnDatabases = ADIR(laDatabases, '*'+lcFilter)  && Create array

	FOR lnCount = 1 TO lnDatabases
		lcFilename = Proper(STRTRAN(laDatabases(lnCount,1), lcFilter))
		_VFP.CAPTION = "Fixing " + lcFilename + lcFilter
		USE (lcFilename+lcFilter) IN 0 EXCLUSIVE
		SELECT (lcFilename)
		lnLength=ALINES(TEMP,EXPR)
		FOR EACH lnTeller in WORDS
			lnTemp=ASCAN(TEMP,lnTeller)
			IF lnTemp>0
				ADEL(TEMP,lnTemp)
				lnLength=lnLength-1
			ENDIF
		ENDFOR
		lcStore=''
		FOR EACH lnCounter in TEMP
			IF VARTYPE(lnCounter)='L'
				EXIT
			ENDIF
			IF LEN(lcStore)>0
				lcStore=lcStore+CRLF
			ENDIF
			lcStore=lcStore+lnCounter
		ENDFOR
		REPLACE EXPR WITH lcLagre, TAG WITH "", TAG2 WITH ""
		? "Printerinfo removed from " + lcFilename
		USE
	ENDFOR
ENDPROC
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform