Hi David
li_result = Trigger_RegisterFocus(anonymous(window IV_Item_Number_Scroll of form IV_Item_Number_Lookup),
TRIGGER_FOCUS_FILL, TRIGGER_AFTER_ORIGINAL, script Color_Trig_IV_Item_Number_Lookup_SCROLL_FILL);
if li_result <> SY_NOERR then warning "Focus trigger for Color_Trig_IV_Item_Number_Lookup_SCROLL_FILL failed."; end if;
li_result = Trigger_RegisterFocus(anonymous(window IV_Item_Number_Scroll of form IV_Item_Number_Lookup),
TRIGGER_FOCUS_PRE, TRIGGER_AFTER_ORIGINAL, script Color_Trig_IV_Item_Number_Lookup_SCROLL_FILL);
if li_result <> SY_NOERR then warning "Focus trigger for Color_Trig_IV_Item_Number_Lookup_SCROLL_FILL failed."; end if;
local boolean result;
default form to IV_Item_Number_Lookup;
default window to IV_Item_Number_Scroll;
if 'Item Number' of table IV_Item_MSTR = "-2001" or 'Item Number' of table IV_Item_MSTR = "-5414" then
result = Field_SetFontColor('Item Number', COLOR_RED);
else
result = Field_SetFontColor('Item Number', COLOR_BLUE);
end if;