BQIPTPR ;PRXM/HC/BWF-Patient Provider Utilities ; 15 Nov 2005 3:17 PM
Source file <BQIPTPR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HDR | ;
|
|
| ERR | ;
|
|
| GETPROVS(DFN,BQII) | ;EP
|
|
| PROVST(SRCAT,LCPROV) | ;EP
|
|
| LOOP(BQII) | ;EP
|
|
| PTPROV(DATA,DFN,ALL) | ;EP -- BQI PATIENT PROVIDERS
; BQI PATIENT PROVIDERS ; Input ; DFN - Patient IEN ; DATA - Passed by reference ; ALL - 1 if all provider categories are wanted ; Output ; DATA - Set in this routine ; ; Variables ; BDPIEN - Ien from ^BDPRECN ; LCPROV - Last Current Provider ; |
| Name | Field # of Occurrence |
|---|---|
| ^%ZTER | ERR+1 |
| $$FMTE^BQIUL1 | PTPROV+50, PROVST+13, PROVST+14, PROVST+29 |
| $$FIND1^DIC | GETPROVS+6, GETPROVS+13, GETPROVS+20, GETPROVS+27, GETPROVS+34 |
| $$GET1^DIQ | PTPROV+41, PTPROV+43, PTPROV+44, PTPROV+45, PTPROV+50, PTPROV+51, PROVST+7, PROVST+10, PROVST+22, PROVST+23 , GETPROVS+3, GETPROVS+4, GETPROVS+10, GETPROVS+11, GETPROVS+17, GETPROVS+18, GETPROVS+24, GETPROVS+25, GETPROVS+31, GETPROVS+32 |
| $$NOW^XLFDT | PROVST+20, ERR+3 |
| $$VERSION^XPDUTL | PTPROV+32 |
| RPC Name | Call Tags |
|---|---|
| BQI PATIENT PROVIDERS | PTPROV |
| FileNo | Call Tags |
|---|---|
| 2.98 | GET1^DIQ |
| ^AUPNPAT - [#9000001] | GET1^DIQ |
| ^AUPNVSIT - [#9000010] | GET1^DIQ |
| ^AUPNVPRV - [#9000010.06] | GET1^DIQ |
| ^AMHPATR - [#9002011.55] | GET1^DIQ |
| ^BWP - [#9002086] | GET1^DIQ |
| ^BDPRECN - [#90360.1] | GET1^DIQ |
| ^BDPTCAT - [#90360.3] | FIND1^DIC, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVPRV("AD" | PROVST+9 |
| ^AUPNVSIT("AA" | PROVST+4, PROVST+6 |
| ^BDPRECN("AA" | PTPROV+38, PTPROV+40 |
| ^BDPTCAT - [#90360.3] | PTPROV+56 |
| ^DD("DD" | ERR+3 |
| ^DPT - [#2] | PROVST+21 |
| ^SC - [#44] | PROVST+28, PROVST+29 |
| ^TMP("BQIPTPR" | PTPROV+17 |
| Name | Line Occurrences |
|---|---|
| GETPROVS | PTPROV+33 |
| HDR | PTPROV+25 |
| LOOP | PTPROV+57, GETPROVS+38 |
| PROVST | PTPROV+49, GETPROVS+8, GETPROVS+15, GETPROVS+22, GETPROVS+29, GETPROVS+36 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ALL | PTPROV~, PTPROV+19*, PTPROV+47, PTPROV+53 |
| BDPCAT | PTPROV+13~, PTPROV+37*, PTPROV+38*, PTPROV+40, PTPROV+45, PTPROV+47 |
| BDPIEN | PTPROV+13~, PTPROV+39*, PTPROV+40*, PTPROV+41, PTPROV+43, PTPROV+44, PTPROV+47, PTPROV+50, PTPROV+51 |
| BDPINST | PTPROV+13~, PTPROV+32*, PTPROV+33 |
| >> BMXSEC | ERR+4* |
| BQII | PTPROV+13~, PTPROV+21*, PTPROV+33, PTPROV+57, LOOP~, LOOP+6*, LOOP+12*, LOOP+13*, GETPROVS~, GETPROVS+38 , HDR+2, ERR+5* |
| BQPRV | PTPROV+14~, PTPROV+36! |
| BQPRV( | PTPROV+47*, PTPROV+56 |
| CAT | PTPROV+54~, PTPROV+56* |
| CDPROV | GETPROVS+1~, GETPROVS+24*, GETPROVS+28 |
| CDPROVI | GETPROVS+1~, GETPROVS+25*, GETPROVS+28 |
| CLINIC | PROVST+2~, PROVST+22*, PROVST+24, PROVST+28, PROVST+29 |
| DATA | PTPROV~, PTPROV+17*, PTPROV+18, LOOP+6, LOOP+12, LOOP+13, HDR+2, ERR+5 |
| DFN | PTPROV~, PTPROV+33, PTPROV+38, PTPROV+40, PTPROV+48, PTPROV+52, PTPROV+56, PROVST+4, PROVST+6, PROVST+14 , PROVST+15, PROVST+21, PROVST+22, PROVST+23, PROVST+29, LOOP+2, LOOP+5, LOOP+6, LOOP+7, LOOP+9 , LOOP+11, LOOP+12, GETPROVS~, GETPROVS+3, GETPROVS+4, GETPROVS+7, GETPROVS+10, GETPROVS+11, GETPROVS+14, GETPROVS+17 , GETPROVS+18, GETPROVS+21, GETPROVS+24, GETPROVS+25, GETPROVS+28, GETPROVS+31, GETPROVS+32, GETPROVS+35 |
| DPCP | GETPROVS+1~, GETPROVS+3*, GETPROVS+7 |
| DPCPI | GETPROVS+1~, GETPROVS+4*, GETPROVS+7 |
| ERRDTM | ERR+2~, ERR+3*, ERR+4 |
| EXTVST | PROVST+2~, PROVST+12*, PROVST+13*, PROVST+14 |
| FOUND | PROVST+2~, PROVST+3*, PROVST+4, PROVST+6, PROVST+9, PROVST+14*, PROVST+20*, PROVST+21, PROVST+28, PROVST+29* |
| LCPROV | PTPROV+13~, PTPROV+41*, PTPROV+42, PTPROV+48, PTPROV+49, PTPROV+52, PROVST~, PROVST+11, PROVST+14, PROVST+15 , PROVST+29 |
| LCPROVNM | PTPROV+13~, PTPROV+43*, PTPROV+48 |
| LCPRVI | PTPROV+15~, PTPROV+44*, PTPROV+48 |
| LOOP | LOOP+1~, LOOP+4*, LOOP+5*, LOOP+6, LOOP+10*, LOOP+11*, LOOP+12 |
| LSTUP | PTPROV+14~, PTPROV+50*, PTPROV+52 |
| LSTUPU | PTPROV+14~, PTPROV+51*, PTPROV+52 |
| LSTVST | PROVST+2~, PROVST+3*, PROVST+4*, PROVST+6, PROVST+12 |
| MHPROV | GETPROVS+1~, GETPROVS+10*, GETPROVS+14 |
| MHPROVI | GETPROVS+1~, GETPROVS+11*, GETPROVS+14 |
| N | PTPROV+54~, PTPROV+55*, PTPROV+56* |
| NXTVST | PROVST+2~, PROVST+20*, PROVST+21*, PROVST+22, PROVST+23, PROVST+29 |
| PCAT | LOOP+1~, LOOP+2*, LOOP+3, LOOP+5, LOOP+6, LOOP+7, LOOP+8*, LOOP+9*, LOOP+11, LOOP+12 |
| PROV | PTPROV+13~, PROVST+2~ |
| PROVCAT | PTPROV+13~, PTPROV+45*, PTPROV+46, PTPROV+48 |
| PROVLST | PTPROV+13~ |
| PROVLST( | PTPROV+48*, PTPROV+52*, PTPROV+56*, PROVST+14*, PROVST+15*, PROVST+29*, LOOP+2, LOOP+5, LOOP+6, LOOP+7! , LOOP+9, LOOP+11, LOOP+12, GETPROVS+7*, GETPROVS+14*, GETPROVS+21*, GETPROVS+28*, GETPROVS+35* |
| SRCAT | PTPROV+46*, PTPROV+48, PTPROV+49, PTPROV+52, PROVST~, PROVST+14, PROVST+15, PROVST+29, GETPROVS+5*, GETPROVS+7 , GETPROVS+8, GETPROVS+12*, GETPROVS+14, GETPROVS+15, GETPROVS+19*, GETPROVS+22, GETPROVS+26*, GETPROVS+29, GETPROVS+33*, GETPROVS+35 , GETPROVS+36 |
| SSPROV | GETPROVS+1~, GETPROVS+17*, GETPROVS+21 |
| SSPROVI | GETPROVS+1~, GETPROVS+18*, GETPROVS+21 |
| STATUS | PROVST+2~, PROVST+23*, PROVST+25 |
| TEXT | GETPROVS+2~, GETPROVS+5*, GETPROVS+6, GETPROVS+7, GETPROVS+12*, GETPROVS+13, GETPROVS+14, GETPROVS+19*, GETPROVS+20, GETPROVS+21 , GETPROVS+26*, GETPROVS+27, GETPROVS+28, GETPROVS+33*, GETPROVS+34, GETPROVS+35 |
| TIEN | GETPROVS+2~, GETPROVS+6*, GETPROVS+7, GETPROVS+8, GETPROVS+13*, GETPROVS+14, GETPROVS+15, GETPROVS+20*, GETPROVS+21, GETPROVS+22 , GETPROVS+27*, GETPROVS+28, GETPROVS+29, GETPROVS+34*, GETPROVS+35, GETPROVS+36 |
| TPRI | PROVST+26~, PROVST+27*, PROVST+28*, PROVST+29 |
| U | PTPROV+48, PTPROV+52, PTPROV+56, PROVST+14, PROVST+15, PROVST+29, GETPROVS+7, GETPROVS+14, GETPROVS+21, GETPROVS+28 , GETPROVS+35 |
| UID | PTPROV+13~, PTPROV+16*, PTPROV+17 |
| VPRVIEN | PROVST+2~, PROVST+8*, PROVST+9*, PROVST+10 |
| VSPROV | PROVST+2~, PROVST+10*, PROVST+11 |
| VSTIEN | PROVST+2~, PROVST+5*, PROVST+6*, PROVST+7, PROVST+9, PROVST+15 |
| WHPROV | GETPROVS+2~, GETPROVS+31*, GETPROVS+35 |
| WHPROVI | GETPROVS+2~, GETPROVS+32*, GETPROVS+35 |
| X | PTPROV+13~ |
| Y | ERR+2~, ERR+3* |
| >> ZTSK | PTPROV+16 |