| SORT FIELD DATA |
-
- FILE OR SUBFILE NO.: 357.96
- GET CODE: X DPP(1,"OVF0",9.2) S X=$P($P(Y(2),$C(59)_$P(Y(1),U,14)_":",2),$C(59),1)=$P($P(Y(3),$C(59)_$P(Y(1),U,14)_":",2),$C(59),1) I D0>0 S DISX(1)=X
- QUERY CONDITION: I DISX(1)
- DESCRIPTION OF SORT: NO APPOINTMENT ENTRY=NO APPOINTMENT ENTRY
- DATA TYPE FOR SORTING: FREE TEXT
- COMPUTED FIELD CODE: X DPP(1,"OVF0",9.2) S X=$P($P(Y(2),$C(59)_$P(Y(1),U,14)_":",2),$C(59),1)=$P($P(Y(3),$C(59)_$P(Y(1),U,14)_":",2),$C(59),1) I D0>0 S DISX(1)=X
- OVERFLOW DATA:
-
-
- FIRST SUBSCRIPT FOR OVERFLOW: OVF0
- SECOND SUBSCRIPT FOR OVERFLOW: 9.2
- OVERFLOW CODE: S Y(2)=$C(59)_$S($D(^DD(357.96,.14,0)):$P(^(0),U,3),1:""),Y(3)=$C(59)_$S($D(^DD(357.96,.14,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^IBD(357.96,D0,0)):^(0),1:"")
- FIELD NAME: NO APPOINTMENT ENTRY=NO APPOINTMENT ENTRY
- SORT QUALIFIERS BEFORE FIELD: '@"@B
- SORT QUALIFIERS AFTER FIELD: ;L1
-
- FILE OR SUBFILE NO.: 357.96
- GET CODE: S Y(1)=$S($D(^IBD(357.96,D0,0)):^(0),1:"") S X=$P(Y(1),U,11),X=X S X=X=3,Y(2)=X,Y(3)=X S X=$P(Y(1),U,11),X=X S X=X=6,Y=X,X=Y(2),X=X!Y I D0>0 S DISX(2)=X
- QUERY CONDITION: I DISX(2)
- DESCRIPTION OF SORT: INTERNAL(#.11)=3!(INTERNAL(#.11)=6)
- DATA TYPE FOR SORTING: FREE TEXT
- COMPUTED FIELD CODE: S Y(1)=$S($D(^IBD(357.96,D0,0)):^(0),1:"") S X=$P(Y(1),U,11),X=X S X=X=3,Y(2)=X,Y(3)=X S X=$P(Y(1),U,11),X=X S X=X=6,Y=X,X=Y(2),X=X!Y I D0>0 S DISX(2)=X
- FIELD NAME: INTERNAL(#.11)=3!(INTERNAL(#.11)=6)
- SORT QUALIFIERS BEFORE FIELD: '@"@B
- SORT QUALIFIERS AFTER FIELD: ;L1
-
- FILE OR SUBFILE NO.: 357.96
- GET CODE: S Y(1)=$S($D(^IBD(357.96,D0,0)):^(0),1:"") S X=$S('$D(^DPT(+$P(Y(1),U,2),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(3)=X
- QUERY CONDITION: I DISX(3)'=""
- DESCRIPTION OF SORT: PATIENT not null
- SEARCH EFFICIENCY RATING: 0.0110
- PROBABILITY RATING: 0.0110
- DATA TYPE FOR SORTING: FREE TEXT
- COMPUTED FIELD CODE: S Y(1)=$S($D(^IBD(357.96,D0,0)):^(0),1:"") S X=$S('$D(^DPT(+$P(Y(1),U,2),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(3)=X
- FIELD NAME: PATIENT
- SORT QUALIFIERS BEFORE FIELD: +".02
- CROSS REFERENCE DATA: ^IBD(357.96,"C",^IBD(357.96,^2
- POINT TO CROSS REFERENCE: ^DPT("B",
-
- FILE OR SUBFILE NO.: 357.96
- GET CODE: S DISX(4)=$P($G(^IBD(357.96,D0,0)),U,5)
- QUERY CONDITION: I (DISX(4)]]2970730.99999)&(DISX(4)']]2970731.24)
- DESCRIPTION OF SORT: DATE/TIME PRINTED from 7/31/97 to 7/31/97@24:00
- SEARCH EFFICIENCY RATING: 0.9890
- PROBABILITY RATING: 0.9890
- DATA TYPE FOR SORTING: DATE/TIME
- FIELD NO.: .05
- FIELD NAME: DATE/TIME PRINTED
- FROM VALUE INTERNAL: 2970730.99999
- FROM VALUE EXTERNAL: T-1
- FROM VALUE PRINTABLE: 7/31/97
- TO VALUE INTERNAL: 2970731.24
- TO VALUE EXTERNAL: T-1@2400
- TO VALUE PRINTABLE: 7/31/97@24:00
|
