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! |