©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
BAR50L01 ; IHS/SD/LSL - AR TOP LEVEL FILE STRUCTURE ;
Source file <BAR50L01.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 3 | EN^VALM TERM^VALM0 CLEAR^VALM1 |
| Kernel | 2 | $$REPEAT^XLFSTR DISP^XQORM1 |
| IHS VA Utilities | 1 | ENPM^XBDIQ1 |
| Uncategorized | 1 | ($$VALMSG,MSG)^AMCOUT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RESET | ;EP; -- rebuilds array after action
|
|
| HDR | ;EP -- header code
|
|
| EN(FLNM,FD) | ;EP
; -- for the file type |
|
| PAD(D,L) | ; -- SUBRTN to pad length of data
; -- D=data L=length |
|
| SP(N) | ; -- SUBRTN to pad N number of spaces
|
|
| INIT | ;EP -- init variables and list array
|
|
| GATHER(FLNUM) | ; -- SUBRTN to set data into array
|
|
| EXPND | ;EP -- expand code
|
|
| EXIT | ;EP -- exit code
|
|
| HELP | ;EP -- help code
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BAREDI("1T" - [#90056.01] | HDR+2 |
| ^TMP($J | EN+3!, EXIT+2!, GATHER+6!, GATHER+7!, GATHER+25*, GATHER+26*, GATHER+27* |
| Name | Line Occurrences |
|---|---|
| $$PAD | GATHER+24, GATHER+26, SP+1 |
| GATHER | INIT+1 |
| HDR | RESET+3 |
| INIT | RESET+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ARSUB | GATHER+9*, GATHER+15 |
| >> COUNT | GATHER+11*, GATHER+28* |
| D | PAD~, PAD+2 |
| >> DI | GATHER+19*, GATHER+20*, GATHER+22 |
| FD | EN~, EN+5, HDR+3 |
| >> FIELD | GATHER+22*, GATHER+23, GATHER+24 |
| >> FILE | HDR+2 |
| >> FLEN | GATHER+21*, GATHER+23*, GATHER+24 |
| FLNM | EN~, EN+4 |
| FLNUM | EN+4*, INIT+1, GATHER~, GATHER+15 |
| L | PAD~, PAD+2 |
| >> LN | GATHER+11*, GATHER+25, GATHER+26, GATHER+27, GATHER+28* |
| >> LST | GATHER+4*, GATHER+15 |
| N | SP~, SP+1 |
| >> RECNM | GATHER+10* |
| >> RECORD | GATHER+19*, GATHER+24*, GATHER+25, GATHER+26 |
| >> RN | GATHER+17*, GATHER+18*, GATHER+20, GATHER+22 |
| SEG | GATHER+8! |
| SEG( | GATHER+18, GATHER+20, GATHER+22 |
| >> VALMBCK | RESET+2* |
| >> VALMCNT | INIT+2* |
| >> VALMHDR(1 | HDR+2* |
| >> VALMHDR(2 | HDR+3* |
| >> VALMSG | HDR+1* |
| >> X | HELP+1* |