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

Package: IHS Changes To ADT

Routine: ADGWMM


Information

ADGWMM ; IHS/ADC/PDW/ENM - INPT INSURANCE LISTING ; [ 03/25/1999 11:48 AM ]

Source Information

Source file <ADGWMM.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
IHS Changes To ADT 1 PRTOPT^ADGVAR  
IHS VA Utilities 1 ^XBCLS  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DG IHS INPAT MEDICARE/CAID  

Entry Points

Name Comments DBIA/ICR reference
Q ; -- cleanup
ZIS ; -- select device
1 ; -- current inpts only: all or one ward
RANGE ; -- ask if user wants current inpts or range of disch dates
2 ; -- discharge date range
TM ; -- queued outputs

External References

Name Field # of Occurrence
^%ZIS ZIS+1
HOME^%ZIS TM+5
^%ZISC Q+2
^%ZTLOAD TM+4
PRTOPT^ADGVAR Q+1
^DIR RANGE+3, 1+2, 1+5, 2+3, 2+5
^XBCLS ADGWMM+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?15,"INPATIENT MEDICARE/MEDICAID/INSURANCE LISTING",!!
  • Line Location: ADGWMM+3
Function Call: WRITE
  • Prompt: !!,*7,"Ending date cannot be earlier than beginning date!"
  • Line Location: 2+7
Function Call: WRITE
  • Prompt: !,"Let's start over . . ",!
  • Line Location: 2+8
Routine Call
  • %ZIS
  • Line Location:
    • TM+5
Routine Call
  • DIR
  • Line Location:
    • RANGE+3
    • 1+2
    • 1+5
    • 2+3
    • 2+5
Routine Call
  • %ZIS
  • Line Location:
    • ZIS+1

Label References

Name Line Occurrences
1 RANGE+4, RANGE+5
2 RANGE+5, 2+6
@( ZIS+2
Q RANGE+3, RANGE+4, RANGE+5, ZIS+1, TM+5
TM ZIS+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS ZIS+1*
D Q+4!
DFN Q+4!
DGBD 2+3*, 2+6, Q+3!
DGED 2+9*, Q+3!
>> DGSTOP Q+1
DGT RANGE+3*, RANGE+4, RANGE+5, ZIS+2, TM+1, Q+3!
DGTYP Q+3!
DGW ZIS+2, TM+1, 1+3*, 1+5*, Q+3!
DIC Q+4!
DIC(0 Q+4!
DIR RANGE+1!, 1+1~, 1+5~, 2+2!, 2+4!, Q+3!
DIR("A" RANGE+1*, 1+2*, 2+2*, 2+4*
DIR("B" 1+1*
DIR(0 RANGE+2*, 1+1*, 1+5*, 2+2*, 2+4*
>> DIRUT RANGE+3, RANGE+4, RANGE+5, 1+2, 1+5, 2+1, 2+3, 2+5
ED Q+4!
EED Q+4!
I TM+3*, Q+4!
IFN Q+4!
INSN Q+4!
INSNM Q+4!
IO("Q" ZIS+1
ION TM+2
IOST Q+1
LN Q+4!
MCDN Q+4!
MCRN Q+4!
>> POP ZIS+1
R Q+4!
T Q+4!
U 1+5
W Q+4!
X ZIS+2*, Q+4!
Y RANGE+3, 1+3, 1+5, 2+3, 2+6, 2+9, Q+4!
>> ZTDESC TM+2*
>> ZTIO TM+2*
>> ZTRTN TM+1*
>> ZTSAVE( TM+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All