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

Package: Contract Health Management Information System

Routine: ACHSNEW


Information

ACHSNEW ; IHS/ITSC/PMF - SET UP A NEW FISCAL YEAR FOR A FACILITY ; [ 10/16/2001 8:16 AM ]

Source Information

Source file <ACHSNEW.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Contract Health Management Information System 5 $$ZEROTH^ACHS  (READ,SB1)^ACHSFU  DCR3^ACHSODQ  (C0SUB,FY,GLOBERR,INIT)^ACHSUF  ^ACHSVAR  
VA Fileman 2 WAIT^DICD  ^DIE  
IHS VA Utilities 1 $$DIR^XBDIR  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Contract Health Management Information System 3 ACHSNEWFY  ACHSODP  ACHSUF  

Entry Points

Name Comments DBIA/ICR reference
BD ;
AUTO ;EP - For automatic setup of new FY.
CANNOT ;
AUTO2 ;
AUTO1 ;EP
K ;

External References

Name Field # of Occurrence
$$ZEROTH^ACHS AUTO2+4
READ^ACHSFU BD+4
SB1^ACHSFU BD+6
DCR3^ACHSODQ AUTO+4
C0SUB^ACHSUF ACHSNEW+6
FY^ACHSUF ACHSNEW+6
GLOBERR^ACHSUF ACHSNEW+7, ACHSNEW+10
INIT^ACHSUF AUTO1+4
^ACHSVAR ACHSNEW+4
WAIT^DICD BD+12
^DIE AUTO2+10, AUTO2+11, AUTO2+12
$$DIR^XBDIR CANNOT+2
$$FMTE^XLFDT CANNOT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Which fiscal year? ("
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: ACHS("YR")-2," to ",ACHS("YR")+1,") "
  • Line Location: BD+3
Function Call: WRITE
  • Prompt: !!,"Enter a four-digit fiscal year - see listed examples."
  • Line Location: BD+6
Function Call: WRITE
  • Prompt: *7,!!,"This fiscal year is already on file and cannot be reset.",!!
  • Line Location: BD+8
Function Call: WRITE
  • Prompt: *7,!!,"P.O.s still exist for FY ",ACHS("YR")-10," that will interfere with ",ACHS("YR")," P.O. entry.",!,"Use the ^ACHSYFYD programmer utility to delete P.O.'s for FY ",ACHS("YR")-10,"."
  • Line Location: BD+10
Function Call: WRITE
  • Prompt: !!,"Registers Already Closed....",!!
  • Line Location: AUTO+1
Function Call: WRITE
  • Prompt: !!,"Initializing New Registers. Please Wait...",!
  • Line Location: AUTO1+3
Function Call: WRITE
  • Prompt: !!,"FINISHED....",!!
  • Line Location: AUTO2+14
Function Call: WRITE
  • Prompt: *7,!!,"Cannot Add New Fiscal Year Until After ",$$FMTE^XLFDT(ACHSFYDT),".",!
  • Line Location: CANNOT+1
Routine Call
  • DIE
  • Line Location:
    • AUTO2+10
    • AUTO2+11
    • AUTO2+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ACHS(9 - [#9002069] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHS(9 - [#9002069] ACHSNEW+10, BD+8, AUTO+1, AUTO2+1!, AUTO2+2*, AUTO2+3*, AUTO2+4*, AUTO2+5, AUTO2+6*, AUTO2+7*
, AUTO2+8*, AUTO2+9*, AUTO2+13
^ACHSF - [#9002080] BD+9

Label References

Name Line Occurrences
AUTO1 AUTO+1
BD BD+6, BD+8, BD+9
K ACHSNEW+5, BD+5, AUTO1+1, AUTO2+15

Naked Globals

Name Field # of Occurrence
^(1 AUTO2+9*, AUTO2+13*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACHS K+2!
ACHS("ACWKX" ACHSNEW+9*, ACHSNEW+10
ACHS("DCR" AUTO+3*
ACHS("FYX" ACHSNEW+8*, ACHSNEW+9, ACHSNEW+10
ACHS("SETNEW" ACHSNEW+3*
ACHS("YR" BD+2*, BD+3, BD+6, BD+7*, BD+8, BD+9, BD+10, AUTO+1, AUTO+3, AUTO2+1
, AUTO2+3, AUTO2+6, AUTO2+8, AUTO2+9, AUTO2+10, AUTO2+11, AUTO2+12, AUTO2+13
>> ACHSACY AUTO+3*
>> ACHSASK AUTO+3*
ACHSAUTO AUTO2+10, AUTO2+11, AUTO2+12, K+2!
>> ACHSERR ACHSNEW+7, AUTO1+1
>> ACHSFYDT CANNOT+1
>> ACHSFYWK( ACHSNEW+8, ACHSNEW+9, AUTO+1
>> ACHSNUM AUTO+3*
>> ACHSXQT ACHSNEW+5
DA AUTO2+10*, AUTO2+11*, AUTO2+12*, K+1!
DIC K+1!
DIE AUTO2+10*, AUTO2+12*, K+1!
DR AUTO2+10*, AUTO2+11!*, AUTO2+12*, K+1!
DR(2 AUTO2+10*, AUTO2+11*
DT BD+2
>> DTOUT BD+5
>> DUOUT BD+5
DUZ(2 ACHSNEW+8, ACHSNEW+9, ACHSNEW+10, BD+8, BD+9, AUTO+1, AUTO2+1, AUTO2+2, AUTO2+3, AUTO2+4
, AUTO2+5, AUTO2+6, AUTO2+7, AUTO2+8, AUTO2+9, AUTO2+10, AUTO2+11, AUTO2+12, AUTO2+13
IO(0 AUTO1+2
U AUTO+1, AUTO2+6, AUTO2+7
>> X AUTO2+5*, AUTO2+7
>> Y BD+5, BD+6, BD+7
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