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

Package: Patient Care Component Data Transmission

Routine: APCPSRP4


Information

APCPSRP4 ; IHS/TUCSON/LAB - PRINT . SECTION AUGUST 14, 1992 ; [ 08/17/03 8:20 PM ]

Source Information

Source file <APCPSRP4.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Patient Care Component Data Transmission 1 HEAD^APCPSRP  
VA Fileman 1 DD^%DT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component Data Transmission 1 APCPSRP  

Entry Points

Name Comments DBIA/ICR reference
LOC ;
VD ;
PROC ;
PRNTDATE ;
EOJ ;
PROC1 ;
PROVDISC ;
PRNTPTR ;
PRNT ;
CLINIC ;
ERROR ;
SC ;
TYPE ;

External References

Name Field # of Occurrence
DD^%DT PRNTDATE+1
HEAD^APCPSRP APCPSRP4+4, PROC+1, PRNT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There were NO Community Health Nursing Activity (CHA) transactions generated.",!!
  • Line Location: APCPSRP4+5
Function Call: WRITE
  • Prompt: !!,"There were ",^XTMP("APCPSR",APCPJOB,APCPBTH,"SKIPPED","CHAACTERR")," visits on which a Community Health Nurse was a provider.",!,"These visits DID NOT have an ACTIVITY TIME recorded, therefore they DID NOT"
  • Line Location: ERROR+2
Function Call: WRITE
  • Prompt: !,"generate a transaction record to be passed to the CHA System.",!,"This should be reviewed.",!
  • Line Location: ERROR+3
Function Call: WRITE
  • Prompt: !!?10,APCPSR("T")
  • Line Location: PROC+2
Function Call: WRITE
  • Prompt: !?13,Y,?45,$J(^XTMP("APCPSR",APCPJOB,APCPBTH,"GEN",APCPSR("2"),APCPSR("N")),7)
  • Line Location: PRNTDATE+1
Function Call: WRITE
  • Prompt: !!?10,APCPSR("T")
  • Line Location: PRNT+1
Function Call: WRITE
  • Prompt: " (cont.)"
  • Condition for execution: APCPSR("WC")>0
  • Line Location: PRNT+1
Function Call: WRITE
  • Prompt: !?13,APCPSR("D"),?45,$J(X,7)
  • Line Location: PRNT+5
Function Call: WRITE
  • Prompt: !?13,$P(@G@(0),U,APCPSR("PIECE")),?45,$J(X,7)
  • Line Location: PRNTPTR+2
Function Call: WRITE
  • Prompt: ?55,"(IHS CODE: ",$P(^AUTTLOC(APCPSR("D"),0),U,10),")"
  • Line Location: PRNTPTR+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCPLOG - [#9001005] APCPSRP4+5
^AUTTLOC - [#9999999.06] PRNTPTR+3
^XTMP("APCPSR" ERROR+1, ERROR+2, PROC+3, PROC1+2, PRNTDATE+1, PRNT+3

Label References

Name Line Occurrences
EOJ ERROR+1
ERROR APCPSRP4+5
PRNT PROC1+1, PROC1+2
PRNTDATE PRNT+2
PRNTPTR PRNT+4
PROC VD+3, TYPE+2, LOC+2, SC+2, CLINIC+2, PROVDISC+2
PROC1 PROC+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCPBTH ERROR+1, ERROR+2, PROC+3, PROC1+2, PRNTDATE+1, PRNT+3
>> APCPJOB ERROR+1, ERROR+2, PROC+3, PROC1+2, PRNTDATE+1, PRNT+3
>> APCPSR("1" VD+2*, TYPE+1*, LOC+1*, SC+1*, CLINIC+1*, PROVDISC+1*, PRNT+2, PRNTPTR+3
>> APCPSR("2" VD+2*, TYPE+1*, LOC+1*, SC+1*, CLINIC+1*, PROVDISC+1*, PROC+3, PROC1+1, PROC1+2, PRNTDATE+1
, PRNT+3
>> APCPSR("D" PROC1+2*, PRNT+3, PRNT+5, PRNTPTR+1, PRNTPTR+3
>> APCPSR("GLOBAL" LOC+1*, PRNTPTR+1
>> APCPSR("LOG" APCPSRP4+5
>> APCPSR("N" PROC+3*, PROC1+2, PRNTDATE+1, PRNT+3
>> APCPSR("PIECE" LOC+1*, PRNTPTR+2
>> APCPSR("PTR" VD+2*, TYPE+1*, LOC+1*, SC+1*, CLINIC+1*, PROVDISC+1*, PRNT+4
>> APCPSR("QUIT" APCPSRP4+4, VD+3, TYPE+2, LOC+2, SC+2, CLINIC+2, PROVDISC+2, PROC+1, PROC+3, PRNT+1
>> APCPSR("T" VD+2*, TYPE+1*, LOC+1*, SC+1*, CLINIC+1*, PROVDISC+1*, PROC+2, PRNT+1
>> APCPSR("WC" VD+2*, TYPE+1*, LOC+1*, SC+1*, CLINIC+1*, PROVDISC+1*, PRNTDATE+1*, PRNT+1, PRNT+5*, PRNTPTR+2*
G PRNTPTR+1*, PRNTPTR+2, PRNTPTR+4!
IOSL APCPSRP4+4, PROC+1, PRNT+1
U APCPSRP4+5, PRNTPTR+2, PRNTPTR+3
>> X PRNT+3*, PRNT+5, PRNTPTR+2
>> Y PRNTDATE+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All