ECX PRO RENTAL SORT EXPORT (937)    SORT TEMPLATE (.401)

For a given range of stations and dates, shows all rental items.

• FILE OR SUBFILE NO.:   660
  GET CODE:   S Y(1)=$S($D(^RMPR(660,D0,0)):^(0),1:"") S X=$P($G(^DIC(4,+$P(Y(1),U,10),0)),U) I D0>0 S DISX(1)=X
  QUERY CONDITION:   I DISX(1)'=""
  DESCRIPTION OF SORT:   STATION not null
  DATA TYPE FOR SORTING:   FREE TEXT
  COMPUTED FIELD CODE:   S Y(1)=$S($D(^RMPR(660,D0,0)):^(0),1:"") S X=$P($G(^DIC(4,+$P(Y(1),U,10),0)),U) I D0>0 S DISX(1)=X
  FIELD NAME:   STATION
  SORT QUALIFIERS BEFORE FIELD:   @"8
• FILE OR SUBFILE NO.:   660
  GET CODE:   S DISX(2)=$P($G(^RMPR(660,D0,0)),U,12)
  QUERY CONDITION:   I (DISX(2)]]3000100.999999)&(DISX(2)']]3190710.24)
  DESCRIPTION OF SORT:   DELIVERY DATE from JAN 1,2000 to JUL 10,2019@24:00
  SEARCH EFFICIENCY RATING:   9.1111
  PROBABILITY RATING:   0.9011
  DATA TYPE FOR SORTING:   DATE/TIME
  FIELD NO.:   10
  FIELD NAME:   DELIVERY DATE
  SORT QUALIFIERS BEFORE FIELD:   @
  FROM VALUE INTERNAL:   3000100.999999
  FROM VALUE EXTERNAL:   3000101
  FROM VALUE PRINTABLE:   JAN 1,2000
  TO VALUE INTERNAL:   3190710.24
  TO VALUE EXTERNAL:   3190710@2400
  TO VALUE PRINTABLE:   JUL 10,2019@24:00
  CROSS REFERENCE DATA:   ^RMPR(660,"CT",^RMPR(660,^2
• FILE OR SUBFILE NO.:   660
  GET CODE:   S DISX(3)=$P($G(^RMPR(660,D0,0)),U,4)
  QUERY CONDITION:   I DISX(3)=5
  DESCRIPTION OF SORT:   TYPE OF TRANSACTION equals 5 (RENTAL)
  SEARCH EFFICIENCY RATING:   0.9890
  PROBABILITY RATING:   0.9890
  DATA TYPE FOR SORTING:   SET OF CODES
  FIELD NO.:   2
  FIELD NAME:   TYPE OF TRANSACTION
  SORT QUALIFIERS BEFORE FIELD:   @
  FROM VALUE INTERNAL:   4.999999
  FROM VALUE EXTERNAL:   5
  FROM VALUE PRINTABLE:   5 (RENTAL)
  TO VALUE INTERNAL:   5
  TO VALUE EXTERNAL:   5
  TO VALUE PRINTABLE:   5 (RENTAL)