©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
RA45PST2 ;Hines OI/GJC - Post-init 'B', patch 45 ;10/10/03 06:32
Source file <RA45PST2.m>
| Package | Total | Call Graph |
|---|---|---|
| Radiology Nuclear Medicine | 2 | MAILQ2^RA45PST PROC^RAO7MFN |
| Kernel | 1 | $$S^%ZTLOAD |
| VA Fileman | 1 | UPDATE^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENQ2 | ;The second process must be tasked off that will identify all the
|
|
| SUB() | ;return the next available subscript (arithmetic progression)
|
|
| FILECM(RAIEN,RACM,RAI) | ;Files contrast medium into the CONTRAST MEDIA (#125)
|
|
| STOP | ;inform the user that the task has been stopped
|
|
| SETMP(SUB,NME,CPT,CMU,MSG,FMT) | ;set the ^TMP("RA PROC UPDATE 45",$J) global
|
|
| VERSION | ;;5.0;Radiology/Nuclear Medicine;**45**;Mar 16, 1998
|
|
| KILLQ2 | ;kill & quit
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ORD(101.43 - [#101.43] | ENQ2+21, ENQ2+22, ENQ2+23, ENQ2+26 |
| ^RAMIS(71 - [#71] | ENQ2+30, ENQ2+33, ENQ2+36, ENQ2+59, ENQ2+60, ENQ2+61, ENQ2+66, ENQ2+71, ENQ2+80, FILECM+10 , FILECM+11 |
| ^TMP("RA PROC UPDATE 45" | ENQ2+48, ENQ2+58!, ENQ2+88, KILLQ2+2!, SETMP+15*, STOP+1*, SUB+1 |
| Name | Line Occurrences |
|---|---|
| $$SUB | STOP+1 |
| FILECM | ENQ2+32 |
| KILLQ2 | ENQ2+51 |
| SETMP | ENQ2+31, ENQ2+39, ENQ2+72, ENQ2+81 |
| STOP | ENQ2+44, ENQ2+85 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CMU | SETMP~, SETMP+9 |
| CPT | SETMP~, SETMP+11, SETMP+12 |
| DT | ENQ2+61 |
| FMT | SETMP~, SETMP+11, SETMP+12, SETMP+13, SETMP+14 |
| I | ENQ2+65*, ENQ2+66*, ENQ2+70!, SETMP+8~, SETMP+9* |
| MSG | SETMP~, SETMP+10 |
| NME | SETMP~, SETMP+10 |
| RACM | ENQ2+65*, ENQ2+66*, ENQ2+72, ENQ2+81, KILLQ2+1!, FILECM~, FILECM+10, FILECM+13 |
| RACPT | ENQ2+38*, ENQ2+39, KILLQ2+1! |
| RACPTB | ENQ2+63*, ENQ2+72, ENQ2+81, KILLQ2+1! |
| RACT | ENQ2+20*, ENQ2+37*, ENQ2+58*, ENQ2+70*, KILLQ2+1! |
| RAD1 | FILECM+11*, FILECM+13, FILECM+14! |
| RAFDA | FILECM+11!, FILECM+14! |
| RAFDA( | FILECM+13* |
| RAFDA(71 | FILECM+12* |
| RAI | ENQ2+32*, KILLQ2+1!, FILECM~, FILECM+12 |
| RAIEN | FILECM~, FILECM+10, FILECM+11, FILECM+12, FILECM+13 |
| RAMIS | KILLQ2+1! |
| RAMIS(0 | ENQ2+36*, ENQ2+38, ENQ2+60*, ENQ2+62, ENQ2+63 |
| RAOI | ENQ2+26*, ENQ2+31, KILLQ2+1! |
| RAOI(2 | ENQ2+26*, ENQ2+27, ENQ2+30, ENQ2+31, ENQ2+32, ENQ2+33, ENQ2+36, ENQ2+39 |
| RAOICM | ENQ2+23*, ENQ2+31, ENQ2+32, ENQ2+39, KILLQ2+1! |
| RAOIPT | ENQ2+24*, KILLQ2+1! |
| RAOIRA | ENQ2+23*, ENQ2+24, KILLQ2+1! |
| RAPNAME | ENQ2+36*, ENQ2+39, ENQ2+60*, ENQ2+63*, ENQ2+72, ENQ2+73, ENQ2+81, KILLQ2+1! |
| RAPTY | ENQ2+62*, ENQ2+63, KILLQ2+2! |
| RASTAT | ENQ2+61*, ENQ2+73, KILLQ2+2! |
| RAX | ENQ2+20*, ENQ2+21*, ENQ2+22, KILLQ2+2!, SETMP+8~*, SETMP+9*, SETMP+13, SETMP+14 |
| RAY | ENQ2+22*, ENQ2+23, ENQ2+26, ENQ2+58*, ENQ2+59*, ENQ2+60, ENQ2+61, ENQ2+66, ENQ2+71, ENQ2+72 , ENQ2+73, ENQ2+80, ENQ2+81, KILLQ2+2!, SETMP+8~*, SETMP+10*, SETMP+11*, SETMP+12*, SETMP+13*, SETMP+14* , SETMP+15 |
| SUB | SETMP~, SETMP+15 |
| U | ENQ2+23, ENQ2+24, ENQ2+26, ENQ2+31, ENQ2+36, ENQ2+38, ENQ2+60, ENQ2+62, ENQ2+63 |
| >> ZTQUEUED | ENQ2+20 |
| >> ZTREQ | ENQ2+20* |
| ZTSTOP | ENQ2+20*, ENQ2+21, ENQ2+37*, ENQ2+44, ENQ2+51, ENQ2+59, ENQ2+70*, ENQ2+71, ENQ2+85, KILLQ2+2! |