Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Running out of memory during processing
Message
De
18/04/2008 09:42:13
Jay Johengen
Altamahaw-Ossipee, Caroline du Nord, États-Unis
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Running out of memory during processing
Versions des environnements
Visual FoxPro:
VFP 9 SP2
Divers
Thread ID:
01311651
Message ID:
01311651
Vues:
65
I'm running out of memory on this after about 200 records. Should I add oxClient = NULL after the DO WHILE? What would be the best approach? I'm assuming that this is what is causing the memory error, but I'm not positive.
SCAN
	oxClient = NEWOBJECT( 'EMPS_Client_Class', 'EMPS_PROCS.prg','', 'MEDINOTES' )
	oxClient.SETUP()
	*start the loop to send the message.
	DO WHILE !oxClient.ProcessData("Medinotes","HL7","Demographics",RptData.ptpn)
		IF !4 = MESSAGEBOX("Unable to send patient data to Medinotes." +  CHR(13);
				+ "received the folowing error during data tranmission." + CHR(13);
				+ oxClient.errorMsg, 5 + 48, 'Data transmission error')
			EXIT
		ENDIF
	ENDDO
ENDSCAN
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform