Object: | orderentry.txtDeliver_By |
textbox::Refresh() IF !("HISTORY" $ UPPER(thisform.Name)) IF "3" $ GETFLDSTATE(-1) OR "4" $ GETFLDSTATE(-1) thisform.lAllowEdits = .T. ELSE thisform.lAllowEdits = this.Value > DATE() thisform.lAllowDelete = thisform.lAllowEdits ENDIF ENDIF OrdTextBox::Refresh()