Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Running out of memory during processing
Message
From
18/04/2008 09:42:13
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Running out of memory during processing
Environment versions
Visual FoxPro:
VFP 9 SP2
Miscellaneous
Thread ID:
01311651
Message ID:
01311651
Views:
64
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
Next
Reply
Map
View

Click here to load this message in the networking platform