>I'll try to find some information about that. I don't remember what the Session class is all about.

Check this out:

CLOSE ALL
USE ( _SAMPLES + "\DATA\CUSTOMER" ) IN 0 AGAIN ALIAS CUSTOMER SHARED
GO TOP
WAIT WINDOW "1>" + CUSTOMER.COMPANY

o1 = CREATEOBJECT( "My_Job" )

WITH o1
   .Run()
ENDWITH

WAIT WINDOW "3>" + CUSTOMER.COMPANY
USE IN CUSTOMER

DEFINE CLASS My_Job AS Session	
PROCEDURE Run
   USE ( _SAMPLES + "\DATA\CUSTOMER" ) IN 0 AGAIN ALIAS CUSTOMER SHARED
   GO TOP
   SKIP 5
   WAIT WINDOW "2>" + CUSTOMER.COMPANY
   USE IN CUSTOMER
ENDDEFINE