IBATFILE ;LL/ELZ - TRANSFER PRICING FILLING ; 22-JAN-1999
Source file <IBATFILE.m>
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PAT(DA,IBFAC,IBOVER) | ; files patient in transfer pricing returns dfn
|
|
| UPPPF(DA,PPF) | ; updates a patient's enrolled facility
|
|
| ADM(DFN,IBADMDT,IBPREF,IBSOURCE) | ; - files admissions
; IBADMDT=admission date, IBPREF=enrolled facility ; IBSOURCE=source (movement ien;DGPM( |
|
| DIS(DA,IBDISDT,IBPTF,IBDISM) | ; - files discharges
; DA=transaction ien in 351.61, IBDISDT=discharge date ; IBPTF=ptf pointer, IBDISM=discharge movement pointer |
|
| DISC(DA) | ; - deletes discharge data
; DA=transaction ien in 351.61 |
|
| 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 |
|
| 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) |
|
| UPDATE(IBIEN,IBPROC) | ; -- updates procedures
; IBIEN=351.61 ien, IBPROC=procedures by ref like above |
|
| 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 |
|
| 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 |
|
| CANC(DA) | ; - used to cancel any transaction
|
|
| DEL(DA) | ; - used to delete a transaction (only valid for inpatients or rx)
|
|
| NEW(DFN,IBEDT,IBPREF,IBSOURCE) | ; - creates new transaction and returns ien
|
|
| PROC(IBIEN,IBPROC,IBPRICE) | ; files procedures
|
|
| DX(IBIEN,IBPTF) | ; - files dx info
|
|
| INIT | ; called to possibly initialize the 351.6 file if not done
|
|
| ADDTP | ; Add Transfer Pricing patients to file #351.6
|
| 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 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^IBAT(351.6 - [#351.6] | Classic Fileman Calls |
| ^IBAT(351.61 - [#351.61] | Classic Fileman Calls |
| 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 |
| 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 |
| >> | 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 |
