IBOMTLTC ;OAKOIFO/ELZ-MT/LTC COPAY REMOTE QUERY ;20-AUG-2002
Source file <IBOMTLTC.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 5 | (,HOME)^%ZIS ^%ZISC ^%ZTLOAD ($$FMADD,$$FMTE)^XLFDT ($$LKUP,$$NNT)^XUAF4 |
VA FileMan | 4 | ^DIC $$EXTERNAL^DILFD GETS^DIQ ^DIR |
Integrated Billing | 2 | ($$DFN,$$ICN,$$TFL)^IBARXMU ($$DAT1,DATE)^IBOUTL |
RPC Broker | 2 | (EN1,RPCCHK)^XWB2HL7 (CLEAR,RTNDATA)^XWBDRPC |
Registration | 2 | (DEM,KVAR)^VADPT $$SITE^VASITE |
List Manager | 1 | $$SETSTR^VALM1 |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 2 | IB MT LTC REMOTE QUERY IBO MT LTC COPAY QUERY |
Name | Comments | DBIA/ICR reference |
---|---|---|
QUERY | ; main entry point for user to request a query of mt and ltc copay info
|
|
DQ | ; tasked entry point
|
|
PAUSE(IBNEW) | ;
; IBNEW = optional variable, it is a flag for new site |
|
RETURN(IBR,IBICN,DFN,IBBDT,IBEDT) | ;
; this is called from the main query for local data and from the remote ; procedure IBO MT LTC COPAY QUERY for remote data. The return is ; in a global array. ; if DFN then that will be used to identify the patient ; if no DFN, then the ICN (ibicn) needs to be there to identify patient |
|
SPACE(IBTEXT) | ; spaces out return info (sub-header info)
|
Name | Field # of Occurrence |
---|---|
^%ZIS | QUERY+15 |
HOME^%ZIS | QUERY+18 |
^%ZISC | DQ+44 |
^%ZTLOAD | QUERY+18 |
^DIC | QUERY+4 |
$$EXTERNAL^DILFD | RETURN+57 |
GETS^DIQ | RETURN+19, RETURN+25 |
^DIR | QUERY+11, DQ+42, PAUSE+6 |
$$DFN^IBARXMU | RETURN+12 |
$$ICN^IBARXMU | QUERY+9 |
$$TFL^IBARXMU | QUERY+8 |
$$DAT1^IBOUTL | RETURN+63, RETURN+64 |
DATE^IBOUTL | QUERY+6 |
DEM^VADPT | DQ+8 |
KVAR^VADPT | DQ+46 |
$$SETSTR^VALM1 | RETURN+63, RETURN+64, RETURN+65, RETURN+66, RETURN+67, RETURN+68 |
$$SITE^VASITE | DQ+7 |
$$FMADD^XLFDT | RETURN+17 |
$$FMTE^XLFDT | PAUSE+8, RETURN+27 |
$$LKUP^XUAF4 | DQ+29, DQ+30, DQ+32 |
$$NNT^XUAF4 | DQ+38 |
EN1^XWB2HL7 | DQ+14 |
RPCCHK^XWB2HL7 | DQ+24 |
CLEAR^XWBDRPC | DQ+31 |
RTNDATA^XWBDRPC | DQ+28 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
RPC Name | Call Tags |
---|---|
IBO MT LTC COPAY QUERY | RETURN |
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
^IB - [#350] | EXTERNAL^DILFD |
^IBE(351 - [#351] | GETS^DIQ |
^IBA(351.81 - [#351.81] | GETS^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IB - [#350] | RETURN+39, RETURN+46, RETURN+55 |
^IB("ACVA" | RETURN+44 |
^IB("AD" | RETURN+45 |
^IB("AF" | RETURN+38 |
^IB("AFDT" | RETURN+37 |
^IBA(351.81 - [#351.81] | RETURN+22, RETURN+23, RETURN+27 |
^IBE(350.1 - [#350.1] | RETURN+58 |
^IBE(351 - [#351] | RETURN+15, RETURN+16 |
^IBE(352.5 - [#352.5] | RETURN+61 |
^TMP("IBECEA" | RETURN+36!, RETURN+42*, RETURN+48*, RETURN+52, RETURN+53, RETURN+54, RETURN+71! |
^TMP("IBOMTLTC" | DQ+2!, DQ+19, DQ+29*, DQ+30*, DQ+32*, DQ+37, DQ+40, DQ+46!, RETURN+9 |
^TMP($J | DQ+30! |
Name | Field # of Occurrence |
---|---|
^( | DQ+40 |
^(0 | RETURN+39, RETURN+46 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%ZIS | QUERY+2~, QUERY+15* |
DFN | QUERY+2~, QUERY+4*, QUERY+8, QUERY+9, DQ+19, RETURN~, RETURN+12*, RETURN+15, RETURN+22, RETURN+37 , RETURN+44 |
DIC | QUERY+2~, QUERY+4* |
DIC(0 | QUERY+4* |
DIR | QUERY+2~, DQ+42!, PAUSE+3~ |
DIR("A" | QUERY+11* |
DIR("B" | QUERY+11* |
DIR(0 | QUERY+11*, DQ+42*, PAUSE+6* |
DIROUT | QUERY+2~, PAUSE+3~ |
DIRUT | QUERY+2~, QUERY+11, PAUSE+3~, PAUSE+6 |
DTOUT | QUERY+2~, PAUSE+3~ |
DUOUT | QUERY+2~ |
IBA | RETURN+7~, RETURN+30*, RETURN+31, RETURN+32 |
>> IBATYP | RETURN+58*, RETURN+59*, RETURN+61*, RETURN+62, RETURN+65 |
IBAX | RETURN+7~, RETURN+63*, RETURN+64*, RETURN+65*, RETURN+66*, RETURN+67*, RETURN+68*, RETURN+69, RETURN+70 |
IBBDT | QUERY+2~, DQ+14, DQ+19, PAUSE+8, RETURN~, RETURN+18, RETURN+24, RETURN+41, RETURN+47 |
IBC | DQ+1~, DQ+24* |
IBCHG | RETURN+7~, RETURN+62*, RETURN+68 |
IBD | RETURN+7~, RETURN+53*, RETURN+54, RETURN+63, RETURN+64 |
IBEDT | QUERY+2~, QUERY+6, DQ+14, DQ+19, PAUSE+8, RETURN~, RETURN+18, RETURN+24, RETURN+37, RETURN+41 , RETURN+44, RETURN+47 |
IBF | RETURN+7~, RETURN+27*, RETURN+30*, RETURN+31, RETURN+32 |
IBFRDT | RETURN+7~, RETURN+27* |
IBH | DQ+1~, DQ+14 |
IBH(0 | DQ+15, DQ+16 |
IBHERE | DQ+1~, DQ+27!, DQ+28, DQ+29 |
IBICN | QUERY+2~, QUERY+9*, DQ+14, RETURN~, RETURN+12 |
IBL | RETURN+7~, RETURN+11*, RETURN+31*, RETURN+32, RETURN+52*, RETURN+56*, RETURN+69, RETURN+70, SPACE+1*, SPACE+2* |
IBNEW | PAUSE~, PAUSE+5 |
IBP | DQ+1~, DQ+36*, PAUSE+5, PAUSE+6, PAUSE+7*, PAUSE+8 |
IBQ | DQ+1~, DQ+36*, DQ+37, DQ+40, DQ+42, PAUSE+4, PAUSE+6* |
IBR | DQ+15*, DQ+24, DQ+27!, RETURN~, RETURN+9*, RETURN+12, RETURN+31, RETURN+32, RETURN+52, RETURN+69 , RETURN+70, SPACE+1*, SPACE+2* |
IBR(0 | DQ+24, DQ+26 |
IBS | DQ+1~, DQ+7*, DQ+19, DQ+37*, DQ+38, DQ+40, RETURN+7~, RETURN+32* |
IBS(0 | DQ+38*, PAUSE+9 |
IBSTAT | RETURN+7~, RETURN+57*, RETURN+67 |
IBT | QUERY+2~, QUERY+8*, QUERY+9*, QUERY+11*, QUERY+13, DQ+11, DQ+22, RETURN+7~ |
IBT( | RETURN+27*, RETURN+30, RETURN+31, RETURN+32 |
IBTEXT | SPACE~, SPACE+2 |
IBTFL | QUERY+2~, QUERY+8, QUERY+9!, QUERY+13 |
IBTFL( | DQ+11, DQ+13, DQ+14, DQ+16*, DQ+22, DQ+24, DQ+28, DQ+29, DQ+30, DQ+31 , DQ+32 |
IBTYP | RETURN+7~ |
IBX | DQ+1~, DQ+11*, DQ+13, DQ+14, DQ+16, DQ+22*, DQ+24, DQ+28, DQ+29, DQ+30 , DQ+31, DQ+32, DQ+40*, RETURN+7~, RETURN+15*, RETURN+16, RETURN+19, RETURN+22*, RETURN+23, RETURN+25 , RETURN+27, RETURN+30*, RETURN+31, RETURN+32, RETURN+38*, RETURN+39, RETURN+42, RETURN+45*, RETURN+46, RETURN+48 , RETURN+54*, RETURN+55 |
IBZ | DQ+31, RETURN+7~, RETURN+16*, RETURN+17*, RETURN+18, RETURN+23*, RETURN+24, RETURN+39*, RETURN+40, RETURN+41 , RETURN+42, RETURN+46*, RETURN+47, RETURN+55*, RETURN+57, RETURN+58, RETURN+61, RETURN+62, RETURN+64, RETURN+66 |
IO | DQ+36 |
IO("Q" | QUERY+16, QUERY+18! |
IOF | PAUSE+8 |
IOM | PAUSE+8, PAUSE+10 |
IOSL | PAUSE+5 |
IOST | DQ+42, PAUSE+6 |
POP | QUERY+2~, QUERY+15 |
>> VADM(1 | PAUSE+9 |
>> VADM(2 | PAUSE+9 |
X | QUERY+2~, PAUSE+3~, PAUSE+10* |
Y | QUERY+2~, QUERY+4, QUERY+11, PAUSE+3~, RETURN+7~, RETURN+37*, RETURN+44*, RETURN+48 |
Y1 | RETURN+7~, RETURN+37*, RETURN+38, RETURN+44*, RETURN+45 |
ZTDESC | QUERY+2~, QUERY+17* |
>> ZTQUEUED | DQ+13, DQ+47 |
ZTREQ | QUERY+2~, DQ+47* |
ZTRTN | QUERY+2~, QUERY+17* |
ZTSAVE | QUERY+2~ |
ZTSAVE("DFN" | QUERY+18* |
ZTSAVE("IB*" | QUERY+18* |