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

Package: IHS Changes To ADT

Routine: ADGCRBL2


Information

ADGCRBL2 ; IHS/ADC/PDW/ENM - PRINT CODED A SHEET LIST ; [ 03/25/1999 11:48 AM ]

Source Information

Source file <ADGCRBL2.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 ^%ZISC  $$FMTE^XLFDT  
IHS Changes To ADT 1 (KILL,TIME)^ADGUTIL  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Changes To ADT 1 ADGCRBL1  

Entry Points

Name Comments DBIA/ICR reference
END1
HEAD ;***> print heading
END ;***> eoj
DS4
DS2
DS3
DS1
DSCH ;***> sort by discharge dates and print info
NEWPG ;***> subrtn for end of page control
TOTAL ;***> print totals

External References

Name Field # of Occurrence
^%ZISC END1+1
KILL^ADGUTIL END1
TIME^ADGUTIL HEAD+5
^DIR END+2, NEWPG+2
$$FMTE^XLFDT DS1+3, DS4+7, DS4+8, DS4+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?25,"DISCHARGED ON: ",$$FMTE^XLFDT(DGZDDT,"2D"),!
  • Line Location: DS1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DS2+1
Function Call: WRITE
  • Prompt: !,$E(DGZNAME,1,20),?25,$J(DGCHT,6)
  • Line Location: DS4+6
Function Call: WRITE
  • Prompt: ?35,$$FMTE^XLFDT(DGZVDT,"2D")
  • Line Location: DS4+7
Function Call: WRITE
  • Prompt: ?49,$$FMTE^XLFDT(Y,"2D")
  • Line Location: DS4+8
Function Call: WRITE
  • Prompt: ?62,$$FMTE^XLFDT(Y,"2D")
  • Line Location: DS4+10
Function Call: WRITE
  • Prompt: !!?10,"Total Coded A Sheets: ",DGZTOT
  • Line Location: TOTAL+1
Function Call: WRITE
  • Prompt: !?16,"Total Exported: ",DGZETOT,!
  • Line Location: TOTAL+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END1+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: ?11,"*****Confidential Patient Data Covered by Privacy Act*****"
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !,DGDUZ,?(80-$L(DGFAC)/2),DGFAC,?70,"Page ",DGPAGE
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: ?33,"CODED A SHEETS"
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: ?33,"CODED A SHEETS"
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: ?28,"for ",$E(DGZBDT,4,5)_"/"_$E(DGZBDT,6,7)_"/"_$E(DGZBDT,2,3)
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: " to ",$E(DGZEDT,4,5)_"/"_$E(DGZEDT,6,7)_"/"_$E(DGZEDT,2,3)
  • Line Location: HEAD+7
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?25,"CHART #",?35,"ADMIT DATE"
  • Line Location: HEAD+8
Function Call: WRITE
  • Prompt: ?49,"LAST MOD",?62,"EXPORTED ON",!,DGLIN,!
  • Line Location: HEAD+9
Routine Call
  • DIR
  • Line Location:
    • END+2
    • NEWPG+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] DS4+5
^AUPNVSIT - [#9000010] DS4+8, DS4+9
^DD("DD" HEAD+5
^DIC(4 - [#4] ADGCRBL2+7
^TMP("DGZCRBL" DS1, DS2, DS3, DS4, DS4+3, END1+1!
^VA(200 - [#200] ADGCRBL2+6

Label References

Name Line Occurrences
DS1 DS2+1
DS2 DS3
DS3 DS4+1
DS4 DS4+12
END DS1+2
END1 DS4+11
HEAD DSCH+1, NEWPG+1, NEWPG+3
NEWPG DS1+2, DS4+11
TOTAL DS1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN DS2+2*, DS3*, DS4, DS4+3, DS4+5
>> DGCHT DS4+5*, DS4+6
>> DGDUZ ADGCRBL2+6*, HEAD+4
>> DGFAC ADGCRBL2+7*, HEAD+4
>> DGLIN ADGCRBL2+8*, HEAD+9
>> DGPAGE ADGCRBL2+5*, NEWPG+2, HEAD+1, HEAD+2*, HEAD+4
>> DGSTOP ADGCRBL2+5*, DS1+2, DS4+11, NEWPG+1*, NEWPG+2*, NEWPG+3
>> DGSTR DS4+3*, DS4+4
>> DGZBDT HEAD+6
>> DGZDDT DSCH+1*, DS1*, DS1+3, DS2, DS3, DS4, DS4+3
>> DGZEDT HEAD+7
>> DGZETOT ADGCRBL2+4*, DS4+9*, TOTAL+2
>> DGZIDFN DS3+1*, DS4*, DS4+1, DS4+3
>> DGZNAME DS1+1*, DS2*, DS2+1, DS3, DS4, DS4+3, DS4+6
>> DGZTOT ADGCRBL2+4*, DS4+4*, TOTAL+1
>> DGZVDFN DS4+4*, DS4+8, DS4+9
>> DGZVDT DS4+4*, DS4+7
DIR END+1!, NEWPG+2!
DIR("A" END+2*
DIR(0 END+2*, NEWPG+2*
DT HEAD+5
DUZ ADGCRBL2+6
DUZ(2 ADGCRBL2+7, DS4+5
IOF END1, HEAD+1
IOSL DS1+2, DS4+11
IOST END+2, NEWPG+1, HEAD+1
U ADGCRBL2+6, ADGCRBL2+7, DS1+2, DS4+4, DS4+5, DS4+8, DS4+9, DS4+11, NEWPG+3
>> X NEWPG+2
>> Y DS4+8*, DS4+9*, DS4+10, HEAD+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All