RMPR CLOSED VISITS (539)    SORT TEMPLATE (.401)

Name Value
NAME RMPR CLOSED VISITS
DESCRIPTION
Sorts file 665.1 by date visit closed and patient name/institution.
SORT FIELD DATA
  • FILE OR SUBFILE NO.:   665.1
    GET CODE:   S DISX(1)=$P($G(^RMPR(665.1,D0,0)),U,5)
    QUERY CONDITION:   I DISX(1)'=""
    DESCRIPTION OF SORT:   DATE VISIT CLOSED not null
    SEARCH EFFICIENCY RATING:   2.0000
    PROBABILITY RATING:   0.6667
    DATA TYPE FOR SORTING:   DATE/TIME
    FIELD NO.:   4
    FIELD NAME:   DATE VISIT CLOSED
    SORT QUALIFIERS BEFORE FIELD:   @
    CROSS REFERENCE DATA:   ^RMPR(665.1,"C",^RMPR(665.1,^2
  • FILE OR SUBFILE NO.:   665.1
    GET CODE:   X DPP(2,"OVF0",9.2) X DPP(2,"OVF1",9.2) I $G(X(2))]"" S DISX(2)=X(2)
    QUERY CONDITION:   I DISX(2)'=""
    DESCRIPTION OF SORT:   PATIENT NAME/INSTITUTION not null
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   X DPP(2,"OVF0",9.2) X DPP(2,"OVF1",9.2) I $G(X(2))]"" S DISX(2)=X(2)
    OVERFLOW DATA:
    • FIRST SUBSCRIPT FOR OVERFLOW:   OVF0
      SECOND SUBSCRIPT FOR OVERFLOW:   9.2
      OVERFLOW CODE:   S Y(1)=$S($D(^RMPR(665.1,D0,0)):^(0),1:"")
    • FIRST SUBSCRIPT FOR OVERFLOW:   OVF1
      SECOND SUBSCRIPT FOR OVERFLOW:   9.2
      OVERFLOW CODE:   S X=$P(Y(1),U,2),C=$S(X="":-1,'$D(@(U_$P(X,";",2)_"0)")):-1,1:$P(^(0),U,2)),X=$S(X="":X,'$D(^(+X,0)):"",1:$P(^(0),U,1)),Y=X,C=$S($D(^DD(+C,.01,0)):$P(^(0),U,2),1:"D") D:X]"" Y^DIQ:C'["D" S X=Y,C="," I D0>0 S X(2)=X
    FIELD NAME:   PATIENT NAME/INSTITUTION
    SORT QUALIFIERS BEFORE FIELD:   @"1
DATE CREATED 1993-04-29 14:27:00
FILE PROSTHETIC HOME/LIAISON VISITS