©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
GMRGED9 ;CISC/JH/RM-PATIENT DATA EDIT (cont.) ;4/5/90
Source file <GMRGED9.m>
| Package | Total | Call Graph |
|---|---|---|
| General Medical Record - Generator | 7 | SETSEL^GMRGED4 SAT^GMRGED5 INTERNAL^GMRGED6 (ADSEL,HDR)^GMRGEDB EN1^GMRGPNBL STAT^GMRGRUT0 EN1^GMRGUTL |
| VA Fileman | 1 | NOW^%DTC |
| Package | Total | Caller Graph |
|---|---|---|
| General Medical Record - Generator | 4 | GMRGED2 GMRGED4 GMRGED6 GMRGEDB |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DISP | ||
| JSTCK | ; MANIPULATE GMRGLVL STACK FOR JUMPING AND SCRIPING
|
|
| PSTCK | ;
|
|
| INQ | ||
| EN1 | ; PRINT TEXT ON TOP
|
|
| EN2 | ; SET TEXT ON TOP ARRAY, GMRGTOP(0)=TERM TO BEGIN BUILDING TEXT FROM
|
|
| SCRPT | ; PROCESS SCRIPT FOR A TERM
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR(124.3 - [#124.3] | PSTCK+3, PSTCK+5, SCRPT+2, SCRPT+3, SCRPT+15, SCRPT+16* |
| ^GMRD(124.2 - [#124.2] | PSTCK+5, SCRPT+1, SCRPT+17 |
| ^GMRD(124.4 | SCRPT+7, SCRPT+8, SCRPT+15 |
| ^TMP($J | EN1+1, EN1+2, DISP, EN2+1!, JSTCK+1*, JSTCK+3*, PSTCK+6* |
| Name | Line Occurrences |
|---|---|
| DISP | EN1+2 |
| EN2 | EN1+1 |
| INQ | DISP |
| PSTCK | JSTCK+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EN1+2, PSTCK+6* |
| ^("ADD" | SCRPT+15 |
| ^(0 | PSTCK+5, SCRPT+1, SCRPT+8 |
| ^(7 | SCRPT+17 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | EN2+1, EN2+2! |
| >> DA | SCRPT+16* |
| >> DA(1 | SCRPT+16* |
| DTIME | INQ |
| >> GMRG0 | JSTCK+1, JSTCK+2, JSTCK+3, PSTCK+3, PSTCK+4, PSTCK+7 |
| >> GMRG0(0 | JSTCK+2*, PSTCK+3, PSTCK+4 |
| >> GMRG0(1 | JSTCK+1*, PSTCK+1* |
| >> GMRG2 | JSTCK+1 |
| >> GMRGAT | SCRPT+16* |
| >> GMRGKU | PSTCK+3*, PSTCK+5, PSTCK+7, PSTCK+8, SCRPT+3*, SCRPT+4, SCRPT+8*, SCRPT+15 |
| >> GMRGLIN | EN1+2*, DISP*, INQ* |
| >> GMRGLVL | JSTCK+1, JSTCK+3*, PSTCK+1*, PSTCK+2, PSTCK+6 |
| >> GMRGLVL( | JSTCK+1*, JSTCK+3, PSTCK+1*, PSTCK+2* |
| >> GMRGOUT | EN1+2, INQ*, SCRPT+14, SCRPT+17 |
| GMRGPAR | EN2+1*, EN2+2! |
| GMRGPAR(0 | EN2+1* |
| >> GMRGPDA | PSTCK+3, PSTCK+5, PSTCK+8, SCRPT+2, SCRPT+3, SCRPT+4, SCRPT+15, SCRPT+16 |
| GMRGPDT | EN2+1*, EN2+2! |
| >> GMRGPRC | PSTCK+4*, PSTCK+6, PSTCK+7, SCRPT+1, SCRPT+2*, SCRPT+12*, SCRPT+14 |
| >> GMRGPRC(0 | PSTCK+5*, PSTCK+6, SCRPT+1, SCRPT+2, SCRPT+8, SCRPT+15, SCRPT+16 |
| >> GMRGRT | PSTCK+9, SCRPT+5 |
| >> GMRGSEL( | SCRPT+7 |
| >> GMRGSLVL | JSTCK+1*, JSTCK+3, PSTCK+1*, PSTCK+6 |
| >> GMRGST | PSTCK+8*, SCRPT+4* |
| >> GMRGST(1 | PSTCK+8*, SCRPT+4* |
| >> GMRGSTAT | PSTCK+7*, PSTCK+9*, PSTCK+10, SCRPT+3*, SCRPT+5*, SCRPT+6 |
| >> GMRGTERM | PSTCK+9, SCRPT+1*, SCRPT+3, SCRPT+5, SCRPT+8, SCRPT+17 |
| >> GMRGTERM(0 | SCRPT+1* |
| >> GMRGTLVL | JSTCK+1, JSTCK+3*, PSTCK+1*, PSTCK+2*, PSTCK+6 |
| >> GMRGTOP(0 | EN2+1 |
| >> GMRGTPLT | SCRPT+7, SCRPT+8, SCRPT+15 |
| >> GMRGTX | SCRPT+8*, SCRPT+11, SCRPT+12*, SCRPT+13, SCRPT+14, SCRPT+15*, SCRPT+16 |
| >> GMRGTX("OL" | SCRPT+8*, SCRPT+9, SCRPT+10*, SCRPT+13, SCRPT+15*, SCRPT+16 |
| GMRGUSL | SCRPT+1! |
| GMRGUSL( | JSTCK+2, PSTCK+3, PSTCK+4, SCRPT+7* |
| GMRGUSL("A" | SCRPT+16* |
| >> GMRGY | SCRPT+16* |
| >> GMRGZ | SCRPT+16* |
| GMRLINS | EN1+2*, EN1+3!, DISP |
| I | EN1+2*, EN1+3!, DISP |
| IOF | EN1+2, INQ |
| IOSL | DISP |
| J | EN1+2*, EN1+3! |
| L | EN1+2*, EN1+3!, DISP |
| X | EN1+2*, EN1+3!, INQ*, SCRPT+16* |
| >> Y | PSTCK+3*, PSTCK+4, PSTCK+5, SCRPT+7*, SCRPT+9*, SCRPT+10, SCRPT+11*, SCRPT+12 |
| >> Z | SCRPT+7*, SCRPT+9*, SCRPT+11* |