FBUTL136 ;DSS/LJF - FEE BASIS UTILITY FOR UNIQUE CLAIM ID - FEE5010 (overflow from FBUTL135) ;3/23/2012
Source file <FBUTL136.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 |
Package | Total | Caller Graph |
---|---|---|
Fee Basis | 5 | FBAACO FBCH EDIT PAYMENT FBCH EDIT ROC FBCHEP FBUTL5 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ENTROUTP(DFN,FBV,FBAAVID,FBCLAIMS) | ; OUTPATIENT ENTER UCID
; Input: DFN - Patient ID ; FBV - Vendor IEN ; FBAAVID - Vendor Invoice Date ; FBCLAIMS - FPPS claim id ; Output: returns UCID |
|
EDITOUTP(FBXSTR,FBDA) | ;
; Inputs: FBXSTR = FPPS CLAIM ID entered by user ; FBDA = DA variable containing SERVICE PROVIDED, INITIAL TREATMENT DATE, VENDOR, PATIENT |
|
OUTPHELP(DFN,FBV) | ; ?? response
|
|
ENTINPAT(FBSTA,FBSRC,FBINT,FBCLT,FBCLAIMS,FBVEND) | ;Returns UCID; FB*3.5*135
; Input: FBSTA = Station ; FBSRC = Source ; FBINT = Initiation Type ; FBCLT = Claim Type ; FBCLAIMS = FPPS CLAIM ID - replaces sequence number ; FBVEND = Vendor IEN |
|
ENTHELP(FBVEND,FBTOUT,FBUOUT) | ; Help for UCID in "FBCH ENTER PAYMENT" ; FB*3.5*135
|
|
EDINPAT(FBXSTR,FBI) | ; EDIT UNIQUE CLAIM ID for FEE BASIS INVOICE file - 162.5
; Input: FBXSTR = FPPS value entered by user for FPPS ; FBI = IEN of Invoice record |
Name | Field # of Occurrence |
---|---|
FILE^DIE | EDITOUTP+25, EDINPAT+18 |
$$GET1^DIQ | EDITOUTP+15, EDITOUTP+27, OUTPHELP+17, EDINPAT+7, EDINPAT+20 |
GETS^DIQ | ENTHELP+11 |
^DIR | OUTPHELP+33, OUTPHELP+41, ENTHELP+34, ENTHELP+43 |
$$INVUCID^FBUTL135 | EDINPAT+13, EDINPAT+29, EDINPAT+68 |
$$OCLMTYP^FBUTL135 | ENTROUTP+14, ENTROUTP+21, ENTROUTP+33, EDITOUTP+20, EDITOUTP+73 |
$$PAYUCID^FBUTL135 | EDITOUTP+21, EDITOUTP+37, EDITOUTP+75 |
$$STATION^FBUTL135 | EDITOUTP+14, EDINPAT+7 |
$$UCLAIMNO^FBUTL135 | ENTROUTP+15, ENTROUTP+20, ENTROUTP+32, EDITOUTP+54, EDITOUTP+66, ENTINPAT+16, ENTINPAT+18, ENTINPAT+26, EDINPAT+44, EDINPAT+57 |
$$VALIDATE^FBUTL135 | EDITOUTP+40, OUTPHELP+14, ENTHELP+15, EDINPAT+32 |
$$FMTE^XLFDT | OUTPHELP+17 |
$$HTE^XLFDT | ENTROUTP+13, EDITOUTP+18, ENTINPAT+15, EDINPAT+12 |
Name | Line Occurrences |
---|---|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
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 |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^FBAAC - [#162] | OUTPHELP+10, OUTPHELP+11, OUTPHELP+12 |
^FBAAI("AG" | ENTHELP+9, ENTHELP+10 |
Name | Line Occurrences |
---|---|
$$ENTHELP | ENTINPAT+19, EDINPAT+46 |
$$ENTINPAT | EDINPAT+23 |
$$ENTROUTP | EDITOUTP+31 |
$$OUTPHELP | ENTROUTP+23, EDITOUTP+56 |
EDINPAT | EDINPAT+69 |
EDITOUTP | EDITOUTP+84 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
C | EDITOUTP+13~, EDITOUTP+14*, EDITOUTP+15, EDITOUTP+25, EDITOUTP+27, OUTPHELP+4~, OUTPHELP+8*, OUTPHELP+17 |
CLMID | OUTPHELP+5~, OUTPHELP+18*, OUTPHELP+19, OUTPHELP+22, ENTHELP+3~, ENTHELP+18*, ENTHELP+24 |
CLMTYP | OUTPHELP+5~, OUTPHELP+16*, OUTPHELP+22 |
CNT | OUTPHELP+5~, OUTPHELP+8*, OUTPHELP+28*, OUTPHELP+29, OUTPHELP+30, OUTPHELP+31, OUTPHELP+33, OUTPHELP+41*, ENTHELP+3~, ENTHELP+7* , ENTHELP+29*, ENTHELP+30, ENTHELP+31, ENTHELP+32, ENTHELP+34, ENTHELP+43* |
CNT( | OUTPHELP+30*, OUTPHELP+45, ENTHELP+31*, ENTHELP+48 |
DA | EDITOUTP+4~, EDITOUTP+78~, EDITOUTP+79*, EDITOUTP+84, OUTPHELP+32~, OUTPHELP+40~, ENTHELP+33~, ENTHELP+42~ |
DA(1 | EDITOUTP+80* |
DA(2 | EDITOUTP+81* |
DA(3 | EDITOUTP+82* |
DFN | ENTROUTP~, ENTROUTP+8, ENTROUTP+23, OUTPHELP~, OUTPHELP+1, OUTPHELP+10, OUTPHELP+11, OUTPHELP+12, OUTPHELP+17, ENTHELP+1 , ENTHELP+9, ENTHELP+10 |
DIR | OUTPHELP+32~, OUTPHELP+40~, ENTHELP+33~, ENTHELP+42~ |
DIR("A" | OUTPHELP+33*, OUTPHELP+41*, ENTHELP+34*, ENTHELP+43* |
DIR(0 | OUTPHELP+33*, OUTPHELP+41*, ENTHELP+34*, ENTHELP+43* |
DIROUT | OUTPHELP+4~, ENTHELP+4~ |
DIRUT | OUTPHELP+4~, ENTHELP+4~ |
DR | EDITOUTP+4~ |
DTG | OUTPHELP+3~, OUTPHELP+8*, ENTHELP+3~, ENTHELP+7*, ENTHELP+9*, ENTHELP+10 |
DTIME | ENTROUTP+8*, ENTROUTP+17, EDITOUTP+50, ENTINPAT+17, EDINPAT+42 |
DTOUT | EDITOUTP+68*, OUTPHELP+4~, OUTPHELP+28, OUTPHELP+36, OUTPHELP+37!, OUTPHELP+43, OUTPHELP+44!, ENTINPAT+11!, ENTINPAT+29*, ENTHELP+4~ , ENTHELP+29, ENTHELP+37, ENTHELP+45, EDINPAT+24, EDINPAT+59* |
DUOUT | OUTPHELP+4~, OUTPHELP+28, OUTPHELP+36, OUTPHELP+37!, OUTPHELP+43, OUTPHELP+44!, ENTINPAT+30*, ENTHELP+4~, ENTHELP+29, ENTHELP+37 , ENTHELP+45, EDINPAT+24, EDINPAT+60* |
E7 | OUTPHELP+3~, ENTHELP+3~, ENTHELP+18*, ENTHELP+19*, ENTHELP+20*, ENTHELP+24 |
E7TEXT | OUTPHELP+3~, ENTHELP+3~ |
E7TEXT( | ENTHELP+19 |
E7TEXT("E" | OUTPHELP+7*, ENTHELP+6* |
E7TEXT("M" | OUTPHELP+7*, ENTHELP+6* |
E7TEXT("S" | OUTPHELP+7*, ENTHELP+6* |
FBAAVID | ENTROUTP~, ENTROUTP+8 |
FBANS | ENTROUTP+17*, ENTROUTP+18*, ENTROUTP+19, ENTROUTP+20*, ENTROUTP+21*, ENTROUTP+22, ENTROUTP+23*, ENTROUTP+24*, ENTROUTP+25*, ENTROUTP+26* , ENTROUTP+30, ENTROUTP+31*, ENTROUTP+32*, ENTROUTP+33*, ENTROUTP+34*, EDITOUTP+50*, EDITOUTP+51, EDITOUTP+52*, EDITOUTP+53, EDITOUTP+54* , EDITOUTP+55, EDITOUTP+56*, EDITOUTP+57*, EDITOUTP+58*, EDITOUTP+59*, EDITOUTP+60*, EDITOUTP+64*, EDITOUTP+65, EDITOUTP+66*, EDITOUTP+67* , ENTINPAT+10~, ENTINPAT+12*, ENTINPAT+17*, ENTINPAT+18*, ENTINPAT+19*, ENTINPAT+20*, ENTINPAT+21*, ENTINPAT+25, ENTINPAT+26*, ENTINPAT+27* , EDINPAT+42*, EDINPAT+43*, EDINPAT+44*, EDINPAT+45, EDINPAT+46*, EDINPAT+47*, EDINPAT+49, EDINPAT+50*, EDINPAT+51*, EDINPAT+52* , EDINPAT+56*, EDINPAT+57*, EDINPAT+58*, EDINPAT+62, EDINPAT+63*, EDINPAT+64, EDINPAT+65, EDINPAT+66, EDINPAT+67*, EDINPAT+68 |
FBCLAIMS | ENTROUTP~, ENTROUTP+8*, ENTROUTP+11*, ENTROUTP+12, ENTROUTP+13*, ENTROUTP+15*, ENTROUTP+17*, ENTROUTP+35, EDITOUTP+13~, EDITOUTP+50* , EDITOUTP+69, EDITOUTP+70, EDITOUTP+71, EDITOUTP+72, EDITOUTP+73, EDITOUTP+74*, EDITOUTP+75*, EDITOUTP+76*, ENTINPAT~, ENTINPAT+12* , ENTINPAT+13*, ENTINPAT+14, ENTINPAT+15*, ENTINPAT+16*, ENTINPAT+17*, ENTINPAT+28, EDINPAT+6~, EDINPAT+42* |
FBCLT | ENTROUTP+7~, ENTROUTP+8*, ENTROUTP+14*, ENTROUTP+15, ENTROUTP+24*, ENTROUTP+32, ENTROUTP+34*, EDITOUTP+13~, EDITOUTP+20*, EDITOUTP+21 , EDITOUTP+35*, EDITOUTP+37, EDITOUTP+45*, EDITOUTP+57*, EDITOUTP+66, EDITOUTP+73*, EDITOUTP+75, ENTINPAT~, ENTINPAT+12*, ENTINPAT+16 , ENTINPAT+18, ENTINPAT+26, EDINPAT+6~, EDINPAT+37*, EDINPAT+44, EDINPAT+57 |
FBDA | EDITOUTP~, EDITOUTP+5, EDITOUTP+12~ |
FBDA(1 | EDITOUTP+6 |
FBDA(2 | EDITOUTP+7 |
FBDA(3 | EDITOUTP+8 |
FBDATA | EDITOUTP+13~, EDINPAT+6~ |
FBDOS | OUTPHELP+5~, OUTPHELP+9*, OUTPHELP+10*, OUTPHELP+11, OUTPHELP+12, OUTPHELP+17 |
FBFPPSCL | EDINPAT+6~ |
FBHOLD | EDITOUTP+13~, EDITOUTP+14*, EDITOUTP+46*, EDITOUTP+64, EDINPAT+6~, EDINPAT+7*, EDINPAT+38*, EDINPAT+56 |
FBI | EDINPAT~, EDINPAT+7*, EDINPAT+8, EDINPAT+13, EDINPAT+18, EDINPAT+20, EDINPAT+29, EDINPAT+68, EDINPAT+69 |
FBICLAIM | EDITOUTP+13~, EDITOUTP+14*, EDITOUTP+18*, EDITOUTP+21*, EDITOUTP+25!*, EDITOUTP+27*, EDITOUTP+28*, EDITOUTP+30, EDITOUTP+31*, EDITOUTP+32 , EDITOUTP+33, EDITOUTP+34, EDITOUTP+35, EDITOUTP+36*, EDITOUTP+37*, EDITOUTP+40*, EDITOUTP+42, EDITOUTP+43, EDITOUTP+44, EDITOUTP+45 , EDITOUTP+46*, EDITOUTP+48, EDITOUTP+51, EDITOUTP+52, EDINPAT+6~, EDINPAT+7*, EDINPAT+12*, EDINPAT+13*, EDINPAT+18!*, EDINPAT+20* , EDINPAT+22, EDINPAT+23*, EDINPAT+24, EDINPAT+25, EDINPAT+26, EDINPAT+27, EDINPAT+28*, EDINPAT+29*, EDINPAT+32*, EDINPAT+34 , EDINPAT+35, EDINPAT+36, EDINPAT+38*, EDINPAT+40, EDINPAT+43, EDINPAT+68*, EDINPAT+69 |
FBICLAIM( | EDITOUTP+25*, EDINPAT+18* |
FBINT | EDITOUTP+13~, EDITOUTP+44*, EDITOUTP+66, EDITOUTP+72*, EDITOUTP+75, OUTPHELP+3~, ENTINPAT~, ENTINPAT+12*, ENTINPAT+26, ENTHELP+3~ , ENTHELP+11!, EDINPAT+6~, EDINPAT+27*, EDINPAT+29, EDINPAT+36*, EDINPAT+44, EDINPAT+57, EDINPAT+66*, EDINPAT+68 |
FBINT("162.5" | ENTHELP+12, ENTHELP+13, ENTHELP+14, ENTHELP+15, ENTHELP+16, ENTHELP+17 |
FBINTYP | EDITOUTP+4~, EDITOUTP+34*, EDITOUTP+37, EDITOUTP+54* |
FBIX | OUTPHELP+3~, ENTHELP+3~, ENTHELP+9*, ENTHELP+10*, ENTHELP+11, ENTHELP+12, ENTHELP+13, ENTHELP+14, ENTHELP+15, ENTHELP+16 , ENTHELP+17, ENTHELP+24 |
FBPAT | EDITOUTP+4~, EDITOUTP+8*, EDITOUTP+10, EDITOUTP+15, EDITOUTP+21, EDITOUTP+25, EDITOUTP+27, EDITOUTP+31, EDITOUTP+37, EDITOUTP+56 , EDITOUTP+75, EDITOUTP+82 |
FBPRMPT | EDITOUTP+13~, EDITOUTP+48*, EDITOUTP+49*, EDITOUTP+50, EDINPAT+6~, EDINPAT+40*, EDINPAT+41*, EDINPAT+42 |
FBRETVAL | ENTINPAT+10~, ENTINPAT+12* |
FBSERVSE | EDITOUTP+4~, EDITOUTP+5*, EDITOUTP+10, EDITOUTP+15, EDITOUTP+21, EDITOUTP+25, EDITOUTP+27, EDITOUTP+37, EDITOUTP+75, EDITOUTP+79 |
FBSITE | EDITOUTP+13~, EDITOUTP+66, EDINPAT+6~, EDINPAT+25*, EDINPAT+29, EDINPAT+34*, EDINPAT+57 |
FBSRC | EDITOUTP+13~, EDITOUTP+33*, EDITOUTP+37, EDITOUTP+43*, EDITOUTP+54*, EDITOUTP+66, EDITOUTP+71*, EDITOUTP+75, ENTINPAT~, ENTINPAT+12* , ENTINPAT+16, ENTINPAT+18, ENTINPAT+26, EDINPAT+6~, EDINPAT+26*, EDINPAT+29, EDINPAT+35*, EDINPAT+44, EDINPAT+57, EDINPAT+65* , EDINPAT+68 |
FBSTA | ENTROUTP+15, EDITOUTP+13~, EDITOUTP+14*, EDITOUTP+21, EDITOUTP+32*, EDITOUTP+37, EDITOUTP+42*, EDITOUTP+54*, EDITOUTP+70*, EDITOUTP+75 , ENTINPAT~, ENTINPAT+12*, ENTINPAT+16, ENTINPAT+18, ENTINPAT+26, EDINPAT+6~, EDINPAT+7*, EDINPAT+13, EDINPAT+34, EDINPAT+44 , EDINPAT+63, EDINPAT+64*, EDINPAT+68 |
FBSVC | OUTPHELP+5~, OUTPHELP+10*, OUTPHELP+11*, OUTPHELP+12, OUTPHELP+22 |
FBTDTG | EDITOUTP+4~, EDITOUTP+6*, EDITOUTP+10, EDITOUTP+15, EDITOUTP+21, EDITOUTP+25, EDITOUTP+27, EDITOUTP+31, EDITOUTP+37, EDITOUTP+75 , EDITOUTP+80 |
FBTOUT | ENTROUTP+7~, ENTROUTP+8*, ENTROUTP+17*, ENTROUTP+18, EDITOUTP+49*, EDITOUTP+50*, EDITOUTP+68, OUTPHELP+6*, ENTINPAT+10~, ENTINPAT+12* , ENTINPAT+17*, ENTINPAT+19, ENTINPAT+28, ENTINPAT+29, ENTHELP~, ENTHELP+5*, ENTHELP+37*, ENTHELP+38, ENTHELP+45*, ENTHELP+46 , EDINPAT+41*, EDINPAT+42*, EDINPAT+43, EDINPAT+46, EDINPAT+47*, EDINPAT+59, EDINPAT+61 |
FBUOUT | ENTINPAT+12*, ENTINPAT+19*, ENTINPAT+28, ENTINPAT+30, ENTHELP~, ENTHELP+5*, ENTHELP+37*, ENTHELP+38, ENTHELP+45*, ENTHELP+46 , EDINPAT+41*, EDINPAT+42, EDINPAT+46, EDINPAT+48, EDINPAT+60, EDINPAT+61 |
FBV | ENTROUTP~, ENTROUTP+8, ENTROUTP+23, OUTPHELP~, OUTPHELP+1, OUTPHELP+10, OUTPHELP+11, OUTPHELP+12, OUTPHELP+17 |
FBVEND | EDITOUTP+4~, EDITOUTP+7*, EDITOUTP+10, EDITOUTP+15, EDITOUTP+21, EDITOUTP+25, EDITOUTP+27, EDITOUTP+31, EDITOUTP+37, EDITOUTP+56 , EDITOUTP+75, EDITOUTP+81, ENTINPAT~, ENTINPAT+12*, ENTINPAT+19, ENTHELP~, ENTHELP+1, ENTHELP+12, EDINPAT+6~, EDINPAT+7* , EDINPAT+23, EDINPAT+46 |
FBVENDT | OUTPHELP+3~, OUTPHELP+17*, OUTPHELP+20, OUTPHELP+22 |
>> FBX | EDINPAT+59*, EDINPAT+60* |
FBXSTR | EDITOUTP~, EDITOUTP+9*, EDITOUTP+10, EDITOUTP+17, EDITOUTP+18, EDITOUTP+23, EDITOUTP+68*, EDITOUTP+83*, EDITOUTP+84, EDINPAT~ , EDINPAT+7*, EDINPAT+8, EDINPAT+11, EDINPAT+12, EDINPAT+16, EDINPAT+69 |
FBYEAR | OUTPHELP+5~, OUTPHELP+17* |
FPPSCLM | EDITOUTP+13~, EDITOUTP+15*, EDITOUTP+25, EDINPAT+6~, EDINPAT+7*, EDINPAT+18 |
OLINE | OUTPHELP+5~, OUTPHELP+19*, OUTPHELP+20*, OUTPHELP+21*, OUTPHELP+22, OUTPHELP+26!*, OUTPHELP+28*, OUTPHELP+30, ENTHELP+3~, ENTHELP+16!* , ENTHELP+21*, ENTHELP+22*, ENTHELP+23*, ENTHELP+24, ENTHELP+25!*, ENTHELP+29*, ENTHELP+31 |
OLINE(46 | ENTHELP+18, ENTHELP+22 |
OLINE(85 | ENTHELP+21, ENTHELP+23 |
RETDIR | OUTPHELP+3~, OUTPHELP+8*, OUTPHELP+28, OUTPHELP+35*, OUTPHELP+37*, OUTPHELP+39, OUTPHELP+42*, OUTPHELP+44*, OUTPHELP+45, OUTPHELP+46 , ENTHELP+3~, ENTHELP+7*, ENTHELP+29, ENTHELP+36*, ENTHELP+41, ENTHELP+44*, ENTHELP+48, ENTHELP+49 |
U | ENTROUTP+24, EDITOUTP+57, OUTPHELP+12, OUTPHELP+30, ENTHELP+31, ENTHELP+48 |
UCID | OUTPHELP+5~, OUTPHELP+12*, OUTPHELP+13, OUTPHELP+14, OUTPHELP+15, OUTPHELP+16, OUTPHELP+18, OUTPHELP+21 |
UCID("LIST" | OUTPHELP+22*, OUTPHELP+24, OUTPHELP+26 |
UCIDLIST | ENTHELP+3~, ENTHELP+17*, ENTHELP+18 |
UCIDLIST("LIST" | ENTHELP+24*, ENTHELP+25, ENTHELP+26 |
X | OUTPHELP+4~, OUTPHELP+35, OUTPHELP+42, ENTHELP+4~, ENTHELP+36, ENTHELP+44 |
Y | OUTPHELP+4~, ENTHELP+4~ |
YR | ENTHELP+3~, ENTHELP+18*, ENTHELP+24 |