Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: IBATFILE

Package: Integrated Billing

Routine: IBATFILE


Information

IBATFILE ;LL/ELZ - TRANSFER PRICING FILLING ; 22-JAN-1999

Source Information

Source file <IBATFILE.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 3 FILE^DICN  ^DIE  ^DIK  
Integrated Billing 2 TOTAL^IBATCM  ($$PPF,$$SITE,$$TPP)^IBATUTL  
Kernel 2 ^%ZTLOAD  $$NOW^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Integrated Billing 8 IBATEI  IBATEI1  IBATEO  IBATEP  IBATER  IBATLM0A  IBATLM1B  IBATUTL  

Entry Points

Name Comments DBIA/ICR reference
ADDTP ; Add Transfer Pricing patients to file #351.6
PAT(DA,IBFAC,IBOVER) ; files patient in transfer pricing returns dfn
INPT(IBIEN,IBDRG,IBDRGA,IBLOS,IBHIGH,IBOUT,IBOUTR) ; - file remaining inpt
; IBIEN=transaction ien in 351.61, IBDRG=DRG pointer
; IBDRGA=DRG amount,IBLOS=inpatient LOS,IBHIGH=high trim days
; IBOUT=outlier days,IBOUTR=outlier rate
NEW(DFN,IBEDT,IBPREF,IBSOURCE) ; - creates new transaction and returns ien
OUT(DFN,IBEDT,IBPREF,IBSOURCE,IBPROC) ; - files outpatient data
; DFN=dfn for patient, IBEDT=event date, IBPREF=enrolled facility
; IBSOURCE=source (outpatient encounter ien;SCE(
; IBPROC=procedures (by ref in array)
DEL(DA) ; - used to delete a transaction (only valid for inpatients or rx)
PROC(IBIEN,IBPROC,IBPRICE) ; files procedures
RX(DFN,IBEDT,IBPREF,IBSOURCE,IBDRUG,IBQTY,IBCOST) ; - files pharmacy data
; DFN=dfn for patient, IBEDT=event date, IBPREF=enrolled facility
; IBSOURCE=source (prescription ien;PSRX(;refill #
; IBDRUG=ien from drug file
; IBQTY=quantity of drug, IBCOST=drug cost
CANC(DA) ; - used to cancel any transaction
ADM(DFN,IBADMDT,IBPREF,IBSOURCE) ; - files admissions
; IBADMDT=admission date, IBPREF=enrolled facility
; IBSOURCE=source (movement ien;DGPM(
RMPR(DFN,IBEDT,IBPREF,IBSOURCE,IBPROS,IBCOST) ; - files prost. data
; DFN=dfn for patient, IBEDT=event date, IBPREF=enrolled facility
; IBSOURCE=source (prost ien;RMPR(660,
; IBPROS=ien from file 661 - removed in 389 no longer valid
; IBCOST=item cost
INIT ; called to possibly initialize the 351.6 file if not done
UPDATE(IBIEN,IBPROC) ; -- updates procedures
; IBIEN=351.61 ien, IBPROC=procedures by ref like above
UPPPF(DA,PPF) ; updates a patient's enrolled facility
DX(IBIEN,IBPTF) ; - files dx info
DISC(DA) ; - deletes discharge data
; DA=transaction ien in 351.61
DIS(DA,IBDISDT,IBPTF,IBDISM) ; - files discharges
; DA=transaction ien in 351.61, IBDISDT=discharge date
; IBPTF=ptf pointer, IBDISM=discharge movement pointer

External References

Name Field # of Occurrence
^%ZTLOAD INIT+11
FILE^DICN PAT+6, NEW+9, PROC+10, DX+7
^DIE UPPPF+3, DIS+8, DISC+6, INPT+12, INPT+13, OUT+12, UPDATE+16, RX+11, RMPR+11, CANC+2
, NEW+12
^DIK UPDATE+11, DEL+4
TOTAL^IBATCM INPT+12, OUT+12, UPDATE+16, RX+11, RMPR+11
$$PPF^IBATUTL PAT+5
$$SITE^IBATUTL NEW+2
$$TPP^IBATUTL ADDTP+6
$$NOW^XLFDT PAT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"It appears you have never used Transfer Pricing before. I need to populate",!,"the Transfer Pricing patient file. Please select a date/time to do this.",!
  • Line Location: INIT+10
Function Call: WRITE
  • Prompt: !,"Task Queued #",ZTSK
  • Line Location: INIT+12
Routine Call
  • DIE
  • Line Location:
    • UPPPF+3
    • DIS+8
    • DISC+6
    • INPT+12
    • INPT+13
    • OUT+12
    • UPDATE+16
    • RX+11
    • RMPR+11
    • CANC+2
    • NEW+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBAT(351.6 - [#351.6] Classic Fileman Calls
^IBAT(351.61 - [#351.61] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] ADDTP+13
^DPT - [#2] ADDTP+4, ADDTP+10
^IBAT(351.6 - [#351.6] PAT+2, UPPPF+1, NEW+3, NEW+9, NEW+12, NEW+13, INIT+3, ADDTP+12
^IBAT(351.61 - [#351.61] DIS+7, DIS+8, DISC+5, DISC+6, INPT+11, INPT+12, INPT+14, OUT+7, OUT+9, OUT+12
, UPDATE+4, UPDATE+9, UPDATE+11, UPDATE+13, UPDATE+16, RX+10, RX+12, RMPR+10, RMPR+12, DEL+2
, NEW+4, NEW+5, NEW+6, NEW+9, NEW+13, PROC+11
^IBE(350.9 - [#350.9] INIT+6

Label References

Name Line Occurrences
$$ADM ADDTP+14
$$CANC UPDATE+7
$$NEW ADM+4, OUT+6, RX+7, RMPR+7
$$OUT UPDATE+8
$$PROC OUT+8, UPDATE+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA PAT~, PAT+1, PAT+2, PAT+4, PAT+5, UPPPF~, UPPPF+1, DIS~, DIS+3, DIS+7
, DIS+8, DIS+9, DISC~, DISC+2, DISC+5, DISC+6, DISC+7, INPT+6*, OUT+10*, UPDATE+3~
, UPDATE+11*, UPDATE+14*, RX+8*, RMPR+8*, CANC~, CANC+1, DEL~, DEL+1, DEL+2, NEW+1~
, NEW+10*, PROC+3~
DA(1 UPDATE+11*, PROC+5*, DX+7*
DD PAT+3~, NEW+1~, PROC+3~, DX+3~
DFN ADM~, ADM+3, ADM+4, OUT~, OUT+4, OUT+6, RX~, RX+5, RX+7, RMPR~
, RMPR+5, RMPR+7, NEW~, NEW+3, NEW+8, NEW+9, NEW+10, NEW+12, NEW+13, ADDTP+2~
, ADDTP+4*, ADDTP+6, ADDTP+10, ADDTP+12, ADDTP+14
DIC PAT+3~, PAT+4*, NEW+1~, NEW+7*, PROC+3~, PROC+4*, DX+3~, DX+4*
DIC("DR" PAT+5*, NEW+8*, PROC+7*, PROC+8*
DIC(0 PAT+4*, NEW+7*, PROC+4*, DX+4*
DIE UPPPF+2~, UPPPF+3*, DIS+4~, DIS+5*, DISC+2~, DISC+3*, INPT+5~, INPT+6*, OUT+10*, UPDATE+3~
, UPDATE+14*, RX+8*, RMPR+8*, CANC+1~, CANC+2*, NEW+1~, NEW+10*
DIK UPDATE+11*, DEL+1~, DEL+4*
DINUM PAT+3~, PAT+4*, NEW+1~, NEW+7*, DX+3~
DLAYGO NEW+1~, NEW+7*
DO PAT+3~, NEW+1~, PROC+3~, DX+3~
DR UPPPF+2~, UPPPF+3*, DIS+4~, DIS+6*, DISC+2~, DISC+4*, INPT+5~, INPT+7*, INPT+8*, INPT+9*
, INPT+10*, INPT+13*, OUT+11*, UPDATE+3~, UPDATE+15*, RX+9*, RMPR+9*, CANC+1~, CANC+2*, DEL+1~
, NEW+1~, NEW+11*, NEW+12
DT INPT+13, OUT+11, UPDATE+15, RX+9, RMPR+9, NEW+8
IBADM ADDTP+2~, ADDTP+10*, ADDTP+11, ADDTP+13, ADDTP+14
IBADMDT ADM~, ADM+3, ADM+4, ADDTP+2~, ADDTP+13*, ADDTP+14
IBCOST RX~, RX+9, RX+11, RMPR~, RMPR+9, RMPR+11
IBDFN ADDTP+2~, ADDTP+6*, ADDTP+7
IBDISDT DIS~, DIS+3, DIS+6
IBDISM DIS~, DIS+3, DIS+6
IBDRG INPT~, INPT+8
IBDRGA INPT~, INPT+9
IBDRUG RX~, RX+5, RX+9
>> IBDX( DX+2, DX+4
IBEDT OUT~, OUT+4, OUT+6, OUT+11, UPDATE+4*, UPDATE+8, UPDATE+15, RX~, RX+5, RX+7
, RX+9, RMPR~, RMPR+5, RMPR+7, RMPR+9, NEW~, NEW+8, NEW+11, NEW+12
IBFAC PAT~, PAT+5
IBHIGH INPT~, INPT+4, INPT+7
IBIEN INPT~, INPT+4, INPT+6, INPT+11, INPT+12, INPT+14, INPT+15, OUT+5~, OUT+6*, OUT+7
, OUT+8*, OUT+9, OUT+10, OUT+12, OUT+13, UPDATE~, UPDATE+2, UPDATE+4, UPDATE+6, UPDATE+7*
, UPDATE+8*, UPDATE+9, UPDATE+11, UPDATE+12*, UPDATE+13, UPDATE+14, UPDATE+16, UPDATE+17, RX+6~, RX+7*
, RX+8, RX+10, RX+11, RX+12, RX+13, RMPR+6~, RMPR+7*, RMPR+8, RMPR+10, RMPR+11
, RMPR+12, RMPR+13, NEW+1~, NEW+5*, NEW+6*, NEW+7, NEW+14, PROC~, PROC+4, PROC+5
, PROC+11, PROC+12, DX~, DX+1, DX+4, DX+7, DX+8
IBIEN(0 UPDATE+4*, UPDATE+6, UPDATE+8
IBLOS INPT~, INPT+4, INPT+7
IBOUT INPT~, INPT+4, INPT+7
IBOUTR INPT~, INPT+10
IBOVER PAT~, PAT+5
IBPREF ADM~, ADM+3, ADM+4, OUT~, OUT+4, OUT+6, RX~, RX+5, RX+7, RMPR~
, RMPR+5, RMPR+7, NEW~, NEW+8, ADDTP+2~, ADDTP+12*, ADDTP+14
IBPRICE OUT+5~, OUT+8, OUT+11, UPDATE+3~, UPDATE+12, UPDATE+15, PROC~, PROC+9*
IBPROC OUT~, OUT+8, UPDATE~, UPDATE+8, UPDATE+12, PROC~
IBPROC( PROC+2, PROC+7, PROC+8
IBPROS RMPR~
IBPTF DIS~, DIS+3, DIS+6, DX~
IBQTY RX~, RX+5, RX+9
IBS INIT+1~, INIT+6*, INIT+7
IBSITE NEW+1~, NEW+2*, NEW+6, NEW+7
IBSOURCE ADM~, ADM+3, ADM+4, OUT~, OUT+4, OUT+6, RX~, RX+5, RX+7, RMPR~
, RMPR+5, RMPR+7, NEW~, NEW+11
IBX OUT+5~, UPDATE+3~, UPDATE+11*, PROC+2*, PROC+5, PROC+7, PROC+8, DX+2~*, DX+4, ADDTP+2~
, ADDTP+14*
PPF UPPPF~, UPPPF+1, UPPPF+3
X PAT+3~, PAT+4*, INPT+5~, UPDATE+3~, CANC+1~, DEL+1~, NEW+1~, NEW+7*, PROC+1~, PROC+3~
, PROC+5*, DX+3~, DX+4*, INIT+1~
Y PAT+7, INPT+5~, OUT+5~, UPDATE+3~, CANC+1~, DEL+1~, NEW+1~, NEW+9, PROC+1~, PROC+2*
, PROC+11, DX+2~*, DX+8, INIT+1~
Z DEL+1~, DEL+2*, DEL+3
ZTDESC INIT+1~, INIT+11*
ZTIO INIT+1~, INIT+11*
ZTRTN INIT+1~, INIT+11*
ZTSK INIT+1~, INIT+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All