1) Na inicializaçao do modelo tem uma a função: ( linha 5184)
/*Fução para validar parecer da qualidade*/
OGA250GotF(oModel,oView)

2) Na função OGA250GotF, o aqui não está configurado para bloquear a qualidade resumindo a função:

 Local lOKFoco := .T.

If NKJ->NKJ_LIBQLD == '1' //1=SIM  (Não é meu caso)
   lOkFoco := .F.
EndIf 

oModel:GetModel("NJKUNICO"):GetStruct():SetProperty( '*' , MODEL_FIELD_WHEN, {||lOkFoco} )

If lOkFoco
   oModel:GetModel("NJKUNICO"):GetStruct():SetProperty( 'NJK_PERDES' , MODEL_FIELD_WHEN, {|| OG250TWhen(oModel, "NJK_PERDES")} )
EndIf

3) Na função  OG250TWhen: eu não tenho o campo no dicionário NJK_TIPREG (release 17) assim retorna falso setProperty When. 

Function OG250TWhen(oModel, cField)
Local oModelNJK := oModel:GetModel():GetModel("NJKUNICO")

If NJK->(ColumnPos('NJK_TIPREG')) > 0 .and. __lnewNeg
IF ">" $ oModelNJK:GetValue("NJK_TIPREG")
Return .T.
EndIf
EndIf

Return .F.

RESULTADO ESPERADO