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 |  Local Variables |  All
Print Page as PDF
Routine: ACHSDNL

Package: Contract Health Management Information System

Routine: ACHSDNL


Information

ACHSDNL ; IHS/ITSC/PMF - DENIAL LTR/FS (OPTS) (1/6) ; [ 10/31/2003 11:44 AM ]

Source Information

Source file <ACHSDNL.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Contract Health Management Information System 4 ($$DATE,$$DIR,$$DN,$$EBB)^ACHS  SETCK^ACHSDF1  ^ACHSDLK  ^ACHSDNL1  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Contract Health Management Information System 3 ACHS DEN LETTER  ACHSDENLETTER  ACHSDNL1  

Entry Points

Name Comments DBIA/ICR reference
Q1 ;EP - From DIR.
CPY ; --- Set default number of copies
P6 ;
P7 ;
P4 ;
P5 ;
P8 ;
QSEL ;EP - From DIR.
P5A ;
DEV ; --- Select print device
C2B ;
BDT ; --- Input begin date
END ;EP
EDT ; --- Input end date
C2 ;
C3 ;
PAT ; --- Select Denial
C1 ;
SEL ;
NAMERR ;

External References

Name Field # of Occurrence
^%ZIS DEV+3
HOME^%ZIS DEV+4
^%ZISC DEV+7, END+1
^%ZTLOAD DEV+17
$$DATE^ACHS BDT+2, EDT+1
$$DIR^ACHS SEL+2, PAT+6, P4+3, P8+1, C1+2, C2+1, C2B+3, C3+1
$$DN^ACHS PAT+6, P5+4, P5+5
$$EBB^ACHS EDT+3
SETCK^ACHSDF1 ACHSDNL+6
^ACHSDLK PAT+3
^ACHSDNL1 DEV+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: P4+8
Function Call: WRITE
  • Prompt: *7,!,"NO PRIMARY PROVIDER FOR THIS DENIAL"
  • Line Location: P5+2
Function Call: WRITE
  • Prompt: !,ACHDP,". ",$P(ACHDPROV(ACHDP),U)
  • Line Location: P5A+1
Function Call: WRITE
  • Prompt: !,ACHDP,". ",$P(ACHDPROV(ACHDP),U)
  • Line Location: P6+9
Function Call: WRITE
  • Prompt: "NO SECONDARY PROVIDERS FOR THIS DENIAL",!
  • Line Location: P7+2
Function Call: WRITE
  • Prompt: !,ACHDP,". ",$P(ACHDPROV(ACHDP),U)
  • Line Location: P7+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: *7,!,"Please queue to system printers."
  • Line Location: DEV+7
Function Call: WRITE
  • Prompt: !!,"You may print any number of letters from 0 to 10.",!!
  • Line Location: Q1+1
Function Call: WRITE
  • Prompt: !!?20,"1) Print individual ltrs & fact sheet",!!?20,"2) Print range by Issue Date"
  • Line Location: QSEL+1
Function Call: WRITE
  • Prompt: !!,*7,"No valid PATIENT NAME in this file.",!,"No letter may be printed until a valid patient is entered.",!!
  • Line Location: NAMERR+1
Routine Call
  • %ZIS
  • Line Location:
    • DEV+4
Routine Call
  • %ZIS
  • Line Location:
    • DEV+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSDEN - [#9002071] P4+2, P5+2, P6+2, P6+3, P6+8, P7+1, P7+4
^ACHSDENR - [#9002072] CPY+2, CPY+5
^AUTTVNDR - [#9999999.11] P5+4, P6+8

Label References

Name Line Occurrences
BDT SEL+5, EDT+2, EDT+3
C1 C2+2
C2 C1+1, C2B+4
C2B C3+4
CPY P4+2, P4+6, P8+5
DEV DEV+7, DEV+18
END SEL+6, PAT+4, PAT+6, P4+4, P8+2, C1+4, C2+3, C2B+5, C3+6, DEV+4
P5A P5+4
P6 P5+2, P6+4, P6+11
P7 P6+2, P6+7, P7+7
P8 P7+2, P7+3
PAT SEL+4, PAT+6, P4+5, P8+3, NAMERR+2
QSEL SEL+1
SEL BDT+3, C1+1, C1+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PAT+6*, P4+3*, P4+6, P8+1*, P8+4, CPY+2*, DEV+14*
>> %ZIS DEV+2*
ACHD END+5!
ACHD("CPY" CPY+2*, CPY+5*, C1+2, C2+1, C2B+3, C3+1
ACHDALT END+7!
ACHDBDT BDT+1!, BDT+2*, BDT+3!, EDT+3, C3+7*
ACHDCFAC CPY+1*, C3+1*, END+5!
ACHDCOFF C2B+3*, END+5!
ACHDCPAT CPY+1*, C1+2*, END+5!
ACHDCVEN CPY+1*, C2+1*, END+5!
ACHDEDT BDT+1!, EDT+1*, EDT+2, EDT+3, C3+7*
>> ACHDLKER PAT+4
ACHDNAMP END+7!
>> ACHDOCT PAT+1*
ACHDONE END+7!
ACHDP P4+7*, P5+1*, P5+4, P5+5, P5A+1, P5A+2*, P6+8, P6+9, P6+10*, P7+2
, P7+4, P7+5, P7+6*, P8+1, END+5!
ACHDPRE END+7!
>> ACHDPROV( P5+4*, P5+5*, P5A+1, P6+8*, P6+9, P7+4*, P7+5, P8+4
ACHDPROZ P8+4*, C1+1, END+5!
>> ACHDX P5A+2*, P6+3*, P6+4, P6+7, P6+8
>> ACHDXQT ACHSDNL+7
ACHSA P4+2, P5+2, P6+2, P6+3, P6+8, P7+1, P7+4, C3+8*, END+5!
ACHSBPNO END+5!
ACHSCNT END+7!
ACHSDBCN END+7!
ACHSDBCP END+7!
ACHSIII END+7!
ACHSNFAC END+7!
ACHSQUIT END+7!
ACHSST END+7!
ACHSVPT END+7!
DFN PAT+2!
DIW END+6!
DIWL END+6!
DIWR END+6!
DIWT END+6!
DTOUT PAT+6, P4+4, P8+2, C1+4, C2+3, C2B+5, C3+6, END+6!
DUOUT PAT+6, P4+5, P8+3, C1+1, C1+3, C2+2, C2B+4, C3+4, END+6!
DUZ(2 P4+2, P5+2, P6+2, P6+3, P6+8, P7+1, P7+4, CPY+2, CPY+5
IO("Q" DEV+5, DEV+6!
IO("S" DEV+7
IOST DEV+7
>> POP DEV+4
U P5+4, P5A+1, P6+8, P6+9, P7+4, P7+5, CPY+2, CPY+5
>> X P6+1*, P7+1*, P7+2, P7+3, P7+4
X2 ACHSDNL+8!
X3 ACHSDNL+8!
>> Y SEL+2*, SEL+4, SEL+5
>> ZTDESC DEV+8*
>> ZTRTN DEV+8*
>> ZTSAVE( DEV+14*
ZTSK DEV+18, END+6!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All