©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
BDGADS2 ; IHS/ANMC/LJF - A&D SUMMARY-DAY SURGERY ;
Source file <BDGADS2.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Changes To ADT | 2 | SET^BDGADS ($$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 day surgery patients found and list in alpha order
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^DIC(45.7 - [#45.7] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | BDGADS2+6 |
| ^ADGDS - [#9009012] | BDGADS2+20, BDGADS2+23, BDGADS2+24 |
| ^ADGDS("AA" | BDGADS2+15, BDGADS2+17, BDGADS2+18 |
| Name | Line Occurrences |
|---|---|
| $$PAD | LINE+3, LINE+4, LINE+5, LINE+6, SP+1 |
| $$SP | LINES+3 |
| LINE | LINES+7 |
| LINES | BDGADS2+9, BDGADS2+31 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | BDGADS2+20 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BDGT | BDGADS2+8, BDGADS2+14 |
| D | PAD~, PAD+2 |
| DATE | BDGADS2+13~, BDGADS2+14*, BDGADS2+15*, BDGADS2+17, BDGADS2+18 |
| DAYCT | BDGADS2+7~, BDGADS2+8*, BDGADS2+9, BDGADS2+13~, BDGADS2+29*, BDGADS2+31, LINES+3 |
| DFN | BDGADS2+13~, BDGADS2+16*, BDGADS2+17*, BDGADS2+18, BDGADS2+20, BDGADS2+23, BDGADS2+24, BDGADS2+26, BDGADS2+27, BDGADS2+28 , LINES+1~, LINES+7*, LINE+2, LINE+3, LINE+5, LINE+6 |
| >> DGDAYCT | BDGADS2+14* |
| DGDS | BDGADS2+7~, BDGADS2+13~ |
| DGDS( | BDGADS2+27*, BDGADS2+28*, LINES+6, LINES+7, LINE+2, LINE+5, LINE+6 |
| DGZ | BDGADS2+13~, BDGADS2+20*, BDGADS2+27 |
| DSN | BDGADS2+13~, BDGADS2+18*, BDGADS2+20, BDGADS2+23, BDGADS2+24 |
| DUZ(2 | LINE+3 |
| >> END | BDGADS2+14*, BDGADS2+15 |
| L | PAD~, PAD+2 |
| LINE | LINE+1~, LINE+2*, LINE+3*, LINE+4*, LINE+5*, LINE+6*, LINE+7 |
| N | SP~, SP+1 |
| NAME | BDGADS2+13~, BDGADS2+26*, BDGADS2+27, BDGADS2+28, LINES+1~, LINES+6*, LINES+7, LINE+2, LINE+4, LINE+5 , LINE+6 |
| >> RELDT | BDGADS2+24*, BDGADS2+28 |
| U | BDGADS2+23, BDGADS2+24, BDGADS2+27, BDGADS2+28, LINE+2, LINE+5, LINE+6 |
| >> VALMCNT | LINES+3, LINES+4, LINE+7 |
| >> X | BDGADS2+6* |