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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ACHSVDV2

Package: Contract Health Management Information System

Routine: ACHSVDV2


Information

ACHSVDV2 ; IHS/ITSC/TPF/PMF - YTD PAID VENDOR INFO BY FY ;

Source Information

Source file <ACHSVDV2.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIE  
Contract Health Management Information System 1 $$ZEROTH^ACHS  
IHS VA Utilities 1 $$DIR^XBDIR  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Contract Health Management Information System 2 ACHSVDV1  ACHSVDVA  

Entry Points

Name Comments DBIA/ICR reference
HDR ;
AGRDSP ;EP
AGRSEL ;
A2A ;
A2C ;
A2D ;
A2E ;
AGRDSP1 ;
AGRNEW ;ADD NEW AGREEMENT INFORMATION HERE
AGRDSPZ ;
MDY(X) ;

External References

Name Field # of Occurrence
$$ZEROTH^ACHS AGRNEW+5
^DIC AGRNEW+7
^DIE AGRNEW+13
$$DIR^XBDIR AGRSEL+2, AGRNEW+2
$$FMTE^XLFDT ACHSVDV2+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"None on file."
  • Line Location: ACHSVDV2+6
Function Call: WRITE
  • Prompt: !!,"None on file."
  • Line Location: ACHSVDV2+7
Function Call: WRITE
  • Prompt: !!,"FISCAL YEAR",?16,"A M O U N T",?30,"LAST PMT DATE",!!
  • Line Location: ACHSVDV2+9
Function Call: WRITE
  • Prompt: ?2,ACHS,?14,"$",$J($FN($P(^(ACHS,0),U,2),",",2),12),?30,$$FMTE^XLFDT($P(^(0),U,3)),!
  • Line Location: ACHSVDV2+10
Function Call: WRITE
  • Prompt: !,$J(ACHSI,2),?3,ACHSAGTP
  • Line Location: A2A+4
Function Call: WRITE
  • Prompt: ?8,$P(^(0),U)
  • Line Location: A2A+5
Function Call: WRITE
  • Prompt: ?8,$E($P(^AUTTVNDR(ACHSPROV,18,R,0),U,1),1,2),$S(ACHSAGTP="BPA":"-A-",ACHSAGTP="PA":"-PA-",ACHSAGTP="RQ":"-R-",1:"")
  • Line Location: A2A+6
Function Call: WRITE
  • Prompt: $E(X,2,4)
  • Line Location: A2A+8
Function Call: WRITE
  • Prompt: $E(X,1,4)
  • Line Location: A2A+9
Function Call: WRITE
  • Prompt: ?27,$$MDY($P(^AUTTVNDR(ACHSPROV,18,R,0),U,8)),?36,$$MDY($P(^AUTTVNDR(ACHSPROV,18,R,0),U,9))
  • Line Location: A2C+1
Function Call: WRITE
  • Prompt: ?45,Y,!
  • Line Location: A2C+8
Function Call: WRITE
  • Prompt: ?45,Y,!
  • Line Location: A2D+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: AGRNEW+4
Function Call: WRITE
  • Prompt: !
  • Line Location: AGRNEW+10
Function Call: WRITE
  • Prompt: !!," #",?3,"Type",?14,"Number",?27,"Eff-Date",?36,"Exp-Date",?45,"MCR",?49,"Description",!?3,"----",?8,"------------------",?27,"--------",?36,"--------",?45,"---",?49,"----------------------------"
  • Line Location: HDR+1
Routine Call
  • DIE
  • Line Location:
    • AGRNEW+13
Routine Call
  • DIC
  • Line Location:
    • AGRNEW+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSVPMT - [#9002075] ACHSVDV2+5, ACHSVDV2+7, ACHSVDV2+10
^AUTTVNDR - [#9999999.11] AGRDSP+1, AGRDSP1+1, A2A+5, A2A+6, A2A+7, A2C+1, A2C+2, A2C+3, A2C+5, A2C+7
, A2D+1, A2D+2, A2D+4, A2D+6, A2E+1, AGRNEW+5*
^XUSEC("ACHSZMGR" AGRNEW+1

Label References

Name Line Occurrences
$$MDY A2C+1
A2C A2A+5, A2A+8
A2D A2C+3, A2C+5
A2E A2D+2, A2D+4
AGRDSP AGRNEW+15
AGRDSP1 A2E+2
AGRDSPZ AGRDSP1+2
AGRNEW AGRDSP+1, AGRSEL+4
HDR AGRDSP+2

Naked Globals

Name Field # of Occurrence
^( ACHSVDV2+10
^(0 ACHSVDV2+10, A2A+5, A2C+7, A2D+6, A2E+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACHS ACHSVDV2+10*
ACHSAGRL AGRDSP+4!
ACHSAGRL( A2A+1*, AGRSEL+5
>> ACHSAGTP AGRDSP+1, AGRDSP1+1, A2A+4, A2A+6, A2A+8, AGRNEW+2
>> ACHSBPFL AGRDSPZ+1
>> ACHSI AGRDSP+3*, A2A+1*, A2A+4, AGRSEL+2
ACHSIEN ACHSVDV2+4~, ACHSVDV2+5*, ACHSVDV2+6, ACHSVDV2+7, ACHSVDV2+10
>> ACHSPAFL AGRDSPZ+1
>> ACHSPROV ACHSVDV2+5, AGRDSP+1, AGRDSP1+1, A2A+5, A2A+6, A2A+7, A2C+1, A2C+2, A2C+3, A2C+5
, A2C+7, A2D+1, A2D+2, A2D+4, A2D+6, A2E+1, AGRNEW+5, AGRNEW+6, AGRNEW+9
>> ACHSRQFL AGRDSPZ+1
>> DA AGRSEL+1*, AGRSEL+5*, AGRNEW+4*, AGRNEW+9*
>> DA(1 AGRNEW+6*, AGRNEW+9*
>> DIC AGRNEW+6*, AGRNEW+12
>> DIC("W" AGRNEW+6*
>> DIC(0 AGRNEW+6*
DIE AGRNEW+11!, AGRNEW+12*, AGRNEW+14!
DIE("NO^" AGRNEW+12*
DR AGRNEW+11!, AGRNEW+12*
>> DTOUT AGRSEL+3, AGRNEW+3
>> DUOUT AGRSEL+3, AGRNEW+3
DUZ AGRNEW+1
DUZ(2 ACHSVDV2+5, ACHSVDV2+7, ACHSVDV2+10
IOF AGRNEW+4
>> R AGRDSP+3*, AGRDSP1+1*, AGRDSP1+2, A2A+1, A2A+5, A2A+6, A2A+7, A2C+1, A2C+2, A2C+3
, A2C+5, A2C+7, A2D+1, A2D+2, A2D+4, A2D+6, A2E+1
U ACHSVDV2+10, A2A+5, A2A+6, A2A+7, A2C+1, A2C+2, A2C+3, A2C+5, A2C+7, A2D+1
, A2D+2, A2D+4, A2D+6, A2E+1
X A2A+7*, A2A+8, A2A+9, A2C+2*, A2C+3, A2C+4, A2D+1*, A2D+2, A2D+3, MDY~
, MDY+1
>> Y A2C+4*, A2C+5, A2C+6*, A2C+7*, A2C+8, A2D+3*, A2D+4, A2D+5*, A2D+6*, A2D+7
, AGRSEL+2*, AGRSEL+4, AGRSEL+5, AGRNEW+2*, AGRNEW+4, AGRNEW+8, AGRNEW+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All