serial UglyPickingCNTs,KeyCodesCNTs Default %Library.TMFormClass 0 %Library.String %Library.String %Library.TMForm %TMButton %TMButton %TMListBox %Library.Integer 0 initvalue:%String cache 0 %Status document literal cache 0 document literal cache 0 document literal DueOut:%String cache 0 %Library.String document literal 0) "V" New DueTijd,VandaagTijd Set VandaagTijd=$P($H,",",2) Set DueTijd=$P(DueOut,",",2) Quit:(DueTijd initvalue:%String cache 0 MApplication document literal initvalue:%String cache 0 %Library.Status document literal Args:%String cache 0 document literal Args:%String cache 0 document literal cache 0 %Library.Integer document literal Args:%String cache 0 document literal 4 5 1 8 6 9 7 2 3 10 %Library.CacheSerialState list "%Library.TMFormClass" Address Form Button1 Button2 Button3 Button4 Button5 btnCancel btnCancel2 Edit1 Edit2 Label1 Label2 btnAdres btnAlle btnBon btnHalux btnProduct ControlMode Memo1 NumberEdit1 btnPalletEtiket TriggerPalletEtiket btnDelayOrder Shape1 ConsNr btnOk lbOrders outConsNr FilterMagazijn FilterVerzendwijze