©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
BDGCRB ; IHS/ANMC/LJF - CLINICAL RECORD BRIEF ;
Source file <BDGCRB.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Changes To ADT | 4 | ^BDGCRB1 ($$READ,MSG,PAUSE,ZIS)^BDGF $$ADMSRV^BDGF1 NOPAT^BDGLOC |
| IHS Changes To Scheduling | 1 | $$DIV^BSDU |
| Kernel | 1 | ^%ZISC |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PAT(DFN,DGPMCA,BDGFIN,DGPMT,BDGHALF,DGQUIET,BDGCOP,BDGDEV) | ;EP; pat & adm are known
|
|
| DATEP | ;EP; entry point for queuing to print a sheets by date
; Assumes BDGDT, BDGHALF, BDGCOP, BDGFRM are set |
|
| NOPAT(FINAL) | ;EP; entry point where patient is not known
; FINAL set to 1 if called by FINAL A SHEET option |
|
| DATES(BDGFIN) | ;Entry Point for printing a sheets by admit date
|
|
| WRDPTR(PAT) | ; return printer device attached to patient's current ward
|
|
| ADMIT(DFN) | ; ask user to select an admission for patient
|
|
| FINHLP | ;EP; help for final sheet sheet format question
|
|
| FORMS | ;EP; entry point for admission forms option
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZISC | PAT+40, PAT+52, DATEP+16 |
| ^BDGCRB1 | DATEP+13 |
| $$READ^BDGF | FORMS+10, NOPAT+5, NOPAT+12, PAT+45, PAT+46, ADMIT+14, DATES+10, DATES+11, DATES+13 |
| MSG^BDGF | PAT+31, PAT+43, FINHLP+1, FINHLP+2, FINHLP+3, DATES+7 |
| PAUSE^BDGF | PAT+32, DATES+8 |
| ZIS^BDGF | PAT+38, PAT+50, DATES+15 |
| $$ADMSRV^BDGF1 | ADMIT+10 |
| NOPAT^BDGLOC | FORMS+6, FORMS+12 |
| $$DIV^BSDU | NOPAT+12, PAT+28, DATES+4 |
| $$GET1^DIQ | NOPAT+12, PAT+28, ADMIT+9, DATES+4, WRDPTR+2, WRDPTR+4 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^DGPM - [#405] | GET1^DIQ |
| ^BDGWD - [#9009016.5] | GET1^DIQ |
| ^BDGPAR - [#9009020.1] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPM - [#405] | PAT+23 |
| ^DGPM("AMV1" | DATEP+4, DATEP+6, DATEP+8 |
| ^DGPM("APCA" | ADMIT+1 |
| ^DGPM("ATID1" | ADMIT+6, ADMIT+7 |
| ^DIC(42 - [#42] | WRDPTR+3 |
| ^XUSEC("DGZNOCLN" | FORMS+4 |
| ^XUSEC("DGZPCC2" | FORMS+9 |
| Name | Line Occurrences |
|---|---|
| $$ADMIT | NOPAT+6 |
| $$WRDPTR | PAT+36, PAT+49 |
| DATES | FORMS+14 |
| NOPAT | FORMS+13, FORMS+15 |
| PAT | NOPAT+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADM | ADMIT+4~ |
| ADM( | ADMIT+8*, ADMIT+15 |
| ADM(1 | ADMIT+13 |
| BDGADT | DATEP+2~, DATEP+3*, DATEP+4*, DATEP+6, DATEP+8, DATEP+17! |
| BDGCNT | PAT+39!, PAT+51! |
| BDGCOP | FORMS+2!, PAT~, PAT+37*, PAT+39!, PAT+46*, PAT+51!, DATES+1~, DATES+13*, DATEP+17! |
| BDGDA | DATEP+7*, DATEP+8*, DATEP+11, DATEP+17! |
| BDGDEV | PAT~, PAT+36*, PAT+38, PAT+49*!, PAT+50 |
| BDGDT | DATES+1~, DATES+10*, DATEP+3*, DATEP+4, DATEP+17! |
| BDGFIN | FORMS+2!, NOPAT+9*, NOPAT+11, NOPAT+12*, NOPAT+14, PAT~, PAT+39!, PAT+44, PAT+51!, DATES~ , DATEP+11* |
| BDGFRM | FORMS+2!, PAT+27~, PAT+28*, PAT+29, PAT+39!, PAT+51!, DATES+1~, DATES+4*, DATES+5, DATEP+17! |
| BDGHALF | FORMS+2!, NOPAT+2~, PAT~, PAT+39!, PAT+44*, PAT+45*, PAT+51!, DATES+1~, DATES+11*, DATES+12 , DATEP+17! |
| BDGPAT | DATEP+5*, DATEP+6*, DATEP+8, DATEP+11, DATEP+17! |
| CHOICE | FORMS+1~, FORMS+8*, FORMS+9*, FORMS+10 |
| COUNT | ADMIT+4~, ADMIT+5*, ADMIT+8*, ADMIT+9, ADMIT+13, ADMIT+14 |
| DFN | FORMS+2!, NOPAT+2~, NOPAT+5*, NOPAT+6, NOPAT+14, PAT~, PAT+22, PAT+36, PAT+49, ADMIT~ , ADMIT+1, ADMIT+6, ADMIT+7, ADMIT+10, DATEP+11*, DATEP+17! |
| DGPMCA | FORMS+2!, NOPAT+2~, NOPAT+6*, NOPAT+14, PAT~, PAT+22, PAT+23, DATEP+11*, DATEP+17! |
| DGPMT | FORMS+1~, FORMS+6*, FORMS+11*, NOPAT+7*, NOPAT+14, PAT~, PAT+22, PAT+24 |
| DGQUIET | FORMS+2!, PAT~, PAT+30, PAT+35, DATES+6 |
| DUZ | FORMS+4, FORMS+9 |
| FINAL | NOPAT~, NOPAT+9, NOPAT+11 |
| FORM | FORMS+1~, FORMS+6*, FORMS+10*, FORMS+12, FORMS+13, FORMS+14, FORMS+15 |
| IEN | ADMIT+4~, ADMIT+7*, ADMIT+8, ADMIT+9, ADMIT+10 |
| IOF | DATEP+12 |
| IVDT | ADMIT+4~, ADMIT+6*, ADMIT+7 |
| PAT | WRDPTR~, WRDPTR+2 |
| U | PAT+45, DATES+12 |
| WARD | WRDPTR+1~, WRDPTR+2*, WRDPTR+3*, WRDPTR+4 |
| >> X | ADMIT+10*, ADMIT+11 |
| Y | ADMIT+4~, ADMIT+14*, ADMIT+15 |