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 |  All
Print Page as PDF
Routine: ACHSA44

Package: Contract Health Management Information System

Routine: ACHSA44


Information

ACHSA44 ; IHS/ADC/GTH - ENTER DOCUMENTS (5/8)-(CAN) ;

Source Information

Source file <ACHSA44.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Contract Health Management Information System 4 $$PARM^ACHS  A3^ACHSA  ^ACHSA5  READ^ACHSFU  

Entry Points

Name Comments DBIA/ICR reference
MAKLST ;
MAKLST1 ;
SETUP ;
LIST ;
A1 ;EP
VALID ;

External References

Name Field # of Occurrence
$$PARM^ACHS MAKLST+46
A3^ACHSA A1+10
^ACHSA5 ACHSA44+18
READ^ACHSFU A1+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"in test version",!!
  • Line Location: ACHSA44+5
Function Call: WRITE
  • Prompt: *7,!!,"There are no CHS COMMON ACCOUNTING NUMBERs for this facility.",!!,"Please contact your Site Manager.",!,*7
  • Line Location: ACHSA44+13
Function Call: WRITE
  • Prompt: !!,"Enter last 4 digits of the CAN Number: "
  • Line Location: A1+3
Function Call: WRITE
  • Prompt: $P($G(^ACHS(2,ACHSCAN,0)),U),"// "
  • Line Location: A1+4
Function Call: WRITE
  • Prompt: *7," Must Have CAN Number"
  • Line Location: A1+17
Function Call: WRITE
  • Prompt: " Invalid entry"
  • Line Location: VALID+4
Function Call: WRITE
  • Prompt: !!,"SEQ NO",?10,"FY",?15,"CAN NUMBER",?30,"DESCRIPTION OF THE CAN NUMBER",!,"------",?10,"--",?15,"----------",?30,"-----------------------------"
  • Line Location: LIST+1
Function Call: WRITE
  • Prompt: !,?(3-$L(SEQ)),SEQ,?10,$P(DATA,U,1),?15,$P(DATA,U,2),?30,$P(DATA,U,4)
  • Line Location: LIST+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHS(1 - [#9002061] SETUP+5, SETUP+6, SETUP+7, SETUP+21, MAKLST+70
^ACHS(2 - [#9002062] A1+4, MAKLST+36, MAKLST+37
^ACHSF - [#9002080] SETUP+8
^AUTTAREA - [#9999999.21] SETUP+15
^AUTTLOC - [#9999999.06] SETUP+15
^XUSEC("ACHSZMGR" MAKLST+46

Label References

Name Line Occurrences
A1 ACHSA44+15, A1+14, A1+17, A1+29
LIST A1+14
MAKLST ACHSA44+12
MAKLST1 MAKLST+51
SETUP ACHSA44+7
VALID A1+26

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACHS533 SETUP+7*, MAKLST1+3
>> ACHS568 SETUP+5*, SETUP+20, MAKLST1+4, MAKLST1+5
>> ACHS573 SETUP+5*, SETUP+20, MAKLST1+3
>> ACHS574 SETUP+6*, SETUP+20
>> ACHS575 SETUP+6*, MAKLST1+3
>> ACHSCAN A1+4, A1+17, VALID+5*
>> ACHSCC A1+4*, VALID+6*
>> ACHSF638 ACHSA44+10, SETUP+8*, SETUP+21, MAKLST+51
>> ACHSPREF A1+20, SETUP+15*
>> ACHSQUIT ACHSA44+16, A1+11
>> ACHSTYP MAKLST1+3, MAKLST1+4, MAKLST1+5
>> CAN MAKLST+67*, MAKLST+72
CANLIST ACHSA44+13, MAKLST+12!
CANLIST( A1+23, VALID+6, LIST+2, LIST+3, MAKLST+68*, MAKLST+70*
CANLIST(0 VALID+4, VALID+5, VALID+6, MAKLST+72*
CSTCEN MAKLST+12~, MAKLST+50*, MAKLST1+3, MAKLST1+4, MAKLST1+5
DATA LIST+3*, LIST+4, MAKLST+12~, MAKLST+37*, MAKLST+39, MAKLST+41, MAKLST+50, MAKLST+67, MAKLST+68, MAKLST+70*
DT MAKLST+41
>> DUOUT A1+10
DUZ MAKLST+46
DUZ(2 SETUP+8, SETUP+15, MAKLST+39
EIN MAKLST+12~, MAKLST+36*, MAKLST+37, MAKLST+68, MAKLST+72
OK ACHSA44+10, A1+29, VALID+3*, VALID+7*, SETUP+3!, SETUP+20*, SETUP+21*, MAKLST+12~, MAKLST+51*, MAKLST1+6*
SEQ VALID+6*, LIST+2*, LIST+3, LIST+4, MAKLST+12~, MAKLST+68*, MAKLST+70, MAKLST+72
>> TYEAR MAKLST+68
U A1+4, A1+23, VALID+5, VALID+6, LIST+4, SETUP+8, SETUP+15, MAKLST+39, MAKLST+41, MAKLST+50
, MAKLST+67, MAKLST+68, MAKLST+70, MAKLST+72
>> Y A1+14, A1+17, A1+20*, A1+23*, VALID+4, VALID+5, VALID+6
YEAR MAKLST+12~
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All