©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
BDGADD2 ; IHS/ANMC/LJF - A&D DETAILED-DAY SURGERY ;
Source file <BDGADD2.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Changes To ADT | 2 | SET^BDGADD ($$HRCN,$$HRCND)^BDGF2 |
| Kernel | 2 | $$FMTE^XLFDT $$REPEAT^XLFSTR |
| IHS Additions To Surgery | 1 | $$ADS^BSRPEP |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PAD(D,L) | ;EP -- SUBRTN to pad length of data
; -- D=data L=length |
|
| SP(N) | ; -- SUBRTN to pad N number of spaces
|
|
| LINE | ; set up display line
|
|
| LINES | ; loop thru patients found and list in alpha order
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
| ^DIC(45.7 - [#45.7] | GET1^DIQ |
| ^AUPNPAT - [#9000001] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | BDGADD2+6 |
| ^ADGDS - [#9009012] | BDGADD2+19, BDGADD2+22, BDGADD2+23 |
| ^ADGDS("AA" | BDGADD2+14, BDGADD2+16, BDGADD2+17 |
| Name | Line Occurrences |
|---|---|
| $$PAD | LINE+3, LINE+4, LINE+5, LINE+6, LINE+7, LINE+8, SP+1 |
| $$SP | LINES+4, LINE+2 |
| LINE | LINES+8 |
| LINES | BDGADD2+9, BDGADD2+33 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | BDGADD2+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BDGT | BDGADD2+8, BDGADD2+13 |
| D | PAD~, PAD+2 |
| DATE | BDGADD2+12~, BDGADD2+13*, BDGADD2+14*, BDGADD2+16, BDGADD2+17 |
| DAYCT | BDGADD2+7~, BDGADD2+8*, BDGADD2+9, BDGADD2+12~, BDGADD2+13*, BDGADD2+31*, BDGADD2+33, LINES+4 |
| DFN | BDGADD2+12~, BDGADD2+15*, BDGADD2+16*, BDGADD2+17, BDGADD2+19, BDGADD2+22, BDGADD2+23, BDGADD2+25, BDGADD2+27, BDGADD2+28 , BDGADD2+29, BDGADD2+30, LINES+1~, LINES+8*, LINE+2, LINE+3, LINE+4, LINE+5, LINE+6, LINE+7 , LINE+8 |
| DGDS | BDGADD2+7~, BDGADD2+12~ |
| DGDS( | BDGADD2+27*, BDGADD2+28*, BDGADD2+29*, BDGADD2+30*, LINES+7, LINES+8, LINE+4, LINE+5, LINE+6, LINE+7 , LINE+8 |
| >> DGZ | BDGADD2+19*, BDGADD2+26, BDGADD2+28 |
| DGZA | BDGADD2+12~ |
| DSN | BDGADD2+12~, BDGADD2+17*, BDGADD2+19, BDGADD2+22, BDGADD2+23 |
| DUZ(2 | LINE+3 |
| END | BDGADD2+12~, BDGADD2+13*, BDGADD2+14 |
| L | PAD~, PAD+2 |
| LINE | LINE+1~, LINE+2*, LINE+3*, LINE+4*, LINE+5*, LINE+6*, LINE+7*, LINE+8*, LINE+9 |
| N | SP~, SP+1 |
| NAME | BDGADD2+12~, BDGADD2+25*, BDGADD2+27, BDGADD2+28, BDGADD2+29, BDGADD2+30, LINES+1~, LINES+7*, LINES+8, LINE+4 , LINE+5, LINE+6, LINE+7, LINE+8 |
| RELDT | BDGADD2+12~, BDGADD2+23*, BDGADD2+30 |
| U | BDGADD2+22, BDGADD2+23, BDGADD2+26, BDGADD2+27, BDGADD2+28, BDGADD2+29, BDGADD2+30, LINE+4, LINE+5, LINE+6 , LINE+7, LINE+8 |
| >> VALMCNT | LINES+3, LINES+4, LINES+5, LINE+9 |
| >> X | BDGADD2+6*, BDGADD2+26*, BDGADD2+27 |