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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: FBAAV0

Package: Fee Basis

Routine: FBAAV0


Information

FBAAV0 ;AISC/GRR - ELECTRONICALLY TRANSMIT FEE DATA ;3/22/2012

Source Information

Source file <FBAAV0.m>

Call Graph

Call Graph

Call Graph Total: 25

Package Total Call Graph
Fee Basis 17 LOADADJ^FBAAFA  LOADRR^FBAAFR  (CRARC,HD,STATION)^FBAAUTL  LOCK^FBAAUTL1  (PAT,POV)^FBAAUTL2  ($$CPT,$$MODL,MODDATA)^FBAAUTL4  $$SUB^FBAAUTL5  (ADDRESS,CKB3V,NEWMSG,STORE,STRING,XMIT)^FBAAV01  
(,KILL)^FBAAV1  ($$HL7NAME,DETP)^FBAAV2  ($$AUSAMT,$$AUSDT,DETT)^FBAAV3  ^FBAAV4  (,$$PSA)^FBAAV5  ^FBAAV8  $$ORGICN^FBAAVR5  $$ICD9^FBCSV1  
$$EN^FBNPILK  
VA FileMan 5 WAIT^DICD  DT^DICRW  ^DIE  ($$GET1,GETS)^DIQ  ^DIR  
DRG Grouper 1 $$CODEABA^ICDEX  
Kernel 1 ($$LJ,$$RJ)^XLFSTR  
Registration 1 ADD^VADPT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Fee Basis 6 FBAA QUEUE DATA FOR TRANS.  FBAARMRA  FBAAV2  FBAAV3  FBAAV5  FBPRE35  

Entry Points

Name Comments DBIA/ICR reference
RD
RTRAN ;Entry from Re-transmit MRA routine
END
SET1 ; build the payment batch header string (used by all four formats)
DET ;entry point to process B3 (outpatient/ancillary) batch
; input (partial list)
; J - Batch IEN in file 161.7
; FBAAON - last 4 of obligation number
; FBAASN - station number (formatted)
GOT ; process a B3 line item
AUTHOP2(DFN,FBSDT) ; get the outpatient authorization number
; input:
; DFN -> patient IEN
; FBSDT -> date of service
; output:
; authorization #, format: patient IEN-authorization IEN
AUTHOP1(IENS) ;get the authorization number from ^FB7078
CRARC(FBIENS,FBCRARC) ; load CARCs and RARCs
PYMTH(IEN) ; get Payment Methodology code - FB*3.5*158
UPD ; update the batch file
STORE
B3ADMIT(FBIENS) ; Determine Admission Date for a B3 payment line item
; input
; FBIENS - IENS (FileMan format) for subfile 162.03 entry
; returns admission date in internal FileMan format or null value

External References

Name Field # of Occurrence
WAIT^DICD RTRAN+2
DT^DICRW FBAAV0+6
^DIE UPD+4
$$GET1^DIQ B3ADMIT+7
GETS^DIQ AUTHOP1+4
^DIR RD
LOADADJ^FBAAFA CRARC+3
LOADRR^FBAAFR CRARC+4
CRARC^FBAAUTL CRARC+5
HD^FBAAUTL RTRAN+2
STATION^FBAAUTL RTRAN+2
LOCK^FBAAUTL1 RD+1
PAT^FBAAUTL2 GOT+70
POV^FBAAUTL2 GOT+36
$$CPT^FBAAUTL4 GOT+41
$$MODL^FBAAUTL4 GOT+16
MODDATA^FBAAUTL4 GOT+15
$$SUB^FBAAUTL5 SET1+10
ADDRESS^FBAAV01 RTRAN+1
CKB3V^FBAAV01 DET+6
NEWMSG^FBAAV01 DET+16
STORE^FBAAV01 DET+16, STORE
STRING^FBAAV01 GOT+103
XMIT^FBAAV01 DET+19
^FBAAV1 RTRAN+4
KILL^FBAAV1 END
$$HL7NAME^FBAAV2 GOT+75
DETP^FBAAV2 RTRAN+8
$$AUSAMT^FBAAV3 SET1+6, GOT+47, GOT+48
$$AUSDT^FBAAV3 SET1+3, GOT+44, GOT+62, GOT+63, GOT+73
DETT^FBAAV3 RTRAN+8
^FBAAV4 RTRAN+5
^FBAAV5 RTRAN+8
$$PSA^FBAAV5 GOT+42
^FBAAV8 RTRAN+6
$$ORGICN^FBAAVR5 DET+12
$$ICD9^FBCSV1 GOT+54
$$EN^FBNPILK GOT+34
$$CODEABA^ICDEX GOT+56
ADD^VADPT GOT+74
$$LJ^XLFSTR SET1+11, GOT+30, GOT+31, GOT+79, GOT+84, GOT+93
$$RJ^XLFSTR GOT+9, GOT+17, GOT+18, GOT+19, GOT+20, GOT+78, GOT+86

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"There are no transactions requiring transmission",*7
  • Line Location: FBAAV0+14
Function Call: WRITE
  • Prompt: !!,"This option will transmit all Batches and MRA's ready to be transmitted",!,"to Austin"
  • Line Location: FBAAV0+16
Function Call: WRITE
  • Prompt: !,+FBATCH
  • Line Location: RD+4
Routine Call
  • DIE
  • Line Location:
    • UPD+4
Routine Call
  • DIR
  • Line Location:
    • RD

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAA(161.7 - [#161.7] Classic Fileman Calls
162.03 GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] GOT+97, GOT+100
^DPT - [#2] GOT+69
^FB7078 - [#162.4] AUTHOP1+7, B3ADMIT+15
^FBAA(161.25 - [#161.25] FBAAV0+11, RTRAN+4
^FBAA(161.26 - [#161.26] FBAAV0+12, RTRAN+5
^FBAA(161.27 - [#161.27] GOT+46
^FBAA(161.43 - [#161.43] GOT+83
^FBAA(161.7 - [#161.7] FBAAV0+9, FBAAV0+10, RD+1, RD+2, RTRAN+8, END, SET1+7
^FBAA(161.82 - [#161.82] GOT+38
^FBAA(161.95 - [#161.95] GOT+29
^FBAA(161.96 - [#161.96] FBAAV0+13, RTRAN+6
^FBAA(163.85 - [#163.85] GOT+51
^FBAA(163.98 - [#163.98] PYMTH+7
^FBAAA - [#161] AUTHOP2+9, AUTHOP2+11, AUTHOP2+13, AUTHOP2+14
^FBAAC - [#162] DET+8, DET+10, DET+13, DET+14, DET+15, GOT+11
^FBAAC("AC" DET+8
^FBAAV - [#161.2] GOT+24
^IBE(353.1 - [#353.1] GOT+49
^IBE(353.2 - [#353.2] GOT+50
^TMP($J FBAAV0+6!, RD+4*, RTRAN+8

Label References

Name Line Occurrences
$$AUTHOP1 GOT+90
$$AUTHOP2 GOT+91
$$B3ADMIT GOT+63
$$PYMTH GOT+96
CRARC GOT+95
DET RTRAN+8
END RD, RTRAN+1, RTRAN+2
GOT DET+17
SET1 RTRAN+8
UPD DET+16

Naked Globals

Name Field # of Occurrence
^( PYMTH+7
^(0 RTRAN+8, GOT+38, GOT+46, GOT+97, GOT+100

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANUM AUTHOP2+7~, AUTHOP2+8*, AUTHOP2+9, AUTHOP2+11, AUTHOP2+13, AUTHOP2+16*, AUTHOP2+17
>> DA UPD+2*
DFN GOT+2~, GOT+66*, GOT+75, GOT+91, AUTHOP2~, AUTHOP2+9, AUTHOP2+11, AUTHOP2+13, AUTHOP2+14, AUTHOP2+16
>> DIC UPD+2*
>> DIE UPD+2*
DIR RD!
DIR("A" RD*
DIR("B" RD*
DIR(0 RD*
>> DR UPD+3*
DT SET1+3
>> FB AUTHOP1+5
>> FB( AUTHOP1+5, AUTHOP1+6
>> FB("ERROR" RTRAN+2
FB2DT AUTHOP2+7~, AUTHOP2+14*, AUTHOP2+15
FB7078 AUTHOP1+6*, AUTHOP1+7, B3ADMIT+5~, B3ADMIT+7*, B3ADMIT+13, B3ADMIT+15
>> FBAAAP SET1+6*, SET1+12
>> FBAABN SET1+1*, SET1+12
>> FBAABT RTRAN+8, SET1+5*, SET1+12
>> FBAACD SET1+3*, SET1+12
>> FBAACP SET1+4*, SET1+12
>> FBAAON SET1+2*
>> FBAASN SET1+11*, SET1+12, GOT+42
FBADJ GOT+2~, CRARC+2~, CRARC+3, CRARC+5
FBADJA1 GOT+2~
FBADJA2 GOT+2~
FBADJR1 GOT+2~
FBADJR2 GOT+2~
FBADMIT GOT+2~, GOT+63*
FBAMTC GOT+5~, GOT+48*
>> FBAP GOT+47*
>> FBATCH RD+2*, RD+3, RD+4
FBAUTHF GOT+2~, GOT+61*
FBAUTHNUM GOT+4~, GOT+88*, GOT+89, GOT+90*, GOT+91*, GOT+93*
FBC PYMTH+5~, PYMTH+6*, PYMTH+7*, PYMTH+8
>> FBCHB SET1+8*, SET1+12
FBCNTRN GOT+4~, GOT+83*, GOT+84*
FBCNTRP GOT+81~, GOT+82*, GOT+83
>> FBCPT GOT+41*
FBCRARC GOT+4~, GOT+95, CRARC~, CRARC+5
FBCSID GOT+4~, GOT+79*
>> FBCTY GOT+100*, GOT+101*
>> FBDIN GOT+62*
>> FBDOB GOT+73*
FBDODINV GOT+5~, GOT+31*
FBDTSR1 DET+9~, DET+10*, GOT+44, GOT+54, GOT+91
FBEDIF GOT+4~, GOT+11*
FBERR DET+6!
>> FBEXMPT SET1+9*, SET1+12
FBFDT AUTHOP2+7~, AUTHOP2+10*, AUTHOP2+11*, AUTHOP2+13, AUTHOP2+15
FBFPPSID GOT+4~, GOT+86*
>> FBHCFA GOT+50*
>> FBHD SET1+12
FBIA GOT+5~, GOT+28*, GOT+29*, GOT+30*
FBIENS GOT+2~, GOT+7*, GOT+63, GOT+90, GOT+95, CRARC~, CRARC+3, CRARC+4, B3ADMIT~, B3ADMIT+7
>> FBINVN GOT+59*, GOT+60*
FBLNITM GOT+5~, GOT+9*
FBMOD1 GOT+3~, GOT+17*
FBMOD2 GOT+3~, GOT+18*
FBMOD3 GOT+3~, GOT+19*
FBMOD4 GOT+3~, GOT+20*
FBMODA GOT+14~
FBMODL GOT+14~, GOT+16*, GOT+17, GOT+18, GOT+19, GOT+20
FBNPI GOT+3~, GOT+34*
>> FBPATT GOT+43*
>> FBPAYT GOT+22*, GOT+33
>> FBPD GOT+53*, GOT+54*, GOT+56*, GOT+57*
FBPICN DET+9~, DET+11*, DET+12*
FBPNAMX GOT+3~, GOT+75*
>> FBPOS GOT+49*
>> FBPOV GOT+39*
>> FBPSA GOT+42*
FBPYMTH GOT+4~, GOT+96*
FBRET B3ADMIT+5~, B3ADMIT+6*, B3ADMIT+17*, B3ADMIT+19*, B3ADMIT+21
FBRRMK CRARC+2~, CRARC+4, CRARC+5
FBSDT AUTHOP2~, AUTHOP2+15
>> FBST GOT+97*, GOT+98*, GOT+99*, GOT+100
>> FBSTAT RD+2*, RD+4, SET1+7*, SET1+12
>> FBSTR SET1+12*
>> FBSUSP GOT+45*, GOT+46*
>> FBTD GOT+44*
FBTRT FBAAV0+8~*, FBAAV0+9*, FBAAV0+10*, FBAAV0+11*, FBAAV0+12*, FBAAV0+13*, FBAAV0+14
>> FBTT GOT+40*
>> FBTXT DET+5*, DET+16*, DET+19
FBUNITS GOT+3~, GOT+76*, GOT+77*, GOT+78*
>> FBVID GOT+24*, GOT+25*, GOT+33*
>> FBVTOS GOT+51*
FBX GOT+3~
FBY DET+13*, GOT+76, GOT+79, GOT+96, B3ADMIT+14~, B3ADMIT+15*, B3ADMIT+17, B3ADMIT+19
>> FBY3 DET+14*, GOT+9, GOT+28, GOT+31, GOT+82, GOT+86
>> FBY9 DET+15*, GOT+88
>> FBZIP GOT+102*
I AUTHOP2+7~, AUTHOP2+12*, AUTHOP2+13*, AUTHOP2+14, AUTHOP2+16
IEN PYMTH~, PYMTH+7
IENS AUTHOP1~, AUTHOP1+4, AUTHOP1+5, AUTHOP1+6
>> J RD+2*, RD+4, RTRAN+8*, SET1+7, DET+8, UPD+2
>> K DET+8*, DET+10, DET+11, DET+13, DET+14, DET+15, GOT+7, GOT+11, GOT+15, GOT+66
, GOT+69
>> L DET+8*, DET+10, DET+11, DET+13, DET+14, DET+15, GOT+7, GOT+11, GOT+15, GOT+24
, GOT+34
>> M DET+8*, DET+10, DET+11, DET+13, DET+14, DET+15, GOT+7, GOT+11, GOT+15
>> N DET+8*, DET+11, DET+13, DET+14, DET+15, GOT+7, GOT+11, GOT+15
>> PAD RTRAN+3*, GOT+25, GOT+33, GOT+50, GOT+57, GOT+99
>> POV GOT+37*, GOT+38*, GOT+39
REFNUM AUTHOP1+2~, AUTHOP1+3*, AUTHOP1+7*, AUTHOP1+8
>> TOTSTR RTRAN+3*
U RD+4, SET1+10, DET+11, GOT+9, GOT+24, GOT+28, GOT+29, GOT+31, GOT+42, GOT+48
, GOT+61, GOT+76, GOT+86, GOT+88, GOT+96, GOT+102, AUTHOP2+14, AUTHOP1+7, PYMTH+7, B3ADMIT+17
, B3ADMIT+19
>> VAPA("P" GOT+65*
>> VAPA(11 GOT+102
>> VAPA(5 GOT+97, GOT+100
>> VAPA(6 GOT+102
>> VAPA(7 GOT+100
VAT RTRAN+1!
>> VATERR RTRAN+1
>> X SET1+10*, SET1+11
Y RD, UPD+1~
Y(0 RTRAN+8*, SET1+1, SET1+2, SET1+4, SET1+5, SET1+6, SET1+8, SET1+9, SET1+10, DET+8*
, GOT+22, GOT+41, GOT+42, GOT+43, GOT+45, GOT+47, GOT+48, GOT+49, GOT+50, GOT+51
, GOT+53, GOT+59, GOT+61, GOT+62, GOT+69*, GOT+73
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 |  Naked Globals |  Local Variables  | All