David,
I went into my app and added a quick second method following the example I sent earlier. Here's the results clipped directly from the VCX:
PROCEDURE Init
WITH THIS
DIMENSION .aCompanionCtls[1]
.cClassName = 'employee'
.cFormName = 'frmemployee'
.cFKName = 'fk_employees'
ENDWITH
ENDPROC
PROCEDURE Test
SET SAFETY OFF
ENDPROC
Bob Tracy
Never engage in a battle of wits if you're only half armed.