BSDX41C ; IHS/OIT/HMW/MSC/SAT - WINDOWS SCHEDULING RPCS ;
Source file <BSDX41C.m>
| Package | Total | Call Graph | 
|---|---|---|
| Health Summary | 3 | $$WRAP^GMTSORC (REGDT4,REGDTM4)^GMTSU CKP^GMTSUP | 
| Clinical Scheduling for Windows | 2 | $$FILL^BSDX41 $$FILL^BSDXTMP | 
| VA Fileman | 2 | $$GET1^DIQ ^DIWP | 
| Adverse Reaction Tracking | 1 | EN1^GMRADPT | 
| DRG Grouper | 1 | $$ICDDX^ICDCODE | 
| Package | Total | Caller Graph | 
|---|---|---|
| Clinical Scheduling for Windows | 1 | BSDX41 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| TITLE | ; Print title | |
| ALLAS | ; Allergy Assessment | |
| PROBADNR | ;display "NONE RECORDED", if no allergies recorded | |
| NKA | ; No known allergies | |
| TEXT | ; Setup for print of allergy comments | |
| ALLRGP | ; Allergy Print | |
| ALLRG1 | ; Allergies | |
| SIGBLK(GMTSALF) | ; Signature block | |
| PROBASCH | ;active problem search | |
| PROBA | ; ************ ALLERGY PROB * 9000011 ********* ; for PROBLEM LIST codes only! | |
| GETALLRG | ; Get Allergies | |
| ALLRG | ;EP; -- call to adverse reation/allergy component | |
| AUTOV | ; Autoverify | |
| FORMAT | ; Formats each line | |
| LINE | ; Writes formatted lines of text | |
| PROBADSP | ;display allergies | |
| PROBALLG | ;if allergy | |
| PROBAX | ||
| PROBACHK | ;checking for allergy codes | 
| Name | Field # of Occurrence | 
|---|---|
| $$FILL^BSDX41 | ALLRGP+6, ALLRGP+12, ALLRGP+19, NKA+2, NKA+3, NKA+4, NKA+5, TITLE+2, TITLE+3, TEXT+1 , LINE+1, SIGBLK+2, SIGBLK+3, PROBADSP+2, PROBADSP+3, PROBADSP+4, PROBADNR+1, PROBADNR+2, PROBADNR+3 | 
| $$FILL^BSDXTMP | ALLRGP+20 | 
| $$GET1^DIQ | ALLAS+2, ALLAS+4, ALLAS+5, ALLAS+6, SIGBLK+1 | 
| ^DIWP | FORMAT+1 | 
| EN1^GMRADPT | GETALLRG+1 | 
| $$WRAP^GMTSORC | ALLRGP+6 | 
| REGDT4^GMTSU | ALLAS+3 | 
| REGDTM4^GMTSU | ALLRGP+19, ALLRGP+20 | 
| CKP^GMTSUP | TITLE+1 | 
| $$ICDDX^ICDCODE | PROBASCH+2 | 
| FileNo | Call Tags | 
|---|---|
| ^GMR(120.86 - [#120.86] | GET1^DIQ | 
| ^VA(200 - [#200] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^%ZOSF("TEST" | ALLRG1+4 | 
| ^AUPNPROB - [#9000011] | PROBASCH+2, PROBACHK+1, PROBACHK+20, PROBALLG+3, PROBALLG+9 | 
| ^AUPNPROB("AC" | PROBA+2, PROBA+4 | 
| ^AUTNPOV - [#9999999.27] | PROBACHK+20, PROBALLG+9 | 
| ^BSDXTMP($J | ALLRG1+8*, ALLRGP+3*, ALLRGP+9*, ALLRGP+10*, ALLRGP+14*, ALLRGP+16*, ALLRGP+17*, ALLRGP+19*, NKA+1*, NKA+2* , NKA+3*, NKA+4*, NKA+5*, TITLE+2*, TITLE+3*, TEXT+6*, LINE+1*, SIGBLK+3*, PROBA+2*, PROBA+5* , PROBA+6*, PROBADSP+5*, PROBADNR+4* | 
| ^GMR(120.8 - [#120.8] | ALLRGP+9, ALLRGP+20, AUTOV+1, TEXT+2 | 
| ^UTILITY($J | TEXT+2!, TEXT+3, TEXT+4!, LINE+1 | 
| Name | Line Occurrences | 
|---|---|
| ALLAS | GETALLRG+2 | 
| ALLRG1 | ALLRG+8 | 
| ALLRGP | ALLRG1+6 | 
| FORMAT | TEXT+2 | 
| GETALLRG | ALLRG1+6 | 
| LINE | TEXT+3 | 
| NKA | ALLRG1+6 | 
| PROBACHK | PROBASCH+2 | 
| PROBADNR | PROBA+2, PROBA+7 | 
| PROBADSP | PROBA+8 | 
| PROBALLG | PROBASCH+2 | 
| PROBASCH | PROBA+4 | 
| PROBAX | PROBA+2, PROBA+5, PROBA+7 | 
| SIGBLK | ALLRGP+18 | 
| TEXT | ALLRGP+20 | 
| TITLE | ALLRG1+6 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | ALLRGP+9 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ALL | ALLRG1+9!, ALLRGP+11*, ALLRGP+12, ALLRGP+16*, ALLRGP+17* | 
| ALLRG | ALLRG1+3~*, ALLRG1+6, ALLRG1+7, ALLRG1+8, ALLRG1+9!, GETALLRG+1*, GETALLRG+2*, GETALLRG+11* | 
| APCHGMTS | ALLRG+1~, ALLRG+4* | 
| >> APCHSBRK | PROBA+2, PROBA+5 | 
| >> APCHSCKP | PROBA+2, PROBA+5 | 
| >> APCHSCVD | PROBALLG+3 | 
| APCHSDAT | PROBAX!, PROBALLG+3*, PROBALLG+4 | 
| APCHSDFN | PROBA+4*, PROBA+8*, PROBAX!, PROBASCH+2, PROBACHK+1, PROBACHK+20, PROBADSP+1, PROBADSP+3, PROBALLG+3, PROBALLG+4 , PROBALLG+5, PROBALLG+9, PROBALLG+10, PROBALLG+11 | 
| APCHSFND | PROBA+3*, PROBA+7, PROBAX!, PROBALLG+1* | 
| APCHSL1 | PROBADSP+1*, PROBADSP+3, PROBADSP+6! | 
| APCHSLEN | PROBA+3*, PROBAX!, PROBADSP+1, PROBADSP+2, PROBADSP+3, PROBADSP+4, PROBALLG+5*, PROBALLG+11* | 
| APCHSNKA | PROBAX!, PROBACHK+2*, PROBACHK+20*, PROBALLG+2 | 
| >> APCHSNPG | PROBA+2, PROBA+5 | 
| >> APCHSP | PROBASCH+2*, PROBACHK+3, PROBACHK+4, PROBACHK+5, PROBACHK+6, PROBACHK+7, PROBACHK+8, PROBACHK+9, PROBACHK+10, PROBACHK+12 , PROBACHK+13, PROBACHK+14, PROBACHK+15, PROBACHK+16, PROBACHK+17, PROBACHK+18, PROBACHK+19, PROBACHK+20 | 
| >> APCHSPAT | ALLRG+4, PROBA+2, PROBA+4 | 
| APCHSPT | PROBA+3!, PROBAX! | 
| APCHSPT( | PROBA+8, PROBADSP+1, PROBADSP+3, PROBALLG+4*, PROBALLG+5, PROBALLG+9*, PROBALLG+10*, PROBALLG+11 | 
| >> APCHSQ | PROBA+4*, PROBA+8* | 
| >> APCHSQIT | PROBA+2, PROBA+5 | 
| >> BSDXDSP | SIGBLK+2*, PROBADSP+2*, PROBADSP+3*, PROBADSP+4*, PROBADSP+5, PROBADNR+1*, PROBADNR+2*, PROBADNR+3*, PROBADNR+4 | 
| >> BSDXI | ALLRG1+8*, ALLRGP+2*, ALLRGP+3*, ALLRGP+9*, ALLRGP+10*, ALLRGP+14*, ALLRGP+16*, ALLRGP+17*, ALLRGP+19*, NKA+1* , NKA+2*, NKA+3*, NKA+4*, NKA+5*, TITLE+2*, TITLE+3*, TEXT+6*, LINE+1*, SIGBLK+3*, PROBA+2* , PROBA+5*, PROBA+6*, PROBADSP+5*, PROBADNR+4* | 
| >> BSDXTMP | ALLRGP+6*, ALLRGP+7*, ALLRGP+8*, ALLRGP+9, ALLRGP+12*, ALLRGP+14, ALLRGP+19*, ALLRGP+20*, TEXT+1*, TEXT+6 | 
| C | ALLRG1+2~ | 
| CC | ALLRG1+2~, ALLRG1+9!, ALLRGP+20* | 
| CCC | ALLRG1+9!, ALLRGP+20*, TEXT+2 | 
| CD | ALLRG1+9!, ALLRGP+20*, TEXT+1 | 
| >> DFN | ALLRG+4*, GETALLRG+2, ALLAS+2, ALLAS+4 | 
| DIWF | ALLRG1+9!, FORMAT+1* | 
| DIWL | ALLRG1+9!, TEXT+3, FORMAT+1*, LINE+1 | 
| DIWR | ALLRG1+9!, FORMAT+1* | 
| GMRA | ALLRG1+9!, GETALLRG+1* | 
| GMRAL | ALLRG1+1~, ALLRG1+9!, GETALLRG+1, GETALLRG+2, GETALLRG+3 | 
| GMRAL( | GETALLRG+4, GETALLRG+5, GETALLRG+6, GETALLRG+7, GETALLRG+9, GETALLRG+10 | 
| GMTS | ALLRG+3~ | 
| GMTSA | ALLRG1+3!, ALLRG1+9! | 
| GMTSAFN | ALLRG1+1~, ALLRGP+18, ALLRGP+19, AUTOV+1*, AUTOV+2 | 
| GMTSAL | ALLRG1+1~, ALLRG1+9! | 
| GMTSAL( | ALLRGP+1, ALLRGP+4, ALLRGP+5, ALLRGP+6, ALLRGP+8, ALLRGP+11, ALLRGP+15, GETALLRG+9*, GETALLRG+10*, AUTOV+1 | 
| GMTSALAD | ALLRG1+1~, NKA+1, NKA+3, ALLAS+1*, ALLAS+2*, ALLAS+3* | 
| GMTSALAS | ALLRG1+1~, ALLRG1+6, ALLRG1+7, NKA+1, NKA+2, NKA+3, ALLAS+1* | 
| GMTSALAT | ALLRG1+1~, NKA+5, ALLAS+6*, ALLAS+7* | 
| GMTSALAW | ALLRG1+1~, NKA+3, NKA+4, NKA+5, ALLAS+1*, ALLAS+5*, ALLAS+7* | 
| GMTSALF | ALLRG1+9!, SIGBLK~, SIGBLK+1 | 
| GMTSALG1 | ALLAS+1~ | 
| GMTSALG2 | ALLAS+1~, ALLAS+2 | 
| GMTSALG3 | ALLAS+1~, ALLAS+7 | 
| GMTSALNM | ALLRG1+2~, ALLRG1+9!, ALLRGP+9, ALLRGP+20, AUTOV+1*, TEXT+2 | 
| GMTSAU | ALLAS+1~, ALLAS+4*, ALLAS+5, ALLAS+6 | 
| GMTSAV | ALLRG1+1~, ALLRGP+7, AUTOV+1*, AUTOV+2* | 
| GMTSCNT | ALLRG1+2~, ALLRG1+9!, GETALLRG+4*, GETALLRG+9, GETALLRG+10 | 
| GMTSDTM | ALLRG+2~, ALLRG+7* | 
| GMTSE | ALLRG+2~, ALLRG+6* | 
| GMTSEACT | ALLRG1+2~, ALLRG1+9!, GETALLRG+6*, GETALLRG+9, GETALLRG+10 | 
| GMTSEGH | ALLRG+2~, ALLRG+6* | 
| GMTSEGL | ALLRG+2~, ALLRG+7* | 
| GMTSEGN | ALLRG+2~, ALLRG+7* | 
| GMTSLCMP | ALLRG+3~ | 
| GMTSLN | ALLRG1+2~, ALLRG1+9!, TEXT+2*, TEXT+3*, TEXT+5, LINE+1 | 
| GMTSLO | ALLRG+1~, ALLRG+5* | 
| GMTSLPG | ALLRG+1~, ALLRG+5* | 
| GMTSMECH | ALLRG1+2~, ALLRG1+9!, GETALLRG+7*, GETALLRG+8*, GETALLRG+9, GETALLRG+10 | 
| GMTSNODE | ALLRG1+9! | 
| GMTSNPG | ALLRG+1~, ALLRG+5* | 
| GMTSPFN | ALLRG1+9! | 
| >> GMTSPNF | ALLRG1+8, TITLE+2 | 
| GMTSPRT | ALLRG1+2~, ALLRG1+9!, TEXT+2*, FORMAT+1 | 
| >> GMTSQIT | ALLRG1+5, ALLRGP+11, TITLE+1, TEXT+1, TEXT+3, LINE+1 | 
| GMTSSB | SIGBLK+1~*, SIGBLK+2 | 
| GMTSSC | ALLRG+2~, ALLRG+7* | 
| GMTSSN | SIGBLK+1~*, SIGBLK+2 | 
| GMTSST | SIGBLK+1~*, SIGBLK+3 | 
| GMTSTY | ALLRG1+2~, ALLRG1+9!, GETALLRG+5*, GETALLRG+9, GETALLRG+10 | 
| GMTSTYP | ALLRG+1~, ALLRG+5* | 
| I | ALLRG1+9!, GETALLRG+4*, GETALLRG+5, GETALLRG+6, GETALLRG+7, GETALLRG+9, GETALLRG+10 | 
| II | ALLRG1+9!, ALLRGP+1*, ALLRGP+3, ALLRGP+4, ALLRGP+5, ALLRGP+6, ALLRGP+8, ALLRGP+11, ALLRGP+15, AUTOV+1 | 
| IOM | PROBADSP+2, PROBADSP+3, PROBADSP+4, PROBADNR+1, PROBADNR+2, PROBADNR+3 | 
| JJ | ALLRG1+3~, ALLRG1+9!, ALLRGP+4*, ALLRGP+5, ALLRGP+6, ALLRGP+8, ALLRGP+11, ALLRGP+15, GETALLRG+10*, AUTOV+1 | 
| KK | ALLRG1+2~, ALLRG1+9!, ALLRGP+5*, ALLRGP+6, ALLRGP+8, ALLRGP+11, ALLRGP+15, AUTOV+1 | 
| L | ALLRG1+9!, ALLRGP+6*, ALLRGP+8, ALLRGP+11, ALLRGP+15, AUTOV+1 | 
| M | ALLRG1+9!, ALLRGP+11*, ALLRGP+15 | 
| MX | ALLRG1+9!, ALLRGP+11*, ALLRGP+13*, ALLRGP+14 | 
| N | ALLRG1+9!, ALLRGP+15*, ALLRGP+16, ALLRGP+17, PROBACHK+20* | 
| ODT | ALLRG1+9!, ALLRGP+19* | 
| SEQ | ALLRG1+3*, ALLRG1+9! | 
| TITLE | ALLRG1+3~*, ALLRG1+9!, TITLE+2, TITLE+3 | 
| U | ALLRGP+8, ALLRGP+9, ALLRGP+18, ALLRGP+19, GETALLRG+5, GETALLRG+6, GETALLRG+7, AUTOV+1, AUTOV+2, PROBASCH+2 , PROBACHK+1, PROBACHK+20, PROBALLG+3, PROBALLG+5, PROBALLG+9 | 
| WKK | ALLRGP+5~, ALLRGP+6*, ALLRGP+10 | 
| X | ALLRG1+1~, ALLRG1+4*, ALLRG1+9!, ALLRGP+19*, ALLRGP+20*, ALLAS+1~, ALLAS+3*, FORMAT+1* | 
| >> Y | PROBALLG+3* | 
| Z | ALLRG1+9! |