©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
BSDWLV ; IHS/ITSC/LJF, WAR - VIEW WAITING LIST ENTRY ; [ 01/09/2003 1:44 PM ]
Source file <BSDWLV.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 3 | EN^VALM TERM^VALM0 CLEAR^VALM1 |
| IHS Changes To ADT | 2 | $$CONF^BDGF ($$DEAD,$$DOD,$$HRCN)^BDGF2 |
| Kernel | 2 | $$REPEAT^XLFSTR DISP^XQORM1 |
| IHS Patient | 1 | KILL^AUPNPAT |
| Scheduling | 1 | $$PCLINE^SDPPTEM |
| VA Fileman | 1 | ($$GET1,GETS)^DIQ |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Changes To Scheduling | 5 | BSDAM BSDDPA BSDWLE BSDWLE2 BSDWLL |
| Health Summary Components | 1 | BHSENCS |
| Mental Health Social Services | 1 | AMHGRAP |
| Patient Care Component | 1 | APCHS2D |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SET(DATA,NUM) | ; put data line into display array
|
|
| EN | ;EP; -- main entry point for BSDRM WAIT LIST VIEW
; variables already set coming into this routine: ; BSDN = ien of patient multiple in Waiting List File ; BSDWLN = clinic ien in file |
|
| HDR | ; -- header code
|
|
| PAD(D,L) | ;EP -- SUBRTN to pad length of data
; -- D=data L=length |
|
| SP(N) | ; -- SUBRTN to pad N number of spaces
|
|
| EXPND | ; -- expand code
|
|
| INIT | ; -- init variables and list array
|
|
| WLDATA(PAT,TYPE,BSDOUT) | ; EP - return wait list info in BSDOUT array
|
|
| EXIT | ; -- exit code
|
|
| ONWL(PAT,TYPE) | ; EP - returns 1 if patient active on at least one waiting list
|
|
| HELP | ; -- help code
|
| Name | Field # of Occurrence |
|---|---|
| KILL^AUPNPAT | EXIT+1 |
| $$CONF^BDGF | HDR+2 |
| $$DEAD^BDGF2 | HDR+9 |
| $$DOD^BDGF2 | HDR+9 |
| $$HRCN^BDGF2 | HDR+5 |
| $$GET1^DIQ | HDR+4, HDR+6, HDR+7, INIT+4, INIT+9, INIT+10, INIT+20, INIT+21, INIT+22, INIT+35 , INIT+36, WLDATA+16, WLDATA+21 |
| GETS^DIQ | WLDATA+18 |
| $$PCLINE^SDPPTEM | HDR+10 |
| EN^VALM | EN+6 |
| TERM^VALM0 | EN+5 |
| CLEAR^VALM1 | EN+5, EN+7 |
| $$REPEAT^XLFSTR | PAD+2 |
| DISP^XQORM1 | HELP+1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^BSDWL - [#9009017.1] | GET1^DIQ |
| 9009017.11 | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BSDWL - [#9009017.1] | INIT+28, INIT+29, ONWL+6, ONWL+9, WLDATA+11 |
| ^BSDWL("AB" | ONWL+3, ONWL+5, ONWL+8, WLDATA+9, WLDATA+10 |
| ^BSDWL(0 | WLDATA+3 |
| ^DD(2 | INIT+15 |
| ^DD(9009017.11 | INIT+8, INIT+34 |
| ^SC - [#44] | ONWL+6 |
| ^TMP("BSDWLV" | INIT+2!, SET+2*, EXIT+1! |
| Name | Line Occurrences |
|---|---|
| $$ONWL | WLDATA+4 |
| $$PAD | HDR+5, HDR+6, HDR+7, INIT+9, INIT+21, INIT+22, INIT+35, SP+1, WLDATA+20, WLDATA+21 , WLDATA+22 |
| $$SP | HDR+2, HDR+9, INIT+4, WLDATA+22, WLDATA+23 |
| SET | INIT+4, INIT+11, INIT+24, INIT+27, INIT+29, INIT+32, INIT+37 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ADDDT | WLDATA+16*, WLDATA+17, WLDATA+25, WLDATA+29 |
| BSDATA | WLDATA+6~, WLDATA+15! |
| BSDATA( | WLDATA+19, WLDATA+20, WLDATA+22, WLDATA+23, WLDATA+28, WLDATA+29 |
| BSDI | INIT+1~, INIT+7*, INIT+8, INIT+9, INIT+10, INIT+14*, INIT+15, INIT+21, INIT+22, INIT+28* , INIT+29, INIT+33*, INIT+34, INIT+35, INIT+36 |
| BSDN | INIT+9, INIT+10, INIT+20, INIT+28, INIT+29, INIT+35, INIT+36, EXIT+1! |
| BSDOUT | WLDATA~ |
| BSDOUT( | WLDATA+25*, WLDATA+29* |
| BSDOUT(0 | WLDATA+3*, WLDATA+4*, WLDATA+17*, WLDATA+31, WLDATA+33* |
| >> BSDWLN | INIT+4, INIT+9, INIT+10, INIT+20, INIT+28, INIT+29, INIT+35, INIT+36 |
| >> CNT | WLDATA+28*, WLDATA+29 |
| CNTA | WLDATA+6~, WLDATA+7*, WLDATA+13*, WLDATA+25, WLDATA+29 |
| D | PAD~, PAD+2 |
| DATA | SET~, SET+2 |
| DFN | HDR+4, HDR+5, HDR+6, HDR+7, HDR+9, HDR+10, INIT+20~*, INIT+21, INIT+22 |
| DT | HDR+10 |
| DUZ(2 | HDR+5 |
| FILE | WLDATA+6~, WLDATA+15*, WLDATA+16, WLDATA+18, WLDATA+19, WLDATA+20, WLDATA+22, WLDATA+23, WLDATA+28, WLDATA+29 |
| FOUND | ONWL+4~, ONWL+5*, ONWL+8, ONWL+10*, ONWL+11, WLDATA+6~, WLDATA+9* |
| IEN | ONWL+4~, ONWL+8*, ONWL+9, WLDATA+6~, WLDATA+10*, WLDATA+11, WLDATA+15 |
| IENS | WLDATA+6~, WLDATA+15*, WLDATA+16, WLDATA+18, WLDATA+19, WLDATA+20, WLDATA+22, WLDATA+23, WLDATA+25, WLDATA+28 , WLDATA+29 |
| >> IORVOFF | HDR+4, HDR+9 |
| >> IORVON | HDR+4, HDR+9 |
| L | PAD~, PAD+2 |
| LINE | INIT+1~, INIT+8*, INIT+9*, INIT+10*, INIT+11, INIT+15*, INIT+21*, INIT+22*, INIT+24, INIT+34* , INIT+35*, INIT+36*, INIT+37, WLDATA+6~, WLDATA+19*, WLDATA+20*, WLDATA+21*, WLDATA+22*, WLDATA+23*, WLDATA+25 |
| N | SP~, SP+1 |
| NUM | SET~, SET+1*, SET+2 |
| PAT | ONWL~, ONWL+3, ONWL+5, ONWL+8, WLDATA~, WLDATA+4, WLDATA+9, WLDATA+10 |
| TYPE | ONWL~, ONWL+6, WLDATA~, WLDATA+4 |
| U | INIT+8, INIT+15, INIT+34, ONWL+6, ONWL+9, WLDATA+11, WLDATA+25, WLDATA+29 |
| VALMCNT | EN+5~, INIT+2*, INIT+4, INIT+11, INIT+24, INIT+27, INIT+29, INIT+32, INIT+37 |
| >> VALMHDR(1 | HDR+2* |
| >> VALMHDR(2 | HDR+7* |
| >> VALMHDR(3 | HDR+9*, HDR+10* |
| WL | ONWL+4~, ONWL+5*, ONWL+6, ONWL+8, ONWL+9, WLDATA+6~, WLDATA+9*, WLDATA+10, WLDATA+11, WLDATA+15 , WLDATA+21 |
| X | HDR+1~, HDR+4*, HDR+5*, HDR+6*, HDR+7, INIT+1~, INIT+4*, HELP+1* |