PRCH IMPAC SORT (617)    SORT TEMPLATE (.401)

This sort template, on approving official and card number,
is used with the PRCH IMPAC INFO report.

• FILE OR SUBFILE NO.:   440.5
  GET CODE:   S Y(1)=$S($D(^PRC(440.5,D0,0)):^(0),1:"") S X=$S('$D(^VA(200,+$P(Y(1),U,9),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(1)=X
  QUERY CONDITION:   I (DISX(1)]]"@z")&(DISX(1)']]"Z")
  DESCRIPTION OF SORT:   APPROVING OFFICIAL from A to Z
  SEARCH EFFICIENCY RATING:   0.4179
  PROBABILITY RATING:   0.2947
  DATA TYPE FOR SORTING:   FREE TEXT
  COMPUTED FIELD CODE:   S Y(1)=$S($D(^PRC(440.5,D0,0)):^(0),1:"") S X=$S('$D(^VA(200,+$P(Y(1),U,9),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(1)=X
  FIELD NAME:   APPROVING OFFICIAL
  SORT QUALIFIERS BEFORE FIELD:   #"8
  FROM VALUE INTERNAL:   @z
  FROM VALUE EXTERNAL:   A
  TO VALUE INTERNAL:   ZZ
  TO VALUE EXTERNAL:   ZZ
  CROSS REFERENCE DATA:   ^PRC(440.5,"E",^PRC(440.5,^2
  POINT TO CROSS REFERENCE:   ^VA(200,"B",
• FILE OR SUBFILE NO.:   440.5
  GET CODE:   S DISX(2)=$P($G(^PRC(440.5,D0,0)),U)
  QUERY CONDITION:   I DISX(2)'=""
  DESCRIPTION OF SORT:   PURCHASE CARD NUMBER not null
  SEARCH EFFICIENCY RATING:   0
  PROBABILITY RATING:   0
  DATA TYPE FOR SORTING:   FREE TEXT
  FIELD NO.:   .01
  FIELD NAME:   PURCHASE CARD NUMBER
  CROSS REFERENCE DATA:   ^PRC(440.5,"B",^PRC(440.5,^2
• FILE OR SUBFILE NO.:   440.5
  GET CODE:   S Y(1)=$S($D(^PRC(440.5,D0,2)):^(2),1:"") S X=$S('$D(^PRC(411,+$P(Y(1),U,3),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(3)=X
  QUERY CONDITION:   I DISX(3)'=""
  DESCRIPTION OF SORT:   STATION NUMBER not null
  DATA TYPE FOR SORTING:   FREE TEXT
  COMPUTED FIELD CODE:   S Y(1)=$S($D(^PRC(440.5,D0,2)):^(2),1:"") S X=$S('$D(^PRC(411,+$P(Y(1),U,3),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(3)=X
  FIELD NAME:   STATION NUMBER
  SORT QUALIFIERS BEFORE FIELD:   +"15