WINDOW TITLE "Trubka"

*----------------------------
* Informace o trubce
*----------------------------
set %position.row% = 0.5
set %position.col% = 15

@ %position.row%+0, %position.col% \\\
		GET TubeType PREFIX "Typ trubky:" SIZE 0,20 \\\
		MESSAGE "Typ trubky"
		
@ %position.row%+1, %position.col% \\\
		GET TubeColor PREFIX "Barva trubky:" SIZE 0,20 \\\
		MESSAGE "Barva trubky"

@ %position.row%+1, %position.col%+40 \\\
		GET TubeStrip PREFIX "Pruhy trubky:" SIZE 0,20 \\\
		MESSAGE "Proužky trubky"

@ %position.row%+2, %position.col%-5.5 \\\
		SAY "Délka:"
@ %position.row%+2, %position.col% \\\
		TOGGLE LengthCalc_ \\\
		MESSAGE "Zámek měření délek."
@ %position.row%+2, %position.col%+3 \\\
		GET LengthCalc SIZE 0,7 SUFFIX "[m]" \\\
		MESSAGE "Délka trubky v metrech."

@ %position.row%+3, %position.col% \\\
		GET Owner PREFIX "Vlastník trubky:" \\\
		MESSAGE "Vlastník trubky"

@ %position.row%+4, %position.col% \\\
		GET Realization PREFIX "Realizace:" SIZE 0,63 \\\
		MESSAGE "Informace o instalaci trubky"		

*----------------------------
* Obsazenost
*----------------------------
set %position.row% = 6
set %position.col% = 15

@ %position.row%, 0 TO %position.row%+6.5, %position.col%+65 TITLE "Informace o obsazenosti trubky"

@ %position.row%+2, 2 \\\
		LIST 1076 SIZE 5,65 TITLE "Obsazení optickými kabely:" NOHEADING \\\
		BUTTONS RIGHT \\\
		OPERATION "INSERT,EDIT,DELETE" \\\
		COLUMNS "CableO" \\\
		SORTBY "CableO"
