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, DQ+49 |
| $$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 |
| U | PAUSE+9 |
| >> VADM(1 | PAUSE+9 |
| >> VADM(3 | 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* |