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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: AZAXBILL

Package: Local Area Programs

Routine: AZAXBILL


Information

AZAXBILL ;IHS/PHXAO/AEF - FIND 3P BILLS AND CHANGE FROM HCFA-1500 TO UB-92

Source Information

Source file <AZAXBILL.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 5 DD^%DT  NOW^%DTC  FILE^DICN  ^DIE  ^DIR  
IHS VA Utilities 1 ^XBKVAR  
Kernel 1 HOME^%ZIS  

Entry Points

Name Comments DBIA/ICR reference
EN ;EP -- MAIN ENTRY POINT
; LOOPS THROUGH THE 3P TX STATUS FILE TO FIND THE EXPORTS
; DURING THE TIME FRAME AND THEN FINDS ALL THE BILLS UNDER
; THAT EXPORT
MODE(X)
DATE(X) ;
NOW() ;
CPT(FAC,BILLIEN) ;
1BAT(FAC,EXPIEN,BCNT,NOW) ;
EXP(FAC,BILLIEN) ;
1BILL(FAC,BILLIEN,BCNT,NOW) ;
CHMOD(FAC,EXPIEN) ;
TXT ;----- PRINT OPTION TEXT
ADDBIL(NOW,FAC,BIL) ;
INSURER(X)
ADDREC(X) ;
DESC ;ROUTINE DESCRIPTION

External References

Name Field # of Occurrence
DD^%DT DATE+9
NOW^%DTC NOW+4
HOME^%ZIS EN+8
FILE^DICN ADDREC+11, ADDBIL+12
^DIE CHMOD+9, EXP+10, CPT+15
^DIR EN+13
^XBKVAR EN+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"TOTAL BILLS PROCESSED: "_TCNT
  • Line Location: EN+30
Function Call: WRITE
  • Prompt: !!?5,"PROCESSING BATCH #"_FAC_"-"_EXPIEN_" "_$$DATE($P(DATA,U))
  • Line Location: 1BAT+15
Function Call: WRITE
  • Prompt: !?5,"NUMBER OF BILLS PROCESSED: "_BCNT
  • Line Location: 1BAT+22
Function Call: WRITE
  • Prompt: !,X
  • Line Location: TXT+3
Routine Call
  • %ZIS
  • Line Location:
    • EN+8
Routine Call
  • DIE
  • Line Location:
    • CHMOD+9
    • EXP+10
    • CPT+15
Routine Call
  • DIR
  • Line Location:
    • EN+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( 1BILL+12, 1BILL+13, CPT+8, CPT+9
^ABMDEXP - [#9002274.08] MODE+5
^ABMDTXST - [#9002274.6] EN+21, EN+23, EN+25, 1BAT+11, 1BAT+20
^AUTNINS - [#9999999.18] INSURER+5
^DD(1991226 ADDBIL+10

Label References

Name Line Occurrences
$$DATE 1BAT+15
$$INSURER 1BAT+13, 1BILL+17
$$MODE 1BAT+12, 1BILL+16
$$NOW EN+16
1BAT EN+27
1BILL 1BAT+21
CHMOD 1BAT+17
CPT 1BILL+20
EXP 1BILL+19
TXT EN+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% NOW+3~, NOW+5
%H NOW+3~
%I NOW+3~
BCNT EN+5~, EN+26*, EN+27, EN+28, 1BAT~, 1BAT+21, 1BAT+22, 1BILL~, 1BILL+23*
BIL ADDBIL~, ADDBIL+6
BILLIEN 1BAT+3~, 1BAT+19*, 1BAT+20*, 1BAT+21, 1BILL~, 1BILL+7, 1BILL+12, 1BILL+13, 1BILL+19, 1BILL+20
, EXP~, EXP+7, CPT~, CPT+8, CPT+9, CPT+11
CODE 1BILL+4~, CPT+4~, CPT+9*, CPT+10
CODEIEN 1BILL+4~, CPT+4~, CPT+7*, CPT+8*, CPT+9, CPT+12
DA 1BILL+4~, CHMOD+3~, CHMOD+6*, EXP+3~, EXP+7*, CPT+4~, CPT+12*, ADDREC+6~, ADDBIL+4~
DA(1 CPT+11*, CPT+13, ADDBIL+7*, ADDBIL+8
DATA 1BAT+3~, 1BAT+11*, 1BAT+12, 1BAT+13, 1BAT+15, 1BILL+4~, 1BILL+13*, 1BILL+16, 1BILL+17
DATE EN+5~, EN+22*, EN+23*, EN+25
DD ADDREC+6~, ADDBIL+4~
DIADD ADDBIL+4~, ADDBIL+11*
DIC ADDREC+6~, ADDREC+9*, ADDBIL+4~, ADDBIL+8*
DIC("P" ADDBIL+10*
DIC(0 ADDREC+10*, ADDBIL+9*
DIE 1BILL+4~, CHMOD+3~, CHMOD+7*, EXP+3~, EXP+8*, CPT+4~, CPT+13*
DINUM ADDREC+6~, ADDREC+8*
DIR EN+5~
DIR(0 EN+12*
DO ADDREC+6~, ADDBIL+4~
DR 1BILL+4~, CHMOD+3~, CHMOD+8*, EXP+3~, EXP+9*, CPT+4~, CPT+14*
EXPIEN EN+5~, EN+24*, EN+25*, EN+27, 1BAT~, 1BAT+6, 1BAT+11, 1BAT+15, 1BAT+17, 1BAT+20
, CHMOD~, CHMOD+6
FAC EN+5~, EN+20*, EN+21*, EN+23, EN+25, EN+27, 1BAT~, 1BAT+5, 1BAT+11, 1BAT+15
, 1BAT+17, 1BAT+20, 1BAT+21, 1BILL~, 1BILL+6, 1BILL+12, 1BILL+13, 1BILL+19, 1BILL+20, CHMOD~
, CHMOD+7, EXP~, EXP+8, CPT~, CPT+8, CPT+9, CPT+13, ADDBIL~, ADDBIL+6
I TXT+2~, TXT+3*
MODE 1BILL+4~, CHMOD+3~, CHMOD+5*, EXP+3~, EXP+6*
NOW EN+5~, EN+16*, EN+27, 1BAT~, 1BAT+7, 1BAT+21, 1BILL~, 1BILL+8, ADDBIL~, ADDBIL+7
REVCOD CPT+4~
>> REVCODE CPT+6*
TCNT EN+5~, EN+19*, EN+28*, EN+30
TYPE EXP+3~, EXP+5*
U 1BAT+12, 1BAT+13, 1BAT+15, 1BILL+16, 1BILL+17, CPT+9, ADDBIL+10, MODE+5, INSURER+5
X EN+5~, 1BILL+4~, CHMOD+3~, EXP+3~, CPT+4~, ADDREC~, ADDREC+8, ADDBIL+4~, ADDBIL+6*, TXT+2~
, TXT+3*, MODE~, MODE+5, INSURER~, INSURER+5, DATE~, DATE+7, DATE+8, NOW+3~
Y EN+5~, EN+14, 1BILL+4~, CHMOD+3~, EXP+3~, CPT+4~, ADDREC+6~, ADDBIL+4~, MODE+3~, MODE+4*
, MODE+5*, MODE+6, INSURER+3~, INSURER+4*, INSURER+5*, INSURER+6, DATE+5~, DATE+6*, DATE+8*, DATE+10

Marked Items

Name Field # of Occurrence
$T(DESC+I TXT+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All