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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APCDFPRG

Package: Patient Care Component

Routine: APCDFPRG


Information

APCDFPRG ; IHS/CMI/LAB - PURGE FORMS TRACKING DATA ;

Source Information

Source file <APCDFPRG.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 2 ^%DT  ^DIE  

Entry Points

Name Comments DBIA/ICR reference
ZIS
EOJ ;
DRIVER ;
PURGE ;
INIT ;
KILL ;
TSKMN ;
GETDATE ;

External References

Name Field # of Occurrence
^%DT GETDATE+2
^%ZIS ZIS
^%ZISC EOJ+3
^%ZTLOAD TSKMN+2
^DIE KILL+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: ZIS+0
Function Call: WRITE
  • Prompt: !!,"A Total of ",APCDCNT," Dates Purged.",!
  • Line Location: DRIVER+2
Function Call: WRITE
  • Prompt: !!,"Purging Data from Forms Tracking File!"
  • Line Location: INIT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: GETDATE+2
Function Call: WRITE
  • Prompt: !,"****ERROR DELETING POSTING DATE ",APCDX," ***** - Notify Programmer!"
  • Line Location: KILL+3
Routine Call
  • DIE
  • Line Location:
    • KILL+2
Routine Call
  • %ZIS
  • Line Location:
    • ZIS

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^APCDFORM - [#9001001.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCDFORM("B" PURGE+1
^DD("DD" GETDATE+1, GETDATE+4

Label References

Name Line Occurrences
EOJ APCDFPRG+4, ZIS+1, ZIS+2, DRIVER+3
GETDATE APCDFPRG+3
INIT APCDFPRG+2
KILL PURGE+1
PURGE DRIVER+1
TSKMN ZIS+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % TSKMN+1*
%DT GETDATE+2*, EOJ+1!
%DT("A" GETDATE+2*
>> %ZIS ZIS*
APCDCNT DRIVER+2, INIT+2*, KILL+5*, EOJ+1!
APCDDTP GETDATE+1*, EOJ+1!
APCDDUZ EOJ+1!
APCDPGE GETDATE+4*, PURGE+1, EOJ+1!
APCDPGEY GETDATE+4*, EOJ+1!
APCDQUIT APCDFPRG+4, INIT+3!, GETDATE+3*
APCDX PURGE+1*, KILL+3, EOJ+1!
APCDY PURGE+1*, KILL+2, EOJ+1!
D EOJ+1!
D0 EOJ+1!
D1 EOJ+1!
DA KILL+1!, KILL+2*, KILL+4!, EOJ+1!
DIC EOJ+1!
DIE KILL+1!, KILL+2*, KILL+4!, EOJ+1!
DIU KILL+1!
DIV KILL+1!
DQ EOJ+1!
DR KILL+2*, KILL+4!, EOJ+1!
DT GETDATE+1
IO("Q" ZIS+2
>> IOCPU TSKMN+2
ION TSKMN+2
POP ZIS+1, EOJ+1!
X KILL+1!, KILL+4!, EOJ+1!
Y GETDATE+1*, GETDATE+3, GETDATE+4, KILL+1!, KILL+3, KILL+4!, EOJ+1!
>> ZTCPU TSKMN+2*
>> ZTDESC TSKMN+2*
>> ZTDTH TSKMN+2*
>> ZTIO TSKMN+2*
>> ZTQUEUED EOJ+2
>> ZTREQ EOJ+2*
>> ZTRTN TSKMN+2*
ZTSAVE TSKMN+1!
ZTSAVE( TSKMN+1*
ZTSK KILL+3, EOJ+2!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All