FBUC STATUS BY VENDOR (304)    SORT TEMPLATE (.401)

Status listing of unauthorized claims by vendor

• FROM VALUE INTERNAL:   ?z
  FROM VALUE EXTERNAL:   @
  TO VALUE INTERNAL:   z
• COMPUTED FIELD CODE:   S Y(1)=$S($D(^FB583(D0,0)):^(0),1:"") S X=$S('$D(^DIC(4,+$P(Y(1),U,7),0)):"",1:$P(^(0),U,1)) I D0>0 S X(2)=X
  FROM VALUE INTERNAL:   ?z
  FROM VALUE EXTERNAL:   @
  TO VALUE INTERNAL:   z
• FROM VALUE INTERNAL:   ?z
  FROM VALUE EXTERNAL:   @
  TO VALUE INTERNAL:   z
• COMPUTED FIELD CODE:   S Y(1)=$S($D(^FB583(D0,0)):^(0),1:"") S X=$S('$D(^FB(162.92,+$P(Y(1),U,24),0)):"",1:$P(^(0),U,1)) I D0>0 S X(4)=X
• COMPUTED FIELD CODE:   S Y(1)=$S($D(^FB583(D0,0)):^(0),1:"") S X=$S('$D(^FBAAV(+$P(Y(1),U,3),0)):"",1:$P(^(0),U,1)) I D0>0 S X(5)=X
  FROM VALUE INTERNAL:   ?z
  FROM VALUE EXTERNAL:   @
  TO VALUE INTERNAL:   z
• COMPUTED FIELD CODE:   S Y(1)=$S($D(^FB583(D0,0)):^(0),1:"") S X=$S('$D(^DPT(+$P(Y(1),U,4),0)):"",1:$P(^(0),U,1)) I D0>0 S X(6)=X
  FROM VALUE INTERNAL:   ?z
  FROM VALUE EXTERNAL:   @
  TO VALUE INTERNAL:   z
• FROM VALUE INTERNAL:   ?z
  FROM VALUE EXTERNAL:   @
  TO VALUE INTERNAL:   z