| SORT FIELD DATA |
-
- FILE OR SUBFILE NO.: 165.5
- GET CODE: S DISX(1)=$P($G(^ONCO(165.5,D0,0)),U,7)
- QUERY CONDITION: I DISX(1)'=""
- DESCRIPTION OF SORT: ACCESSION YEAR not null
- DATA TYPE FOR SORTING: FREE TEXT
- FIELD NO.: .07
- FIELD NAME: ACCESSION YEAR
- SORT QUALIFIERS BEFORE FIELD: +#
- FROM VALUE INTERNAL: CPR ;PRINT CUSTOM REPORTRz
- FROM VALUE EXTERNAL: CPR ;PRINT CUSTOM REPORTS
- TO VALUE INTERNAL: DIP G EX
- TO VALUE EXTERNAL: DIP G EX
- CROSS REFERENCE DATA: ^ONCO(165.5,"AY",^ONCO(165.5,^2
-
- FILE OR SUBFILE NO.: 165.5
- GET CODE: S DISX(2)=$P($G(^ONCO(165.5,D0,0)),U,20)
- QUERY CONDITION: I DISX(2)'=""
- DESCRIPTION OF SORT: CLASS CATEGORY not null
- DATA TYPE FOR SORTING: SET OF CODES
- FIELD NO.: .042
- FIELD NAME: CLASS CATEGORY
- CROSS REFERENCE DATA: ^ONCO(165.5,"AG",^ONCO(165.5,^2
-
- FILE OR SUBFILE NO.: 165.5
- GET CODE: X ^DD(165.5,.091,9.3) S X=$P($P(Y(165.5,.091,102),$C(59)_$P(Y(165.5,.091,101),U,1)_":",2),$C(59),1) S D0=Y(165.5,.091,80) S DISX(3)=X
- QUERY CONDITION: I DISX(3)'=""
- DESCRIPTION OF SORT: STATUS not null
- DATA TYPE FOR SORTING: FREE TEXT
- FIELD NO.: .091
- FIELD NAME: STATUS
-
- FILE OR SUBFILE NO.: 165.5
- GET CODE: S Y(1)=$S($D(^ONCO(165.5,D0,0)):^(0),1:"") S X=$S('$D(^ONCO(164.2,+$P(Y(1),U,1),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(4)=X
- QUERY CONDITION: I DISX(4)'=""
- DESCRIPTION OF SORT: SITE/GP not null
- DATA TYPE FOR SORTING: POINTER TO A FILE
- COMPUTED FIELD CODE: S Y(1)=$S($D(^ONCO(165.5,D0,0)):^(0),1:"") S X=$S('$D(^ONCO(164.2,+$P(Y(1),U,1),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(4)=X
- FIELD NAME: SITE/GP
- SORT QUALIFIERS BEFORE FIELD: +".01
- CROSS REFERENCE DATA: ^ONCO(165.5,"B",^ONCO(165.5,^2
- POINT TO CROSS REFERENCE: ^ONCO(164.2,"B",
-
- FILE OR SUBFILE NO.: 165.5
- GET CODE: D DEC^ONCOCOM S DISX(5)=X
- QUERY CONDITION: I DISX(5)'=""
- DESCRIPTION OF SORT: DX AGE-GP not null
- DATA TYPE FOR SORTING: FREE TEXT
- FIELD NO.: 4.1
- FIELD NAME: DX AGE-GP
- SORT QUALIFIERS BEFORE FIELD: +
|
