SUB	INOUT.(C%,B$,Z%)
	{FCSCOM.B4S}
	CALL TEL.(C%,WHERE$)
	CALL INPUT.(C%,B$,Z%)
	FCSWHO% = C%
	SUBEND