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

Package: Patient Care Component Data Transmission

Routine: APCPSR


Information

APCPSR ; IHS/TUCSON/LAB - PCC Operational Summary AUGUST 14, 1992 ; [ 08/17/03 8:19 PM ]

Source Information

Source file <APCPSR.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Patient Care Component Data Transmission 4 CHKSITE^APCPDRI  V^APCPSR1  SET^APCPSR11  ^APCPSRP  
VA Fileman 2 DD^%DT  ^DIC  
IHS VA Utilities 1 ^XBDBQUE  
Kernel 1 $$FMADD^XLFDT  

Entry Points

Name Comments DBIA/ICR reference
LOG ;
PROCESS ; Entry point for Taskman
START ;
XIT ;
PRINT ;EP
ZIS ;call to XBDBQUE

External References

Name Field # of Occurrence
DD^%DT LOG+12
CHKSITE^APCPDRI PROCESS+5
V^APCPSR1 PROCESS+7
SET^APCPSR11 PROCESS+8
^APCPSRP PRINT+1
^DIC LOG+2
^XBDBQUE ZIS+2
$$FMADD^XLFDT PROCESS+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"********** PCC DATA TRANSMISSION SUMMARY REPORT **********",!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !!,"This report presents a summary of data for a single PCC Data Transmission",!,"Log entry.",!!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!,"Visit data has already been purged!!"
  • Line Location: LOG+4
Function Call: WRITE
  • Prompt: !!,"Log entry ",APCPSR("LOG"),", was for date range ",APCPSR("PRINT BEGIN")," through",!,APCPSR("PRINT END")," and generated ",APCPSR("COUNT")," transactions from ",APCPSR("VISITS")," visits.",!!
  • Line Location: LOG+9
Function Call: WRITE
  • Prompt: !,$C(7),$C(7),"CAN'T FIND PHARMACY CLINIC IN CLINIC STOP FILE"
  • Line Location: LOG+10
Routine Call
  • DIC
  • Line Location:
    • LOG+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^APCPLOG - [#9001005] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCPLOG - [#9001005] LOG+4, LOG+5, LOG+8
^DD("DD" LOG+6, LOG+7
^XTMP("APCPSR" PROCESS+2!, PROCESS+3*, PRINT+2!
^XTMP("APCPSRP" PROCESS+2!, PRINT+2!

Label References

Name Line Occurrences
LOG LOG+4
XIT LOG+2, ZIS+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APCDOVRR PROCESS+6*, XIT+2!
APCPBTH PROCESS+1*, PROCESS+2, PRINT+2, XIT+2!
APCPJOB PROCESS+1*, PROCESS+2, PRINT+2, XIT+2!
APCPS XIT+2!
APCPSR PROCESS+6*, XIT+2!
APCPSR("BT" PROCESS+4*
APCPSR("COUNT" LOG+5*, LOG+9
APCPSR("DTP" LOG+12*
APCPSR("ET" PROCESS+9*
APCPSR("LOG" LOG+1*, LOG+3*, LOG+4, LOG+5, LOG+8, LOG+9
APCPSR("ORIG TX DATE" , LOG+5*
APCPSR("PRINT BEGIN" , LOG+6*, LOG+9,  END" , LOG+7*, LOG+9
APCPSR("RUN B EGIN" , LOG+5*, LOG+6
APCPSR("RUN E ND" , LOG+5*, LOG+7
APCPSR("VISITS" LOG+8*, LOG+9
APCPVAR XIT+2!
DA XIT+1!
DIC LOG+2!*, XIT+1!
DIC(0 LOG+2*
DIE XIT+1!
DIR XIT+1!
DT LOG+12, PROCESS+3
IOF START+1
POP XIT+1!
U LOG+5, LOG+8
>> X LOG+5*
>> XBNS ZIS+1*
>> XBRC ZIS+1*
>> XBRP ZIS+1*
>> XBRX ZIS+1*
>> Y LOG+2, LOG+3, LOG+6*, LOG+7*, LOG+12*
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