©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
BSDHS ; IHS/ANMC/LJF - HS BY CLINIC ; [ 08/20/2004 11:54 AM ]
Source file <BSDHS.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Changes To ADT | 2 | ($$READ,MSG,ZIS)^BDGF ($$HRCN,$$HRCND,$$HRCNT)^BDGF2 |
| IHS Changes To Scheduling | 2 | (AIU,APRO,HS,MP)^BSDFORM ($$ACTV,$$DIV,$$DIVC,$$FAC,$$PRIN,CLINIC)^BSDU |
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
| Kernel | 1 | ^%ZISC |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ALL | ; -- loop thru all clinics
|
|
| END | ; -- eoj
|
|
| START | ;EP; loop thru clinics and appts to get patients
; build sorted array |
|
| GETAPPT | ; -- for clinic, get appts & chart requests for date
|
|
| SOME | ; -- loop thru selected clinics
|
|
| DEVICE | ; -- select print device
|
|
| CLINIC | ; -- all clinics or selected ones?
; if ALL clinics are selected, VAUTC=1 ; otherwise the VAUTC array is set and VAUTC=0 |
|
| OTHER | ; -- print other forms too?
|
|
| HELP2 | ;EP; -- help for other forms question
|
|
| FORMS(CLINIC,DFN) | ; -- call forms code if turned on for clinic
|
|
| HELP1 | ;EP; -- help for sort question
|
|
| DATE | ; -- select date
|
|
| SORTS | ; -- sort by
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZISC | START+14 |
| $$READ^BDGF | DATE+1, SORTS+5, OTHER+1, DEVICE+4 |
| MSG^BDGF | HELP1+2, HELP1+3, HELP1+4, HELP1+5, HELP1+6, HELP2+1, HELP2+2, HELP2+3, HELP2+4 |
| ZIS^BDGF | DEVICE+5 |
| $$HRCN^BDGF2 | GETAPPT+11 |
| $$HRCND^BDGF2 | GETAPPT+13 |
| $$HRCNT^BDGF2 | GETAPPT+14 |
| AIU^BSDFORM | FORMS+15 |
| APRO^BSDFORM | FORMS+12 |
| HS^BSDFORM | FORMS+6 |
| MP^BSDFORM | FORMS+11 |
| $$ACTV^BSDU | ALL+3, SOME+4 |
| $$DIV^BSDU | DEVICE+1, DEVICE+2 |
| $$DIVC^BSDU | ALL+4, GETAPPT+12 |
| $$FAC^BSDU | GETAPPT+11 |
| $$PRIN^BSDU | GETAPPT+17 |
| CLINIC^BSDU | CLINIC+3 |
| $$GET1^DIQ | DEVICE+3, GETAPPT+12, GETAPPT+16, GETAPPT+19, GETAPPT+20, FORMS+3, FORMS+10 |
| $$VAL^XBDIQ1 | FORMS+15 |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| ^BSDSC - [#9009017.2] | GET1^DIQ |
| ^BSDPAR - [#9009020.2] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SC - [#44] | ALL+2, GETAPPT+3, GETAPPT+5, GETAPPT+6 |
| ^TMP("BSDHS" | START+2!, START+7, START+8, START+9, START+12, START+15!, GETAPPT+24* |
| Name | Line Occurrences |
|---|---|
| @( | START+3 |
| END | CLINIC+3, SORTS+7, OTHER+2, START+14 |
| FORMS | START+12 |
| GETAPPT | ALL+5, SOME+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %I | END+2! |
| A | START+6~, START+7*, START+8, START+9, START+12, FORMS+1~ |
| ALL | END+1! |
| B | START+6~, START+8*, START+9, START+12, FORMS+1~ |
| BSDCL | SOME+1~, SOME+2*, SOME+3 |
| BSDCLN | ALL+1~, ALL+2*, ALL+3, ALL+4, SOME+1~, SOME+3*, SOME+4, GETAPPT+3, GETAPPT+5, GETAPPT+6 , GETAPPT+11, GETAPPT+12, GETAPPT+16, GETAPPT+17, GETAPPT+19, GETAPPT+24 |
| BSDDT | BSDHS+6~, DATE+1*, DATE+2, ALL+3, SOME+4, GETAPPT+2, FORMS+12 |
| BSDEND | GETAPPT+1~, GETAPPT+2*, GETAPPT+3 |
| >> BSDFORM | OTHER+1*, OTHER+2, FORMS+8 |
| >> BSDHST | DEVICE+4*, FORMS+6 |
| >> BSDLN | START+6* |
| BSDN | GETAPPT+1~, GETAPPT+4*, GETAPPT+5*, GETAPPT+6 |
| >> BSDRX | FORMS+10*, FORMS+11, FORMS+12 |
| BSDSRT | BSDHS+6~, SORTS+5*, SORTS+7, GETAPPT+16, GETAPPT+17, GETAPPT+20, GETAPPT+21 |
| BSDSUB | ALL+1~, ALL+5*, SOME+1~, SOME+5*, GETAPPT+3, GETAPPT+5, GETAPPT+6 |
| BSDT | GETAPPT+1~, GETAPPT+2*, GETAPPT+3*, GETAPPT+5, GETAPPT+6 |
| C | END+2!, START+6~, START+9*, START+12, FORMS+1~ |
| CLINIC | FORMS~, FORMS+3, FORMS+10, FORMS+12, FORMS+15 |
| D | START+6~ |
| >> DEFAULT | DEVICE+3*, DEVICE+5 |
| DFN | FORMS~, FORMS+6, FORMS+11, FORMS+12, FORMS+15 |
| DIR0 | SORTS+1~, SORTS+3*, SORTS+5 |
| DIRA | SORTS+1~, SORTS+4*, SORTS+5 |
| DIRB | SORTS+1~ |
| DIV | DEVICE+1*, DEVICE+2*, DEVICE+3, END+1! |
| HRCN | GETAPPT+1~, GETAPPT+11*, GETAPPT+13, GETAPPT+14 |
| I | END+2! |
| IO | START+2 |
| LINE | GETAPPT+1~ |
| NODE | GETAPPT+1~, GETAPPT+6*, GETAPPT+11, GETAPPT+20, GETAPPT+24 |
| ORD | END+1! |
| ORDER | END+1! |
| RMSEL | END+1! |
| SDEF | END+2! |
| SDIQ | END+1! |
| SDREP | END+1! |
| SDSP | END+1! |
| SDSTART | END+1! |
| SDX | END+2! |
| SORT | GETAPPT+1~, GETAPPT+16*, GETAPPT+17*, GETAPPT+19*, GETAPPT+20*, GETAPPT+21*, GETAPPT+24 |
| TERM | GETAPPT+1~, GETAPPT+13*, GETAPPT+14*, GETAPPT+21, GETAPPT+24 |
| U | OTHER+2 |
| V | END+2! |
| VAUTC | BSDHS+6~, START+3 |
| VAUTC( | SOME+2, SOME+3 |
| VAUTD | BSDHS+6~, DEVICE+1, DEVICE+2, ALL+4 |
| VAUTD( | ALL+4 |
| VAUTD(0 | DEVICE+2 |
| X | END+2!, START+3*, GETAPPT+1~ |
| Y | CLINIC+3, END+2! |