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: BARDMLP

Package: IHS Accounts Receivable

Routine: BARDMLP


Information

BARDMLP ;IHS/OIT/FCJ - 1 OF 2 ;DEBT MANAGEMENT PRINT LETTERS

Source Information

Source file <BARDMLP.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
IHS Accounts Receivable 5 PRINT^BARDMLP1  (CALC,MCD,MCR,PRINT,PRVT,RR)^BARDMRE  ^BARDMRQN  CYDAY^BARDMRU  (INSTYP,PAR,RRDT)^BARDMU  
VA Fileman 5 (,COMMA,NOW)^%DTC  ^DIC  ^DIE  $$GET1^DIQ  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  $$NPI^XUSNPI  
IHS VA Utilities 2 ($$VAL,$$VALI)^XBDIQ1  $$DIR^XBDIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Accounts Receivable 2 BAR DM PRT LETTER  BAR DM PRT TEST LETTER  

Entry Points

Name Comments DBIA/ICR reference
ONEDM ;
PAID(BARDM,BARDMC) ;SET THE PRINT QUEUED STATUS TO NOT QUEUED AND BILL STATUS TO PAID ;P.OTT
UNDL ;
TSTPRT ;EP
LGUP ;ADD BILL TO LOG FILE
PERCHK ;
INSCHK1 ;
101
POLCHK ;TEST FOR POLICY NO, POLICY HOLDER AND POLICY HOLDER DOB
LGADD ;ENTRY TO LOG FILE
LGCYL ;ADD CYCLE TO LOG FILE
ETST1
SUMMARY ;
PATCHK ;
XIT ;
ETST ;ERROR TEST
VAR ;SET LET VARIABLES
INSCHK ;
VARSET ;RESET VARS
CYUP ;CYCLE UPDATE - SET LETTER STATUS AND QUE
ST ;
XIT2 ;
LET ;
SORT1 ;
SORT0
SORT3
SORT2 ;

External References

Name Field # of Occurrence
^%DTC PATCHK+10
COMMA^%DTC LET+17, ONEDM+2
NOW^%DTC LGADD+1
^%ZIS XIT+1, TSTPRT+5, LET+58
^%ZISC XIT+2, TSTPRT+24, LET+66
PRINT^BARDMLP1 TSTPRT+23, ONEDM+15
CALC^BARDMRE ETST+13
MCD^BARDMRE INSCHK1+3
MCR^BARDMRE INSCHK1+1
PRINT^BARDMRE ETST+14
PRVT^BARDMRE INSCHK1+4
RR^BARDMRE INSCHK1+2
^BARDMRQN LET+71
CYDAY^BARDMRU LET+16
INSTYP^BARDMU LET+33, ONEDM+11
PAR^BARDMU TSTPRT+1
RRDT^BARDMU ST+6
^DIC CYUP+8, LGADD+4, LGCYL+5, LGUP+11
^DIE CYUP+4, CYUP+12, PAID+3, PAID+6
$$GET1^DIQ LET+29, ONEDM+8, ONEDM+10, POLCHK+6
^DIR ETST+5, LET+75, SUMMARY+14
$$VAL^XBDIQ1 VAR+10, LET+22, LET+27, LET+34, ONEDM+4, ONEDM+7, ONEDM+12, PATCHK+2, PATCHK+3, PATCHK+6
, PERCHK+1, PERCHK+3, PERCHK+4, PERCHK+5, PERCHK+6
$$VALI^XBDIQ1 PATCHK+8, PATCHK+9
$$DIR^XBDIR TSTPRT+3, LET+69
$$NPI^XUSNPI LET+28, LET+29, ONEDM+9, ONEDM+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ST+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ETST1+0
Function Call: WRITE
  • Prompt: !,"MISSING DATA IN ^BARBL(",DUZ(2),",",BARBIEN
  • Line Location: LET+21
Function Call: WRITE
  • Prompt: !,"Bill status of ",$P(^BARBL(DUZ(2),BARBIEN,0),U,1)," changed. Flagging DL as PAID."
  • Line Location: LET+31
Function Call: WRITE
  • Prompt: !," # of letters in queue : ",$J(BARTOT,6)
  • Line Location: SUMMARY+3
Function Call: WRITE
  • Prompt: " with errors."
  • Line Location: SUMMARY+4
Function Call: WRITE
  • Prompt: " incl. ",BARNOK1," letter(s) with errors."
  • Line Location: SUMMARY+5
Function Call: WRITE
  • Prompt: !,"# of letters that will be printed : ",$J(BAROK2+BARNOK2,6)
  • Line Location: SUMMARY+6
Function Call: WRITE
  • Prompt: !,"NOTE: According to the parameter setup only ",BARPMX," letters will be printed."
  • Line Location: SUMMARY+7
Function Call: WRITE
  • Prompt: !
  • Line Location: UNDL+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: UNDL+2
Routine Call
  • DIE
  • Line Location:
    • CYUP+4
    • CYUP+12
    • PAID+3
    • PAID+6
Routine Call
  • DIC
  • Line Location:
    • CYUP+8
    • LGADD+4
    • LGCYL+5
    • LGUP+11
Routine Call
  • DIR
  • Line Location:
    • ETST+5
    • LET+75
    • SUMMARY+14
Routine Call
  • %ZIS
  • Line Location:
    • XIT+1
    • TSTPRT+5
    • LET+58

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^BARBL(2906 - [#90050.01] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( LET+25, LET+26, INSCHK+7, INSCHK+8, INSCHK+11, INSCHK+12, INSCHK1+1, INSCHK1+2, INSCHK1+3, INSCHK1+4
^AUPNPAT - [#9000001] POLCHK+4
^AUTNINS - [#9999999.18] INSCHK+1
^BAR(90052.06 VAR+2
^BARBL( LET+19, LET+23, LET+24, LET+30, LET+31, ONEDM+5, ONEDM+6, ONEDM+13, POLCHK+3, CYUP+11
^BARDM( LET+10, LET+11, LET+15, LET+17, LET+18, ONEDM+2, ONEDM+3
^BARDMLG( LGUP+2, LGUP+3, LGUP+12*
^DD(90053.08 LGCYL+3
^DD(90053.09 LGUP+9
^DPT - [#2] POLCHK+5, PATCHK+5
^TMP("BARDM" 101+1!, XIT2+3!, LET+44*, LET+47*, LET+50*, LET+54*, SORT0+2, SORT0+3, SORT0+4, SORT1+1
, SORT1+3, SORT1+4, SORT1+5, SORT2+1, SORT2+3, SORT2+4, SORT2+5, SORT3+2, SORT3+3, SORT3+4
, SORT3+5, SORT3+6
^TMP("BARDME" 101!, XIT2+2!, LET+12, LET+13, LET+38, LET+39, LET+41, LET+42
^TMP("BARDMQN" 101+2!, XIT2+4!, LET+55*
^TMP($J LET+2!
^VA(200 - [#200] LET+20

Label References

Name Line Occurrences
CYUP ONEDM+16
ETST 101+4
ETST1 ETST+8
INSCHK POLCHK+9
INSCHK1 INSCHK+9, INSCHK+12
LET 101+8
LGADD LGUP+1
LGCYL LGUP+3
LGUP ONEDM+17
ONEDM SORT0+4, SORT1+5, SORT2+5, SORT3+6
PAID LET+32
PATCHK POLCHK+10
PERCHK POLCHK+11
POLCHK LET+36, ONEDM+14
SORT0 LET+62
SORT1 LET+63
SORT2 LET+64
SORT3 LET+65
SUMMARY LET+56
TSTPRT ST+3, TSTPRT+25
UNDL SUMMARY+2, SUMMARY+8
VAR 101+7, TSTPRT+9
VARSET TSTPRT+9, POLCHK+7
XIT ST+5, 101+6, 101+9
XIT2 101+5

Naked Globals

Name Field # of Occurrence
^(0 LET+23, ONEDM+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LGADD+3
AGE XIT2+5!, PATCHK+10*
>> BAR2PRT ETST+2*, ETST+10*, LET+12, LET+13, SUMMARY+4, SUMMARY+5
>> BARAD1 VAR+3*
>> BARAD2 VAR+3*
>> BARAMTO TSTPRT+17*, LET+17*, ONEDM+2*
>> BARBIEN LET+18*, LET+19, LET+21, LET+23, LET+24, LET+27, LET+29, LET+30, LET+31, ONEDM+3*
, ONEDM+5, ONEDM+6, ONEDM+7, ONEDM+10, ONEDM+13, POLCHK+3, PATCHK+8, CYUP+11
>> BARBILN TSTPRT+17*, LET+22*, ONEDM+4*, LGUP+10
>> BARCT LET+4*, LET+40, LET+43*
>> BARCTY VAR+3*
>> BARCYCLE LET+8*, LET+10, LET+15, LET+44, LET+47, LET+50, LET+54, LET+55, SORT0+1*, SORT0+2
, SORT0+3, SORT0+4, SORT1+2*, SORT1+3, SORT1+4, SORT1+5, SORT2+2*, SORT2+3, SORT2+4, SORT2+5
, SORT3+1*, SORT3+2, SORT3+3, SORT3+4, SORT3+5, SORT3+6, LGCYL+4, LGUP+2, LGUP+3
>> BARD3P LET+23*, LET+25, LET+26, ONEDM+5*, INSCHK+7, INSCHK+8, INSCHK+11, INSCHK+12, INSCHK1+1, INSCHK1+2
, INSCHK1+3, INSCHK1+4
>> BARD3PD LET+24*, LET+25, LET+26, ONEDM+6*, INSCHK+7, INSCHK+8, INSCHK+11, INSCHK+12, INSCHK1+1, INSCHK1+2
, INSCHK1+3, INSCHK1+4
>> BARDAC LET+23*, LET+34, ONEDM+5*, ONEDM+12
>> BARDACG TSTPRT+11*, POLCHK+2, POLCHK+9, POLCHK+10, POLCHK+11
>> BARDACI INSCHK+1, INSCHK+7, INSCHK+8, INSCHK+12, PERCHK+1, PERCHK+3, PERCHK+4, PERCHK+5, PERCHK+6
>> BARDBDT LET+23*, ONEDM+5*
>> BARDI LET+34*, LET+35, ONEDM+12*
>> BARDINS( LET+35
>> BARDITY LET+35
BARDM LET+10*, LET+11, LET+12, LET+13, LET+15, LET+17, LET+18, LET+22, LET+32, LET+38
, LET+39, LET+41, LET+42, LET+44, LET+47, LET+50, LET+54, LET+55, SORT0+3*, SORT0+4
, SORT1+4*, SORT1+5, SORT2+4*, SORT2+5, SORT3+5*, SORT3+6, ONEDM+2, ONEDM+3, ONEDM+4, CYUP+1
, PAID~, PAID+1, PAID+5
BARDM("DOS" TSTPRT+18*, LET+14*, LET+27*, ONEDM+1*, ONEDM+7*
BARDM("INS" VARSET+2*, INSCHK+1*, INSCHK+2, INSCHK+3, INSCHK+4, INSCHK+5
BARDM("INS_CTY" TSTPRT+14*, INSCHK+3*, PATCHK+3*, PERCHK+4*
BARDM("INS_NM" TSTPRT+12*, LET+49, LET+52, INSCHK+2*, PATCHK+1*, PERCHK+2*
BARDM("INS_ST" TSTPRT+15*, INSCHK+3*, PATCHK+5*, PERCHK+5*
BARDM("INS_STR" TSTPRT+13*, INSCHK+2*, PATCHK+2*, PERCHK+3*
BARDM("INS_TX" VARSET+2*, INSCHK+5*
BARDM("INS_ZP" TSTPRT+16*, INSCHK+4*, PATCHK+6*, PERCHK+6*
BARDM("MEMBER" VARSET+2*
BARDM("PAT_IEN" ONEDM+8, POLCHK+3*, POLCHK+4, POLCHK+5, POLCHK+6, PATCHK+2, PATCHK+3, PATCHK+5, PATCHK+6, PATCHK+9
BARDM("POL_DOB" VARSET+2*
BARDM("POL_HOLDER" VARSET+2*, LET+46, LET+53
BARDM("POL_HOLDER_IEN" VARSET+2*
BARDM("POL_NUM" VARSET+2*
BARDMC LET+14*, LET+15*, LET+17, LET+32, LET+44, LET+47, LET+50, LET+54, LET+55, SORT0+4*
, SORT1+5*, SORT2+5*, SORT3+6*, ONEDM+2, CYUP+1, PAID~, PAID+1
>> BARDMINS LET+26*, LET+44, LET+47, LET+50, LET+54, LET+55, SORT0+2*, SORT0+3, SORT0+4, SORT1+3*
, SORT1+4, SORT1+5, SORT2+3*, SORT2+4, SORT2+5, SORT3+3*, SORT3+4, SORT3+5, SORT3+6
>> BARDOB TSTPRT+22*, ONEDM+8*, POLCHK+6*
>> BARDTP TSTPRT+21*
>> BARERRCT ETST+12*, ETST+14, ETST+16
>> BARFAC VAR+10*
>> BARHRN POLCHK+4*
>> BARL TSTPRT+11*, INSCHK+8*, INSCHK+11*, INSCHK+12, INSCHK1+1, INSCHK1+2, INSCHK1+3, INSCHK1+4
>> BARLDOB VAR+7*
>> BARLEN VAR+1*
>> BARLG LGADD+5*, LGCYL+1, LGCYL+2, LGUP+1, LGUP+2, LGUP+3, LGUP+5, LGUP+8, LGUP+12
>> BARLGC LGCYL+6*, LGUP+2*, LGUP+6, LGUP+8, LGUP+12
>> BARLQ LET+16
>> BARMIN TSTPRT+10*, VARSET+1*, POLCHK+1*, POLCHK+9*, PATCHK+10*
>> BARMRGL VAR+4*, VAR+9*
>> BARMRGT VAR+4*, VAR+8*
BARNOK1 LET+3~, LET+6*, LET+38*, SUMMARY+5
BARNOK2 LET+3~, LET+7*, LET+41*, SUMMARY+6
>> BARNPI VAR+7*
>> BARNPIF TSTPRT+22*, LET+28*, ONEDM+9*
>> BARNPIP TSTPRT+22*, LET+29*, ONEDM+10*
BAROK1 LET+3~, LET+6*, LET+39*
BAROK2 LET+3~, LET+7*, LET+42*, SUMMARY+6
BARPAR VAR+5, VAR+6, VAR+7, VAR+11!
BARPAR1 VAR+2*, VAR+3, VAR+4, VAR+11!
>> BARPAT TSTPRT+17*, POLCHK+5*, PATCHK+1, PERCHK+1*, PERCHK+2
>> BARPBDT TSTPRT+19*
>> BARPCP( VAR+6*, CYUP+11
>> BARPH VAR+3*
>> BARPIEN VAR+2
>> BARPMX VAR+4*, LET+40, SUMMARY+7
>> BARPSRT LET+44, LET+45, LET+48, LET+51, LET+62, LET+63, LET+64, LET+65
>> BARQ ST+4, 101+5, ETST+7*, ETST+9*, ETST+15, TSTPRT+2, LET+4*, LET+8, LET+10, LET+15
, LET+57, SUMMARY+1*, SUMMARY+16*, SUMMARY+17*
>> BARRPT ST+1*, TSTPRT+20*
>> BARSG VAR+5*
>> BARSG1 VAR+5*
>> BARSG2 VAR+5*
BARSORT LET+3~, LET+46*, LET+47, LET+49*, LET+50, SORT1+1*, SORT1+3, SORT1+4, SORT1+5, SORT2+1*
, SORT2+3, SORT2+4, SORT2+5
>> BARSORT1 LET+52*, LET+54, SORT3+2*, SORT3+3, SORT3+4, SORT3+5, SORT3+6
>> BARSORT2 LET+53*, LET+54, SORT3+4*, SORT3+5, SORT3+6
>> BARST VAR+3*
BARTMP UNDL+1~, UNDL+2*
>> BARTOT LET+5*, LET+37*, SUMMARY+3, SUMMARY+6, SUMMARY+7, SUMMARY+12, SUMMARY+13, SUMMARY+17
>> BARTST INSCHK+6*, INSCHK+10, INSCHK+11
>> BARZP VAR+3*
>> C VAR+6*
>> CY TSTPRT+11*, LET+4*, LET+9*, LET+16, SORT0*, SORT0+2*, SORT1+2*, SORT1+3*, SORT2+2*, SORT2+3*
, SORT3*, SORT3+2*, CYUP+5, CYUP+7, CYUP+11
DA CYUP+1*, CYUP+5!, CYUP+10*, CYUP+13!, LGADD+6!, LGCYL+7!, LGUP+4!, PAID+1*, PAID+4!, PAID+5*
, PAID+7!
DA(1 CYUP+1*, LGCYL+1*, LGUP+6*, PAID+1*
DA(2 LGUP+5*
DIC CYUP+1*, CYUP+5!, CYUP+13!, LGADD+2*, LGCYL+2*, LGUP+4!, LGUP+8*
DIC("P" LGCYL+3*, LGUP+9*
DIC(0 CYUP+7*, LGADD+2*, LGCYL+2*, LGUP+7*
DIE CYUP+1*, CYUP+5!, CYUP+13!, LGUP+4!, PAID+1*, PAID+4!, PAID+5*, PAID+7!
DIR ETST+6!, LET+72!, LET+76!, LGUP+4!, SUMMARY+10!, SUMMARY+15!
DIR("A" ETST+4*, LET+74*, SUMMARY+12*, SUMMARY+13*
DIR(0 ETST+3*, LET+73*, SUMMARY+11*
>> DIROUT ETST+7
>> DIRUT ETST+7
DR CYUP+3*, CYUP+5!, CYUP+11*, CYUP+13!, LGUP+4!, PAID+2*, PAID+4!, PAID+5*, PAID+7!
DT TSTPRT+21, CYUP+3
>> DTOUT ETST+7
>> DUOUT ST+5, 101+6, ETST+7, TSTPRT+6
DUZ LET+20, CYUP+3
DUZ(2 VAR+2, VAR+10, LET+10, LET+11, LET+15, LET+17, LET+18, LET+19, LET+21, LET+23
, LET+24, LET+28, LET+30, LET+31, ONEDM+2, ONEDM+3, ONEDM+5, ONEDM+6, ONEDM+9, ONEDM+13
, POLCHK+3, POLCHK+4, CYUP+11, LGADD+2, LGCYL+2, LGUP+2, LGUP+3, LGUP+8, LGUP+12, PAID+1
, PAID+5
ERRCT XIT2+5!
ERRT XIT2+5!
>> I VAR+1*, VAR+6*
IO TSTPRT+8, LET+60
IO("S" XIT+1
IOF ST+2
>> IOP XIT+1*
>> IOS XIT+1
>> POP TSTPRT+7, LET+59
U ETST+9, VAR+3, VAR+4, VAR+5, VAR+6, LET+11, LET+17, LET+18, LET+20, LET+23
, LET+24, LET+26, LET+28, LET+29, LET+30, LET+31, ONEDM+2, ONEDM+3, ONEDM+5, ONEDM+6
, ONEDM+9, ONEDM+10, ONEDM+13, POLCHK+3, POLCHK+4, POLCHK+5, INSCHK+2, INSCHK+3, INSCHK+4, INSCHK+5
, INSCHK+12, INSCHK1+1, INSCHK1+2, INSCHK1+3, INSCHK1+4, PATCHK+5, CYUP+11, LGCYL+3, LGUP+9, LGUP+12
X ETST+8, ETST+9, LET+17*, LET+72*, ONEDM+2*, PATCHK+10, CYUP+7*, LGADD+3*, LGCYL+4*, LGUP+4!
, LGUP+10*, SUMMARY+10*, SUMMARY+16
>> X1 PATCHK+8*
>> X2 LET+17*, ONEDM+2*, PATCHK+9*
Y ETST+10, TSTPRT+3*, TSTPRT+4, LET+68, LET+69*, LET+70, LET+72*, CYUP+9, CYUP+10, LGADD+5
, LGCYL+6, LGUP+4!, SUMMARY+10*
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