Index: UI/PR/GA/dlgTBStartNew.cls.xml =================================================================== diff -u -r1074 -r1210 --- UI/PR/GA/dlgTBStartNew.cls.xml (.../dlgTBStartNew.cls.xml) (revision 1074) +++ UI/PR/GA/dlgTBStartNew.cls.xml (.../dlgTBStartNew.cls.xml) (revision 1210) @@ -5,6 +5,7 @@ KeyCodesCNTs,UILibCtrlCNTs Default %Library.TMFormClass +0 %Library.String @@ -273,7 +274,6 @@ ArrayDS("0-Index","IS")=4 ArrayDS("0-Index","WS")=2 */ - ]]> @@ -287,7 +287,6 @@ Quit:(..cboDesign.ItemIndex=-1) 0 Quit:(..cboTemplateCode.ItemIndex=-1) 0 Quit 1 - ]]> @@ -299,7 +298,6 @@ @@ -315,7 +313,6 @@ Set ..cboTemplateCode.OnChangeItem=$lb(%this,"cboTemplateCodeChangeItem") Do ..InitializeCtrls() q $$$OK - ]]> @@ -336,7 +333,6 @@ ;End of user code s Args=$lb(Sender) q - ]]> @@ -362,8 +358,6 @@ q ;============================================================================= - - ]]> @@ -402,8 +396,6 @@ ;End of user code s Args=$lb(Sender,PrevIndex) q - - ]]> @@ -424,16 +416,15 @@ If (Key=$$$keyEnter)&&(..cboDesign.ItemIndex>-1) Do . ; Move focus . If ..cboTemplateCode.Items.Count=1 Do - .. ;Do:(..btnOK.CanFocus()) ..btnOK.SetFocus() - .. Do ..btnOKClick($LB(..btnOK)) + . . ;Do:(..btnOK.CanFocus()) ..btnOK.SetFocus() + . . Do ..btnOKClick($LB(..btnOK)) . Else Do - .. Set ..cboTemplateCode.DroppedDown="True" - .. Do ..cboTemplateCode.SetFocus() + . . Set ..cboTemplateCode.DroppedDown="True" + . . Do ..cboTemplateCode.SetFocus() ;End of user code s Args=$lb(Sender,Key,Shift) q - ]]> @@ -455,8 +446,6 @@ ;End of user code s Args=$lb(Sender,PrevIndex) q - - ]]> @@ -481,8 +470,6 @@ tceSetDefault(ComboOref) Do:(ComboOref.ItemIndex=-1)&&(ComboOref.Items.Count>0) ComboOref.SetIndex(0) - - ]]> @@ -506,7 +493,6 @@ ;End of user code s Args=$lb(Sender,Key,Shift) q - ]]>