BSDSCRPC ; IHS/ANMC/LJF - MODS TO PCMM RPC CALLS ;
Source file <BSDSCRPC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DOB | ;DOB Lookup
|
|
LOOKUP(BSDY,BSDP,BSDC) | ||
PTLOOKUP(BSDV,BSDC) | ;EP; called by FINDP^SCUTBK11 for IHS patient lookup
; uses code that converts answer to what SCUTBK11 wants |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNPAT - [#9000001] | DOB+8, DOB+10, DOB+29, DOB+45, DOB+47, DOB+73, DOB+75 |
^AUPNPAT("D" | DOB+23, DOB+24 |
^DD("DD" | DOB+14, DOB+32, DOB+50, DOB+79 |
^DPT - [#2] | DOB+5, DOB+6, DOB+25, DOB+26, DOB+42, DOB+43, DOB+77 |
^DPT("ADOB" | DOB+3, DOB+4 |
^DPT("SSN" | DOB+40, DOB+41 |
^TMP("DILIST" | PTLOOKUP+8!, PTLOOKUP+12* |
Name | Line Occurrences |
---|---|
LOOKUP | PTLOOKUP+7 |
Name | Field # of Occurrence |
---|---|
^(0 | DOB+29 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %DT | DOB+2* |
BSDA | PTLOOKUP+6~, PTLOOKUP+7, PTLOOKUP+9 |
BSDC | PTLOOKUP~, PTLOOKUP+7, LOOKUP~, LOOKUP+9*, DOB+62 |
BSDDLIM | LOOKUP+10~, LOOKUP+11*, DOB+11, DOB+13, DOB+15, DOB+16, DOB+30, DOB+31, DOB+33, DOB+34 , DOB+48, DOB+49, DOB+51, DOB+52, DOB+76, DOB+78, DOB+80, DOB+81 |
>> BSDDPT | DOB+6*, DOB+7, DOB+13, DOB+14, DOB+26*, DOB+27, DOB+31, DOB+32, DOB+43*, DOB+44 , DOB+49, DOB+50, DOB+77*, DOB+78, DOB+79 |
>> BSDFIELD | DOB+59*, DOB+68 |
>> BSDFILE | DOB+57*, DOB+68 |
>> BSDFLAGS | DOB+60*, DOB+68 |
BSDHRN | LOOKUP+10~, DOB+8*, DOB+9, DOB+10*, DOB+11, DOB+28*, DOB+29*, DOB+30, DOB+45*, DOB+46 , DOB+47*, DOB+48, DOB+73*, DOB+74, DOB+75*, DOB+76 |
>> BSDIDEN | DOB+65*, DOB+68 |
>> BSDIEN | DOB+4*, DOB+5, DOB+6, DOB+8, DOB+10, DOB+16, DOB+24*, DOB+25, DOB+26, DOB+29 , DOB+34, DOB+41*, DOB+42, DOB+43, DOB+45, DOB+47, DOB+52, DOB+71*, DOB+73, DOB+75 , DOB+77, DOB+81 |
>> BSDIENS | DOB+58*, DOB+68 |
>> BSDINDEX | DOB+63*, DOB+68 |
>> BSDMSG | DOB+67*, DOB+68 |
>> BSDNUMBR | DOB+62*, DOB+68 |
BSDP | LOOKUP~, LOOKUP+6*, LOOKUP+7*, LOOKUP+8*, DOB+1, DOB+2*, DOB+3, DOB+4, DOB+23, DOB+24 , DOB+28, DOB+40, DOB+41, DOB+61 |
BSDRET | LOOKUP+10~, LOOKUP+12*, LOOKUP+13, LOOKUP+14, DOB+1, DOB+18*, DOB+23, DOB+35*, DOB+40, DOB+53* , DOB+69, DOB+82*, DOB+84 |
>> BSDRSLT("DILIST" | DOB+69, DOB+70, DOB+71, DOB+72 |
>> BSDSCREN | DOB+64*, DOB+68 |
>> BSDTARG | DOB+66*, DOB+68 |
BSDV | PTLOOKUP~, PTLOOKUP+7 |
>> BSDVALUE | DOB+61*, DOB+68 |
>> BSDX | DOB+70*, DOB+71, DOB+72, DOB+82 |
>> BSDXX | DOB+4*, DOB+17* |
BSDY | LOOKUP~, LOOKUP+13*, LOOKUP+14*, DOB+1*, DOB+23*, DOB+40*, DOB+69*, DOB+84* |
BSDZ | LOOKUP+10~, DOB+7*, DOB+11*, DOB+13*, DOB+15*, DOB+16*, DOB+18, DOB+27*, DOB+30*, DOB+31* , DOB+33*, DOB+34*, DOB+35, DOB+44*, DOB+48*, DOB+49*, DOB+51*, DOB+52*, DOB+53, DOB+72* , DOB+76*, DOB+78*, DOB+80*, DOB+81*, DOB+82 |
DUZ | LOOKUP+13 |
DUZ(2 | LOOKUP+14, DOB+1, DOB+8, DOB+10, DOB+23, DOB+24, DOB+29, DOB+45, DOB+47, DOB+64 , DOB+73, DOB+75 |
I | PTLOOKUP+6~, PTLOOKUP+9*, PTLOOKUP+12 |
U | PTLOOKUP+11, DOB+7, DOB+8, DOB+10, DOB+13, DOB+14, DOB+27, DOB+29, DOB+31, DOB+32 , DOB+44, DOB+45, DOB+47, DOB+49, DOB+50, DOB+70, DOB+73, DOB+75, DOB+78, DOB+79 |
X | PTLOOKUP+6~, PTLOOKUP+11*, PTLOOKUP+12, DOB+2* |
Y | PTLOOKUP+6~, PTLOOKUP+9*, PTLOOKUP+11, DOB+2, DOB+14*, DOB+15, DOB+32*, DOB+33, DOB+50*, DOB+51 , DOB+79*, DOB+80 |