ROR PENDING ERRORS (738)    SORT TEMPLATE (.401)

This template is used by the [RORMNT PENDING 
ERRORS LIST] menu option to sort and group a list
of patients with erroneous data by error counter 
(value of the COUNTER field). Patients with higher
counters are printed first.

• FILE OR SUBFILE NO.:   798.31
  GET CODE:   S DISX(1)=$P($G(^RORDATA(798.3,D0,1,D1,0)),U,3) S:DISX(1)]"" DISX(1)=+DISX(1)
  QUERY CONDITION:   I DISX(1)'=""
  DESCRIPTION OF SORT:   COUNTER not null
  DATA TYPE FOR SORTING:   NUMERIC

  MULTIPLE FIELD DATA:

  • MULT.FILE OR SUBFILE NO.:   798.3
    NODE:   1

  FIELD NO.:   2
  FIELD NAME:   COUNTER
  SORT QUALIFIERS BEFORE FIELD:   -
  SORT QUALIFIERS AFTER FIELD:   ;S
• FILE OR SUBFILE NO.:   798.3
  GET CODE:   S X="" I D0>0 S DISX(2)=X
  QUERY CONDITION:   I DISX(2)=""
  DESCRIPTION OF SORT:   """" is null
  DATA TYPE FOR SORTING:   FREE TEXT
  COMPUTED FIELD CODE:   S X="" I D0>0 S DISX(2)=X
  FIELD NAME:   ""
  SORT QUALIFIERS BEFORE FIELD:   "
  SORT QUALIFIERS AFTER FIELD:   ;S
  FROM VALUE INTERNAL:   ?z
  FROM VALUE EXTERNAL:   @
  TO VALUE INTERNAL:   @
  TO VALUE EXTERNAL:   @
• FILE OR SUBFILE NO.:   798.3
  GET CODE:   S Y(1)=$S($D(^RORDATA(798.3,D0,0)):^(0),1:"") S X=$S('$D(^DPT(+$P(Y(1),U,1),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(3)=X
  QUERY CONDITION:   I DISX(3)'=""
  DESCRIPTION OF SORT:   PATIENT NAME not null
  SEARCH EFFICIENCY RATING:   0.0000
  PROBABILITY RATING:   0.0000
  DATA TYPE FOR SORTING:   FREE TEXT
  COMPUTED FIELD CODE:   S Y(1)=$S($D(^RORDATA(798.3,D0,0)):^(0),1:"") S X=$S('$D(^DPT(+$P(Y(1),U,1),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(3)=X
  FIELD NAME:   PATIENT NAME
  SORT QUALIFIERS BEFORE FIELD:   ".01
  CROSS REFERENCE DATA:   ^RORDATA(798.3,"B",^RORDATA(798.3,^2
  POINT TO CROSS REFERENCE:   ^DPT("B",
• FILE OR SUBFILE NO.:   798.3
  QUERY CONDITION:   I D0'=""
  DESCRIPTION OF SORT:   NUMBER not null
  SEARCH EFFICIENCY RATING:   0
  PROBABILITY RATING:   0
  DATA TYPE FOR SORTING:   NUMERIC
  FIELD NO.:   0
  FIELD NAME:   NUMBER
  CROSS REFERENCE DATA:   ^RORDATA(798.3,^RORDATA(798.3,^1