Form VL_SAM091: Independent Instance Form Startup
Name: VL_SAM091
Description: The following RDMLX form is used to demonstrate how one form can start up and independent instance of another form and pass information to it.
FUNCTION OPTIONS(*DIRECT);
BEGIN_COM HEIGHT(149) LEFT(50) TOP(470) WIDTH(359);
DEFINE_COM CLASS(#EMPNO.Visual) NAME(#EMPNO) DISPLAYPOSITION(1) HEIGHT(19) LEFT(16) PARENT(#COM_OWNER) TABPOSITION(1) TOP(32) WIDTH(209);
DEFINE_COM CLASS(#SURNAME.Visual) NAME(#SURNAME) DISPLAYPOSITION(2) HEIGHT(19) LEFT(16) PARENT(#COM_OWNER) TABPOSITION(2) TOP(61) WIDTH(324);
DEFINE_COM CLASS(#SALARY.Visual) NAME(#SALARY) DISPLAYPOSITION(3) HEIGHT(19) LEFT(16) PARENT(#COM_OWNER) TABPOSITION(3) TOP(88) WIDTH(262);
DEFINE_COM CLASS(#PRIM_LABL) NAME(#LABL_1) CAPTION('VL_SAM091') DISPLAYPOSITION(4) HEIGHT(25) LEFT(240) PARENT(#COM_OWNER) TABPOSITION(4) TABSTOP(False) TOP(8) VISUALSTYLE(#VS_LAREM) WIDTH(105);
END_COM ;
Name: VL_SAM091
Description: The following RDMLX form is used to demonstrate how one form can start up and independent instance of another form and pass information to it.
FUNCTION OPTIONS(*DIRECT);
BEGIN_COM HEIGHT(149) LEFT(50) TOP(470) WIDTH(359);
DEFINE_COM CLASS(#EMPNO.Visual) NAME(#EMPNO) DISPLAYPOSITION(1) HEIGHT(19) LEFT(16) PARENT(#COM_OWNER) TABPOSITION(1) TOP(32) WIDTH(209);
DEFINE_COM CLASS(#SURNAME.Visual) NAME(#SURNAME) DISPLAYPOSITION(2) HEIGHT(19) LEFT(16) PARENT(#COM_OWNER) TABPOSITION(2) TOP(61) WIDTH(324);
DEFINE_COM CLASS(#SALARY.Visual) NAME(#SALARY) DISPLAYPOSITION(3) HEIGHT(19) LEFT(16) PARENT(#COM_OWNER) TABPOSITION(3) TOP(88) WIDTH(262);
DEFINE_COM CLASS(#PRIM_LABL) NAME(#LABL_1) CAPTION('VL_SAM091') DISPLAYPOSITION(4) HEIGHT(25) LEFT(240) PARENT(#COM_OWNER) TABPOSITION(4) TABSTOP(False) TOP(8) VISUALSTYLE(#VS_LAREM) WIDTH(105);
END_COM ;