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