[613] | 1 | ONCORF ;HIRMFO/GWB - OVER-RIDE FLAG PRINT;11/30/00
|
---|
| 2 | ;;2.11;ONCOLOGY;**27,30**;Mar 07, 1995
|
---|
| 3 | PRT N DI,DIC,DR,DA,DIQ,ONC
|
---|
| 4 | S DIC="^ONCO(165.5,"
|
---|
| 5 | S DR="205:226"
|
---|
| 6 | S DA=D0,DIQ="ONC" D EN^DIQ1
|
---|
| 7 | W !," Over-ride Age/Site/Morph.: ",ONC(165.5,D0,205),?40,"Over-ride SS/NodesPos....: ",ONC(165.5,D0,218)
|
---|
| 8 | W !," Over-ride SeqNo/DxConf...: ",ONC(165.5,D0,206),?40,"Over-ride SS/TNM-N.......: ",ONC(165.5,D0,219)
|
---|
| 9 | W !," Over-ride Site/Lat/SeqNo.: ",ONC(165.5,D0,207),?40,"Over-ride SS/TNM-M.......: ",ONC(165.5,D0,220)
|
---|
| 10 | W !," Over-ride Surg/DxConf....: ",ONC(165.5,D0,208),?40,"Over-ride SS/DisMet1.....: ",ONC(165.5,D0,221)
|
---|
| 11 | W !," Over-ride Site/Type......: ",ONC(165.5,D0,209),?40,"Over-ride Acsn/Class/Seq.: ",ONC(165.5,D0,222)
|
---|
| 12 | W !," Over-ride Histology......: ",ONC(165.5,D0,210),?40,"Over-ride HospSeq/DxConf.: ",ONC(165.5,D0,223)
|
---|
| 13 | W !," Over-ride Report Source..: ",ONC(165.5,D0,211),?40,"Over-ride COC-Site/Type..: ",ONC(165.5,D0,224)
|
---|
| 14 | W !," Over-ride Ill-define Site: ",ONC(165.5,D0,212),?40,"Over-ride HospSeq/Site...: ",ONC(165.5,D0,225)
|
---|
| 15 | W !," Over-ride Leuk, Lymphoma.: ",ONC(165.5,D0,213),?40,"Over-ride Site/TNM-StgGrp: ",ONC(165.5,D0,226)
|
---|
| 16 | W !," Over-ride Site/Behavior..: ",ONC(165.5,D0,214)
|
---|
| 17 | W !," Over-ride Site/EOD/DX Dt.: ",ONC(165.5,D0,215)
|
---|
| 18 | W !," Over-ride Site/Lat/EOD...: ",ONC(165.5,D0,216)
|
---|
| 19 | W !," Over-ride Site/Lat/Morph.: ",ONC(165.5,D0,217)
|
---|
| 20 | W !,DASHES
|
---|
| 21 | Q
|
---|