Tiny Type prob

Check if no types exists:

If First My_type=null Then Text 10,10,"NO TYPES Available"

Insert one at top/bottom:

;at top
Insert MyType.My_type before First My_type

;at bottom
Insert MyType.My_type After Last My_type