PSO PARK LIST (943)    SORT TEMPLATE (.401)

Name Value
NAME PSO PARK LIST
DESCRIPTION
Sort for ACTIVE/PARK prescriptions
SORT FIELD DATA
  • FILE OR SUBFILE NO.:   52
    GET CODE:   S DISX(1)=$P($G(^PSRX(D0,"PARK")),U)
    QUERY CONDITION:   I DISX(1)=1
    DESCRIPTION OF SORT:   PARK equals 1 (YES)
    SEARCH EFFICIENCY RATING:   19.2000
    PROBABILITY RATING:   0.9505
    DATA TYPE FOR SORTING:   SET OF CODES
    FIELD NO.:   521012
    FIELD NAME:   PARK
    SORT QUALIFIERS BEFORE FIELD:   @
    FROM VALUE INTERNAL:   .999999
    FROM VALUE EXTERNAL:   1
    FROM VALUE PRINTABLE:   1 (YES)
    TO VALUE INTERNAL:   1
    TO VALUE EXTERNAL:   1
    TO VALUE PRINTABLE:   1 (YES)
    CROSS REFERENCE DATA:   ^PSRX("APARK",^PSRX(^2
  • FILE OR SUBFILE NO.:   52
    GET CODE:   S DISX(2)=$P($G(^PSRX(D0,"STA")),U)
    QUERY CONDITION:   I DISX(2)=0
    DESCRIPTION OF SORT:   STATUS equals 0 (ACTIVE)
    SEARCH EFFICIENCY RATING:   1.0000
    PROBABILITY RATING:   1.0000
    DATA TYPE FOR SORTING:   SET OF CODES
    FIELD NO.:   100
    FIELD NAME:   STATUS
    SORT QUALIFIERS BEFORE FIELD:   @
    FROM VALUE INTERNAL:   -1
    FROM VALUE EXTERNAL:   0
    FROM VALUE PRINTABLE:   0 (ACTIVE)
    TO VALUE INTERNAL:   0
    TO VALUE EXTERNAL:   0
    TO VALUE PRINTABLE:   0 (ACTIVE)
  • FILE OR SUBFILE NO.:   52
    GET CODE:   S Y(1)=$S($D(^PSRX(D0,2)):^(2),1:"") S X=$P($G(^PS(59,+$P(Y(1),U,9),0)),U) I D0>0 S DISX(3)=X
    QUERY CONDITION:   I (DISX(3)]]"ALBANXz")&(DISX(3)']]"AZ")
    DESCRIPTION OF SORT:   DIVISION from ALBANY to AZ
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(1)=$S($D(^PSRX(D0,2)):^(2),1:"") S X=$P($G(^PS(59,+$P(Y(1),U,9),0)),U) I D0>0 S DISX(3)=X
    FIELD NAME:   DIVISION
    SORT QUALIFIERS BEFORE FIELD:   #"20
    FROM VALUE INTERNAL:   ALBANXz
    FROM VALUE EXTERNAL:   ALBANY
    TO VALUE INTERNAL:   AZ
    TO VALUE EXTERNAL:   AZ
  • FILE OR SUBFILE NO.:   52
    GET CODE:   S DISX(4)=$P($G(^PSRX(D0,0)),U,13)
    QUERY CONDITION:   I (DISX(4)]]3210101.999999)&(DISX(4)']]3211015.24)
    DESCRIPTION OF SORT:   ISSUE DATE from JAN 2,2021 to OCT 15,2021@24:00
    SEARCH EFFICIENCY RATING:   100.0000
    PROBABILITY RATING:   1.0000
    DATA TYPE FOR SORTING:   DATE/TIME
    FIELD NO.:   1
    FIELD NAME:   ISSUE DATE
    SORT QUALIFIERS BEFORE FIELD:   '
    FROM VALUE INTERNAL:   3210101.999999
    FROM VALUE EXTERNAL:   JAN 2,2021
    FROM VALUE PRINTABLE:   JAN 2,2021
    TO VALUE INTERNAL:   3211015.24
    TO VALUE EXTERNAL:   T@2400
    TO VALUE PRINTABLE:   OCT 15,2021@24:00
    CROSS REFERENCE DATA:   ^PSRX("AC",^PSRX(^2
  • FILE OR SUBFILE NO.:   52
    GET CODE:   S Y(1)=$S($D(^PSRX(D0,0)):^(0),1:"") S X=$P($G(^DPT(+$P(Y(1),U,2),0)),U) I D0>0 S DISX(5)=X
    QUERY CONDITION:   I DISX(5)'=""
    DESCRIPTION OF SORT:   PATIENT not null
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(1)=$S($D(^PSRX(D0,0)):^(0),1:"") S X=$P($G(^DPT(+$P(Y(1),U,2),0)),U) I D0>0 S DISX(5)=X
    FIELD NAME:   PATIENT
    SORT QUALIFIERS BEFORE FIELD:   "2
DATE CREATED 2015-03-06 12:02:00
READ ACCESS @
FILE PRESCRIPTION
WRITE ACCESS @
DATE LAST USED 2021-10-15 00:00:00