ONCACD0 ;HINES OIFO/GWB - NAACCR extract driver ;09/22/11
Source file <ONCACD0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1(DEVICE,STEXT) | ;Entry point
|
|
| EN2 | ||
| GETREC(EXTRACT,OUT) | ;Select VACCR, STATE record layout
|
|
| GETHOSP() | ;Facility Identification Number (FIN)
|
|
| GETDXH(DXH) | ;INSTITUTION ID NUMBER (160.1,27)
|
|
| RQRS(SDT,EDT,DATE,OUT) | ;Process RCRS data
|
|
| GETDT(SDT,EDT,DATE,OUT) | ; Select a date range
|
|
| DCLC | ||
| ACJ | ||
| DATEDX(SDT,EDT,DATE,OUT) | ;Select DATE DX range
|
|
| PRINT(DEVICE,OUT) | ;Capture output data
|
|
| EXIT | ;Exit
|
|
| EX | ||
| DEVICE(DEVICE,OUT) | ;Select output device
|
|
| VERIFY(STAT,DATE,SDT,EDT,STEXT,YESNO,OUT) | ;Verify settings
|
|
| GETDATE(ONCDT,DATE1,OUT) | ;Select Diagnosis Year
|
|
| ACCN | ;Accession Number
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^ONCO(160.1 - [#160.1] | GET1^DIQ |
| ^ONCO(160.19 - [#160.19] | GET1^DIQ |
| ^ONCO(165.5 - [#165.5] | Classic Fileman Calls |