| 1 | ONCLPC4 ;Hines OIFO/GWB - 2001 Lung (NSCLC) Cancers PCE Study ;05/04/01
|
|---|
| 2 | ;;2.11;ONCOLOGY;**29**;Mar 07, 1995
|
|---|
| 3 | ;Pathology
|
|---|
| 4 | K DR S DIE="^ONCO(165.5,",DA=ONCONUM,DR=""
|
|---|
| 5 | W @IOF D HEAD^ONCLPC0
|
|---|
| 6 | W !," PATHOLOGY"
|
|---|
| 7 | W !," ---------"
|
|---|
| 8 | S DR(1,165.5,1)="1402 11. DATE OF FIRST TISSUE DIAGNOSIS"
|
|---|
| 9 | S DR(1,165.5,2)="W !"
|
|---|
| 10 | S DR(1,165.5,3)="W !,"" 12. DISTANCE IN MILLIMETERS TO CLOSEST MARGIN:"""
|
|---|
| 11 | S DR(1,165.5,4)="1429 PROXIMAL MARGIN.............."
|
|---|
| 12 | S DR(1,165.5,5)="1429.1 DISTAL MARGIN................"
|
|---|
| 13 | S DR(1,165.5,6)="W !"
|
|---|
| 14 | S DR(1,165.5,7)="1417 13. FROZEN SECTION................"
|
|---|
| 15 | S DR(1,165.5,8)="W !"
|
|---|
| 16 | S DR(1,165.5,9)="W !,"" 14. INVASION:"""
|
|---|
| 17 | S DR(1,165.5,10)="1418 VASCULAR....................."
|
|---|
| 18 | S DR(1,165.5,11)="1418.1 LYMPHATICS..................."
|
|---|
| 19 | S DR(1,165.5,12)="1418.2 PLEURA......................."
|
|---|
| 20 | S DR(1,165.5,13)="1418.3 CHEST WALL..................."
|
|---|
| 21 | S DR(1,165.5,14)="1418.4 OTHER........................"
|
|---|
| 22 | D ^DIE
|
|---|
| 23 | W !
|
|---|
| 24 | K DIR S DIR(0)="E" D ^DIR S:$D(DIRUT) OUT="Y"
|
|---|
| 25 | EXIT K DIC,DR,DA,DIQ,DIE,DIR,DIROUT,DIRUT,DTOUT,DUOUT,X,Y
|
|---|
| 26 | Q
|
|---|
