SORT FIELD DATA |
-
- FILE OR SUBFILE NO.: 810.3
- GET CODE: S DISX(1)=$P($G(^PXRMXT(810.3,D0,0)),U)
- QUERY CONDITION: I DISX(1)]]"IHD QTz"
- DESCRIPTION OF SORT: NAME from IHD QU
- SEARCH EFFICIENCY RATING: 0.0000
- PROBABILITY RATING: 0.0000
- DATA TYPE FOR SORTING: FREE TEXT
- FIELD NO.: .01
- FIELD NAME: NAME
- FROM VALUE INTERNAL: IHD QTz
- FROM VALUE EXTERNAL: IHD QU
- TO VALUE INTERNAL: z
- CROSS REFERENCE DATA: ^PXRMXT(810.3,"B",^PXRMXT(810.3,^2
-
- FILE OR SUBFILE NO.: 810.31
- GET CODE: S Y(1)=$S($D(^PXRMXT(810.3,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,4) X DPP(2,"OVF1",9.2) I D1>0 S DISX(2)=X
- QUERY CONDITION: I DISX(2)'=""
- DESCRIPTION OF SORT: FINDING ITEM not null
- DATA TYPE FOR SORTING: FREE TEXT
- COMPUTED FIELD CODE: S Y(1)=$S($D(^PXRMXT(810.3,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,4) X DPP(2,"OVF1",9.2) I D1>0 S DISX(2)=X
- MULTIPLE FIELD DATA:
-
-
- MULT.FILE OR SUBFILE NO.: 810.3
- NODE: 1
- OVERFLOW DATA:
-
-
- FIRST SUBSCRIPT FOR OVERFLOW: OVF1
- SECOND SUBSCRIPT FOR OVERFLOW: 9.2
- OVERFLOW CODE: N C S 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
- FIELD NAME: FINDING ITEM
- SORT QUALIFIERS BEFORE FIELD: ".04
- SORT QUALIFIERS AFTER FIELD: ;S1
-
- FILE OR SUBFILE NO.: 810.31
- GET CODE: X DPP(3,"OVF1",9.2) S X=$P(Y(101),U,9) S D0=I(0,0) S D1=I(1,0) I D1>0 S DISX(3)=X
- QUERY CONDITION: I DISX(3)'=""
- DESCRIPTION OF SORT: PATIENT:SSN not null
- DATA TYPE FOR SORTING: FREE TEXT
- COMPUTED FIELD CODE: X DPP(3,"OVF1",9.2) S X=$P(Y(101),U,9) S D0=I(0,0) S D1=I(1,0) I D1>0 S DISX(3)=X
- MULTIPLE FIELD DATA:
-
-
- MULT.FILE OR SUBFILE NO.: 810.3
- NODE: 1
- OVERFLOW DATA:
-
-
- FIRST SUBSCRIPT FOR OVERFLOW: OVF1
- SECOND SUBSCRIPT FOR OVERFLOW: 9.2
- OVERFLOW CODE: S I(1,0)=$G(D1),I(0,0)=$G(D0),Y(1)=$S($D(^PXRMXT(810.3,D0,1,D1,0)):^(0),1:""),D0=$P(Y(1),U,1) S:'D0!'$D(^DPT(+D0,0)) D0=-1 S Y(101)=$S($D(^DPT(D0,0)):^(0),1:"")
- FIELD NAME: PATIENT:SSN
- SORT QUALIFIERS BEFORE FIELD: "
|