anchor.diff:          |> Map.ofList
           
         formData.[em.logicalName]
  -      |> Array.Parallel.map (interpretFormXml enums (bpfControls.TryFind em.logicalName)))
  +      |> Array.Parallel.map (interpretFormXml enums (bpfControls.TryFind em.logicalName) em))
       |> Array.concat
     |> dict
positive.code:     formType = enum<FormType>(typeInt).ToString() |> Utility.sanitizeString |> Some
      attributes = 
        controlFields @ compositeFields @ bpfFields
        |> List.choose (getAttribute enums)
        |> List.distinctBy fst
        |> List.sortBy fst
  
      controls = 
        controlFields @ compositeFields @ bpfFields
        |> List.choose (getControl enums)
        |> renameControls
        |> List.sortBy (fun (name, _, _) -> name)
  
  
negative.code:   Some (attrName, aType)
  
  
  let getControl  (enums:Map<string,TsType>) entity (controlField:ControlField): XrmFormControl option =
    let controlId, _, controlClass = controlField
    if controlClass = QuickView then None else
  
    let aType = 
      getAttribute enums entity controlField
      |> Option.map snd
  
      
  