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

Package: Contract Health Management Information System

Routine: ACHSDNA


Information

ACHSDNA ; IHS/ITSC/PMF - DENIAL LIST ALPHA BY PATIENT ;7/27/10 16:17

Source Information

Source file <ACHSDNA.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 5 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  $$REPEAT^XLFSTR  
Contract Health Management Information System 1 ($$C,$$DATE,$$DIR,$$EBB,BRPT,ERPT,FMT,RTRN)^ACHS  
VA Fileman 1 COMMA^%DTC  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Contract Health Management Information System 2 ACHS DEN REP1A  ACHSDNL3  

Entry Points

Name Comments DBIA/ICR reference
B ;
EXTR ;
START ;EP - TaskMan.
GETNAME ;
DEV ; --- Select device for report.
AMT ;EP - Write amount of denial on denial letter(s).
BDT ; --- Input date range
A2 ;
PRINT ;
DOLLARS ;EP - Get Dollar Amount for each Denial.
HDR ; --- Pagination for report.

External References

Name Field # of Occurrence
COMMA^%DTC PRINT+24
^%ZIS DEV+2
HOME^%ZIS DEV+3
^%ZISC DEV+6
^%ZTLOAD DEV+13
$$C^ACHS START+4, HDR+3
$$DATE^ACHS BDT+1, BDT+3
$$DIR^ACHS A2+1
$$EBB^ACHS BDT+5
BRPT^ACHS START+5
ERPT^ACHS START+10, PRINT+13
FMT^ACHS PRINT+9, AMT+6
RTRN^ACHS PRINT+12, PRINT+27
$$FMTE^XLFDT START+4, PRINT+7
$$REPEAT^XLFSTR PRINT+25, HDR+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!,"Please queue to system printers."
  • Line Location: DEV+6
Function Call: WRITE
  • Prompt: ACHDNAME,?38,$$FMTE^XLFDT(ACHDISU),?51,$P(ACHD0,U),?65
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("=",79),!,"TOTALS FOR THIS REPORT: ",ACHDTOT," DENIAL",$S(ACHDTOT=1:"",1:"S"),?61,X
  • Line Location: PRINT+25
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+28
Function Call: WRITE
  • Prompt: @IOF,!!,$$C^ACHS("*** CHS DENIAL ***",80),!!,ACHSLOC,!?19,"DENIAL DOCUMENTS ALPHABETICALLY BY PATIENT",?71,"Page",$J(ACHSPG,3),!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ACHSTIME,!!,ACHDT1,!!,"PATIENT",?38,"ISSUE DATE",?51,"DOCUMENT #",?70,"DOLLARS",!,$$REPEAT^XLFSTR("=",79),!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?DIWL+3,"Total amount of services denied : "
  • Line Location: AMT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: AMT+7
Routine Call
  • %ZIS
  • Line Location:
    • DEV+3
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSDEN - [#9002071] EXTR+1, EXTR+2, EXTR+3, PRINT+3, PRINT+6, GETNAME+12, DOLLARS+1, DOLLARS+3, DOLLARS+4, DOLLARS+5
, DOLLARS+6, DOLLARS+8, DOLLARS+9, DOLLARS+10, DOLLARS+11, DOLLARS+13, DOLLARS+14, DOLLARS+15
^DPT - [#2] GETNAME+19
^TMP($J START+1!, START+11!, EXTR+9*, PRINT+1, PRINT+2

Label References

Name Line Occurrences
A2 BDT+2, BDT+5
B A2+3
BDT BDT+4
DEV DEV+6, DEV+14
DOLLARS PRINT+6, AMT+2
EXTR START+7
GETNAME EXTR+7
HDR START+6, PRINT+14
PRINT START+8
START DEV+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % A2+1*, A2+3, DEV+12*
>> %ZIS DEV+1*
>> ACHD("$" PRINT+5*, PRINT+8, PRINT+17, DOLLARS+1*, DOLLARS+6*, DOLLARS+11*, DOLLARS+15*, AMT+1*, AMT+5
>> ACHD0 EXTR+3*, EXTR+5, EXTR+6, PRINT+3*, PRINT+4, PRINT+7, GETNAME+11, GETNAME+18
>> ACHDBDT A2+3*, BDT+1*, BDT+2, BDT+5, DEV+10, START+2, START+4
>> ACHDEDT A2+3*, BDT+3*, BDT+4, BDT+5, DEV+10, START+4, EXTR+1
ACHDHAT B+1*, PRINT+26!
ACHDISU START+2*, START+11!, EXTR+1*, EXTR+2, PRINT+4*, PRINT+7
ACHDNAME START+11!, EXTR+8, EXTR+9, PRINT+1*, PRINT+2, PRINT+7, GETNAME+3*, GETNAME+12*, GETNAME+13, GETNAME+14
, GETNAME+15*, GETNAME+18*, GETNAME+19*
>> ACHDT1 START+4*, HDR+4
ACHDTOT START+3*, START+11!, PRINT+16*, PRINT+25
ACHDTOT("$" START+3*, PRINT+17*, PRINT+23
>> ACHSBM PRINT+11
>> ACHSLOC HDR+3
>> ACHSPG HDR+1*, HDR+3
>> ACHSQUIT PRINT+1, PRINT+2, PRINT+11, PRINT+13*, PRINT+21
>> ACHSTIME HDR+4
DA START+11!, EXTR+2*, EXTR+3, EXTR+9, PRINT+2*, PRINT+3, PRINT+6, GETNAME+12, DOLLARS+1, DOLLARS+3
, DOLLARS+4, DOLLARS+5, DOLLARS+6, DOLLARS+8, DOLLARS+9, DOLLARS+10, DOLLARS+11, DOLLARS+13, DOLLARS+14, DOLLARS+15
DA(1 DOLLARS+4*, DOLLARS+5, DOLLARS+6, DOLLARS+9*, DOLLARS+10, DOLLARS+11, DOLLARS+14*, DOLLARS+15
>> DIWL AMT+4
>> DTOUT A2+2, PRINT+13
>> DUOUT A2+2, PRINT+13
DUZ(2 EXTR+1, EXTR+2, EXTR+3, PRINT+3, PRINT+6, GETNAME+12, DOLLARS+1, DOLLARS+3, DOLLARS+4, DOLLARS+5
, DOLLARS+6, DOLLARS+8, DOLLARS+9, DOLLARS+10, DOLLARS+11, DOLLARS+13, DOLLARS+14, DOLLARS+15
IO PRINT+27
IO("Q" DEV+4, DEV+5!
IO("S" DEV+6
IO(0 PRINT+27
IOF PRINT+28, HDR+3
IOST DEV+6
>> LEN GETNAME+14*, GETNAME+15
>> POP DEV+3
U EXTR+5, PRINT+4, PRINT+7, GETNAME+11, GETNAME+12, GETNAME+18, GETNAME+19, DOLLARS+1, DOLLARS+6, DOLLARS+11
, DOLLARS+15
>> X PRINT+8*, PRINT+23*, PRINT+25, AMT+5*
X2 ACHSDNA+6!, PRINT+8*, PRINT+23*
X3 ACHSDNA+6!, PRINT+8*, PRINT+23*
>> ZTDESC DEV+10*
>> ZTRTN DEV+10*
>> ZTSAVE( DEV+12*
ZTSK DEV+14, DEV+15!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All