ESP DAILY SHIFT JOURNAL (527)    SORT TEMPLATE (.401)

This template allows the shift journal to be sorted by time.

• FILE OR SUBFILE NO.:   916
  GET CODE:   S DISX(1)=$P($G(^ESP(916,D0,0)),U,1)
  QUERY CONDITION:   I DISX(1)'=""
  DESCRIPTION OF SORT:   DATE not null
  SEARCH EFFICIENCY RATING:   0
  PROBABILITY RATING:   0
  DATA TYPE FOR SORTING:   DATE/TIME
  FIELD NO.:   .01
  FIELD NAME:   DATE
  FROM VALUE INTERNAL:   2960402.99999
  FROM VALUE EXTERNAL:   T-1
  FROM VALUE PRINTABLE:   4/3/96
  TO VALUE INTERNAL:   2960403
  TO VALUE EXTERNAL:   T-1
  TO VALUE PRINTABLE:   4/3/96
  CROSS REFERENCE DATA:   ^ESP(916,"B",^ESP(916,^2
• FILE OR SUBFILE NO.:   916.05
  GET CODE:   S DISX(2)=$P($G(^ESP(916,D0,4,D1,0)),U,1) S:DISX(2)]"" DISX(2)=" "_DISX(2)
  QUERY CONDITION:   I DISX(2)'=""
  DESCRIPTION OF SORT:   TIME not null
  DATA TYPE FOR SORTING:   FREE TEXT

  MULTIPLE FIELD DATA:

  • MULT.FILE OR SUBFILE NO.:   916
    NODE:   4

  FIELD NO.:   .01
  TEXT SORT FLAG:   SORT LIKE TEXT
  FIELD NAME:   TIME
  SORT QUALIFIERS AFTER FIELD:   ;TXT
  FROM VALUE INTERNAL:   0000z
  FROM VALUE EXTERNAL:   0001
  TO VALUE INTERNAL:   2359
  TO VALUE EXTERNAL:   2359