©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
BGP1GALL ; IHS/CMI/LAB - GUI COM REPORT ;
Source file <BGP1GALL.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS GPRA Information System | 4 | ^BGP1D1 (II,PI)^BGP1DL REPORT^BGP1UTL GUIR^BGPXBLM |
| IHS VA Utilities | 3 | ^XBFMK ^XBKVAR EN^XBVK |
| Kernel | 2 | ^%ZTLOAD ($$DT,$$FMADD,$$NOW)^XLFDT |
| VA Fileman | 2 | FILE^DICN ^DIE |
| IHS Patient | 1 | KILL^AUPNPAT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LOCALL | ;
|
|
| CI | ;
|
|
| EI | ;
|
|
| TESTNTL | ;
|
|
| DI | ;
|
|
| ENDLOG | ;-- UPDATE LOG AT END
|
|
| WI | ;
|
|
| EP1 | ;
|
|
| EP(BGPRET,BGPUSER,BGPDUZ2,BGPOPTN,BGPINDB,BGPIND,BGPQTR,BGPPER,BGPVDT,BGPBEN,BGPLSTT,BGPLIST,BGPLPRV,BGPLPROV,BGPROT,BGPRTIME,BGPMFITI,BGPFILE) | ;EP - called from GUI to produce COM REPORT CI05-RPT-LOC-COM
; SEE ROUTINE BGP1DL if you have questions about any of these variables ; BGPUSER - DUZ ; BGPDUZ2 - DUZ(2) ; BGPOPTN - OPTION NAME ; BGPINDB - $E (1st character) of the answer to the following DIR call: ; value will be a D, C, W, E or S ; Select one of the following: |
|
| XIT | ;
|
|
| TSKMN | ;
|
|
| BY | ;get baseline year
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | TSKMN+3 |
| KILL^AUPNPAT | XIT+5, XIT+10 |
| ^BGP1D1 | LOCALL+1 |
| II^BGP1DL | EP1+29 |
| PI^BGP1DL | EP1+30 |
| REPORT^BGP1UTL | BY+8 |
| GUIR^BGPXBLM | LOCALL+4 |
| FILE^DICN | BY+18 |
| ^DIE | ENDLOG+2 |
| ^XBFMK | BY+13, XIT+11 |
| ^XBKVAR | EP1+21 |
| EN^XBVK | XIT+2 |
| $$DT^XLFDT | EP1+20 |
| $$FMADD^XLFDT | EP1+35 |
| $$NOW^XLFDT | TESTNTL+4, BY+17, TSKMN+3, ENDLOG+1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^BGPGUIB - [#90546.08] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BGPDATA | XIT+12 |
| ^BGPGUIB - [#90546.08] | LOCALL+11*, LOCALL+12* |
| ^BGPINDBC - [#90545.02] | DI+1, CI+1, WI+1, EI+1 |
| ^BGPINDBC("ACARD" | CI+1 |
| ^BGPINDBC("ADM" | DI+1 |
| ^BGPINDBC("AEL" | EI+1 |
| ^BGPINDBC("AWH" | WI+1 |
| ^BGPSITE - [#90241.02] | BY+7 |
| ^TMP($J | LOCALL+2!, LOCALL+6, LOCALL+9, LOCALL+13!, XIT+1! |
| Name | Line Occurrences |
|---|---|
| CI | EP1+26 |
| DI | EP1+25 |
| EI | EP1+28 |
| ENDLOG | LOCALL+15 |
| EP | TESTNTL+4 |
| EP1 | EP+72 |
| TSKMN | BY+22 |
| WI | EP1+27 |
| XIT | LOCALL+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | XIT+7! |
| B | XIT+7! |
| BD | XIT+9! |
| >> BGP1RPTH | EP1+24* |
| >> BGPALLPT | EP1+24* |
| >> BGPBBD | BY+3* |
| >> BGPBD | EP1+31*, EP1+32*, EP1+33*, EP1+34*, EP1+35*, BY+3, BY+5 |
| >> BGPBED | BY+4* |
| BGPBEN | EP~, EP1+12 |
| BGPDATA | LOCALL+8~, LOCALL+9*, LOCALL+10*, LOCALL+11 |
| >> BGPDELT | BY+11* |
| BGPDUZ2 | EP~, EP1+3, EP1+19 |
| >> BGPED | EP1+31*, EP1+32*, EP1+33*, EP1+34*, EP1+35*, BY+4, BY+6 |
| BGPFILE | EP~, BY+14 |
| >> BGPGFNM | BY+16* |
| >> BGPGIEN | BY+20*, BY+23, LOCALL+11, LOCALL+12, ENDLOG+1 |
| >> BGPGUI | EP1+22* |
| >> BGPHOME | BY+7* |
| BGPIND | EP~, EP1+7, EP1+25!, EP1+26!, EP1+27!, EP1+28!, EP1+29!, EP1+30! |
| BGPIND( | DI+1*, CI+1*, WI+1*, EI+1* |
| BGPIND(0 | EP1+8 |
| BGPINDB | EP~, EP1+5, EP1+6, EP1+7, EP1+8, EP1+25, EP1+26, EP1+27, EP1+28, EP1+29 , EP1+30 |
| >> BGPIOSL | EP1+23*, LOCALL+3* |
| BGPLIST | TESTNTL+4, EP~, EP1+15, EP1+17* |
| BGPLIST(3 | TESTNTL+3* |
| BGPLPROV | EP~ |
| BGPLPRV | EP~, EP1+15 |
| BGPLSTT | EP~, EP1+14, EP1+17 |
| BGPMFITI | EP~ |
| >> BGPND | TESTNTL+4 |
| >> BGPND(3 | TESTNTL+2* |
| >> BGPND(4 | TESTNTL+2* |
| BGPOPTN | EP~, EP1+4, BY+17 |
| >> BGPPBD | BY+5* |
| >> BGPPED | BY+6* |
| BGPPER | EP~, EP1+9, EP1+31, EP1+32, EP1+33, EP1+34, EP1+35*, BY+1 |
| BGPQTR | EP~, EP1+10, EP1+31, EP1+32, EP1+33, EP1+34, EP1+35 |
| >> BGPQUIT | BY+9 |
| BGPRET | EP~, EP+73, EP+75*, EP1+2*, EP1+3*, EP1+4*, EP1+5*, EP1+6*, EP1+7*, EP1+8* , EP1+9*, EP1+10*, EP1+11*, EP1+12*, EP1+13*, EP1+14*, EP1+15*, BY+9*, BY+10*, BY+19* , BY+23* |
| BGPROT | EP~, EP1+13, BY+17 |
| >> BGPRPT | BY+10 |
| BGPRTIME | EP~, EP1+16*, BY+17, TSKMN+3 |
| >> BGPRTYPE | EP1+24* |
| BGPUSER | EP~, EP1+2, BY+17 |
| BGPVDT | EP~, EP1+11, BY+1 |
| C | LOCALL+6*, LOCALL+7*, LOCALL+11, LOCALL+12, XIT+7! |
| D | XIT+7! |
| D0 | BY+18! |
| DA | ENDLOG+1*, ENDLOG+3! |
| DD | BY+18! |
| DIADD | BY+17*, BY+18!, XIT+4! |
| >> DIC | BY+17* |
| >> DIC("DR" | BY+17* |
| >> DIC(0 | BY+17* |
| DIE | ENDLOG+1*, ENDLOG+3! |
| DIR | XIT+3! |
| DIRUT | XIT+3! |
| DLAYGO | BY+17*, BY+18!, XIT+4! |
| DO | BY+18! |
| DOD | XIT+3! |
| DR | ENDLOG+1*, ENDLOG+3! |
| DT | EP1+20*, LOCALL+12 |
| DUOUT | XIT+3! |
| DUZ(2 | EP1+19*, BY+7 |
| E | XIT+7! |
| ED | XIT+9! |
| >> ERR | TESTNTL+1*, TESTNTL+4, TESTNTL+5 |
| F | XIT+7! |
| G | XIT+7! |
| H | XIT+7! |
| I | XIT+7! |
| >> IOCPU | TSKMN+3 |
| IOM | EP1+23*, LOCALL+3* |
| J | XIT+7! |
| K | XIT+7! |
| L | XIT+7! |
| M | XIT+7! |
| N | XIT+7!, XIT+8! |
| N1 | XIT+8! |
| N2 | XIT+8! |
| N3 | XIT+8! |
| N4 | XIT+8! |
| N5 | XIT+8! |
| N6 | XIT+8! |
| O | XIT+7! |
| P | XIT+7! |
| Q | XIT+7! |
| R | XIT+7! |
| S | XIT+7! |
| T | XIT+7! |
| U | EP1+1*, BY+7, DI+1, CI+1, WI+1, EI+1 |
| V | XIT+7! |
| W | XIT+7! |
| X | BY+1*, BY+2*, BY+3, BY+4, BY+14*, BY+16, LOCALL+6*, LOCALL+9, XIT+6!, XIT+7! , DI+1*, CI+1*, WI+1*, EI+1* |
| X1 | XIT+6! |
| X2 | XIT+6! |
| X3 | XIT+6! |
| X4 | XIT+6! |
| X5 | XIT+6! |
| X6 | XIT+6! |
| Y | EP+73*, EP+75, BY+19, BY+20, XIT+7! |
| Z | XIT+7! |
| >> ZTCPU | TSKMN+3* |
| >> ZTDESC | TSKMN+3* |
| >> ZTDTH | TSKMN+3* |
| >> ZTIO | TSKMN+1* |
| >> ZTQUEUED | XIT+2 |
| >> ZTREQ | XIT+2* |
| >> ZTRTN | TSKMN+3* |
| ZTSAVE | TSKMN+2! |
| ZTSAVE("*" | TSKMN+2* |