COMPILE ROUTINE TEST_OBJ_EPI_PART(Dummy)
ROWDEF(CHARSTR)

DECLARE SUBROUTINE Set_Status, obj_Epi_Part
DECLARE FUNCTION Get_Status, obj_Epi_Part

DEBUG


EpiPN = 'EPI06169'
PsNo = 3136

obj_Epi_Part('SetSubstrate',EpiPN:@RM:PsNo:@RM:'')




* * * * * * *
Bail:
* * * * * * *

RETURN