©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
RAPERR1 ;HIRMFO/GJC,CAH-Prt Img Locs missing/invalid Stop codes ;10/30/96 09:20
Source file <RAPERR1.m>
| Package | Total | Call Graph |
|---|---|---|
| Radiology Nuclear Medicine | 1 | HDG^RAPERR |
| VA Fileman | 1 | ($$GET1,GETS)^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CK700(X) | ;Check for a 700-level stop code as a DSS ID
|
|
| ISTOP | ; Check the validity of the stop code on the Imaging Locations file.
|
|
| BSTP(X) | ; Check for bad stop codes (DSS ID) per Imaging Location
; Make sure each imaging location points to an entry in the ; Hospital Location file #44 that is a 'COUNT' clinic, with ; no appointment patterns allowed, Stop Code on file 44 entry ; should match DSS ID on Imaging loc, division for imaging loc ; should match the Institution of the file 44 entry |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(40.7 - [#40.7] | GETS^DIQ |
| ^SC - [#44] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(40.7 - [#40.7] | ISTOP+38 |
| ^RA(79.1 - [#79.1] | ISTOP+2, ISTOP+3, ISTOP+23, ISTOP+26, ISTOP+46 |
| ^RAMIS(71.5 - [#71.5] | ISTOP+38 |
| ^SC - [#44] | ISTOP+6, ISTOP+10 |
| ^TMP($J | ISTOP+1!, ISTOP+8*, ISTOP+13*, ISTOP+17*, ISTOP+21*, ISTOP+25*, ISTOP+28*, ISTOP+33*, ISTOP+36*, ISTOP+39* , ISTOP+42, ISTOP+44, ISTOP+47, ISTOP+49, ISTOP+52! |
| Name | Line Occurrences |
|---|---|
| $$BSTP | ISTOP+39 |
| $$CK700 | ISTOP+35 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| IOSL | ISTOP+45, ISTOP+48, ISTOP+55 |
| >> RA44 | ISTOP+5*, ISTOP+6, ISTOP+10 |
| >> RA44(0 | ISTOP+10*, ISTOP+11, ISTOP+15, ISTOP+19, ISTOP+26 |
| >> RA791(0 | ISTOP+3*, ISTOP+4, ISTOP+5 |
| RACNT | ISTOP+1~*, ISTOP+7*, ISTOP+8, ISTOP+12*, ISTOP+13, ISTOP+16*, ISTOP+17, ISTOP+20*, ISTOP+21, ISTOP+24* , ISTOP+25, ISTOP+27*, ISTOP+28, ISTOP+32*, ISTOP+33, ISTOP+36*, ISTOP+39*, ISTOP+46*, ISTOP+47*, ISTOP+49 |
| RAERR | BSTP+6~*, BSTP+8*, BSTP+9*, BSTP+10, CK700+1~*, CK700+4*, CK700+6 |
| >> RAILOC | ISTOP+1*, ISTOP+2*, ISTOP+3, ISTOP+8, ISTOP+13, ISTOP+17, ISTOP+21, ISTOP+23, ISTOP+25, ISTOP+26 , ISTOP+28, ISTOP+33, ISTOP+36, ISTOP+39, ISTOP+43*, ISTOP+44*, ISTOP+46, ISTOP+47, ISTOP+49 |
| >> RAISTP | ISTOP+1* |
| RAMSG | ISTOP+3!, ISTOP+7*, ISTOP+8, ISTOP+12*, ISTOP+13, ISTOP+16*, ISTOP+17, ISTOP+20*, ISTOP+21, ISTOP+24* , ISTOP+25, ISTOP+27*, ISTOP+28, ISTOP+32*, ISTOP+33, ISTOP+35*, ISTOP+36, ISTOP+39* |
| >> RAOUT | ISTOP+1*, ISTOP+43*, ISTOP+44, ISTOP+45, ISTOP+47, ISTOP+48, ISTOP+49, ISTOP+55 |
| RASTOP | BSTP+6~, CK700+1~ |
| RASTOP( | BSTP+8, BSTP+9, CK700+3 |
| RAY | BSTP+6~*, BSTP+7, BSTP+8, BSTP+9, CK700+1~*, CK700+2, CK700+3 |
| U | ISTOP+5, ISTOP+11, ISTOP+15, ISTOP+19, ISTOP+26, ISTOP+38 |
| X | BSTP~, BSTP+6, CK700~, CK700+1, ISTOP+5*, ISTOP+15, ISTOP+31, ISTOP+35, ISTOP+38, ISTOP+39 |