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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PRCPRPCR

Package: IFCAP

Routine: PRCPRPCR


Information

PRCPRPCR ;WISC/RFJ-patient distribution costs ;11 Mar 94

Source Information

Source file <PRCPRPCR.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
IFCAP 8 SORT^PRCPRPC1  PRINT^PRCPRPC2  $$SUMMARY^PRCPURS0  DATESEL^PRCPURS2  DISTRSEL^PRCPURS3  ^PRCPUSEL  DISPLAY^PRCPUX2  $$YN^PRCPUYN  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  

Entry Points

Name Comments DBIA/ICR reference
GETDATE ; select date range
DQ ; queue starts here
Q
RANGE(TYPE)

External References

Name Field # of Occurrence
^%ZIS GETDATE+3
^%ZISC Q
^%ZTLOAD GETDATE+3
SORT^PRCPRPC1 DQ+2
PRINT^PRCPRPC2 DQ+3
$$SUMMARY^PRCPURS0 PRCPRPCR+17
DATESEL^PRCPURS2 GETDATE+2
DISTRSEL^PRCPURS3 PRCPRPCR+13
^PRCPUSEL PRCPRPCR+3
DISPLAY^PRCPUX2 PRCPRPCR+7, PRCPRPCR+12, PRCPRPCR+21, PRCPRPCR+26, PRCPRPCR+31, PRCPRPCR+36, GETDATE+1, RANGE+6, RANGE+11, RANGE+13
$$YN^PRCPUYN PRCPRPCR+38

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"THIS REPORT SHOULD ONLY BE PRINTED BY THE PRIMARY AND SECONDARY INVENTORY POINTS."
  • Line Location: PRCPRPCR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPRPCR+12
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPRPCR+21
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPRPCR+26
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPRPCR+31
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPRPCR+36
Function Call: WRITE
  • Prompt: !
  • Line Location: GETDATE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: GETDATE+3
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: GETDATE+6
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RANGE+5
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RANGE+10
Routine Call
  • %ZIS
  • Line Location:
    • GETDATE+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J PRCPRPCR+10!, PRCPRPCR+14*, Q!

Label References

Name Line Occurrences
GETDATE PRCPRPCR+18
Q PRCPRPCR+17, PRCPRPCR+22, PRCPRPCR+27, PRCPRPCR+32, PRCPRPCR+38, GETDATE+2, GETDATE+3
RANGE PRCPRPCR+22, PRCPRPCR+27, PRCPRPCR+32

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DQ+1~
%I DQ+1~
>> %ZIS GETDATE+3*
AVERAGE DQ+1~
DA DQ+1~
DATA DQ+1~
DATE DQ+1~
DATEEND PRCPRPCR+5~
DATESTRT PRCPRPCR+5~, GETDATE+2
DFN DQ+1~
DISTRALL PRCPRPCR+5~
DISTRNM DQ+1~
DISTRPT DQ+1~
DTIME RANGE+5, RANGE+10
END PRCPRPCR+5~, PRCPRPCR+23, PRCPRPCR+28, PRCPRPCR+33, RANGE+3!, RANGE+9, RANGE+10*, RANGE+14*, RANGE+15
INOUTPAT DQ+1~
IO("Q" GETDATE+3!
ITEMDA DQ+1~
NOW DQ+1~
OPCODE DQ+1~
PAGE DQ+1~
PATNAME DQ+1~
>> POP GETDATE+3
>> PRCP("DPTYPE" PRCPRPCR+4, PRCPRPCR+11
>> PRCP("I" PRCPRPCR+3, PRCPRPCR+13, PRCPRPCR+14
>> PRCP("IN" PRCPRPCR+12
PRCPFITM PRCPRPCR+5~, PRCPRPCR+38*
PRCPFLAG DQ+1~
PRCPFTOT DQ+1~
PRCPOPCE PRCPRPCR+5~, PRCPRPCR+18*, PRCPRPCR+33*
PRCPOPCS PRCPRPCR+5~, PRCPRPCR+18*, PRCPRPCR+33*
PRCPPATE PRCPRPCR+5~, PRCPRPCR+18*, PRCPRPCR+28*
PRCPPATS PRCPRPCR+5~, PRCPRPCR+18*, PRCPRPCR+28*
PRCPSUMM PRCPRPCR+5~, PRCPRPCR+17*, PRCPRPCR+18
PRCPSURE PRCPRPCR+5~, PRCPRPCR+18*, PRCPRPCR+23*
PRCPSURS PRCPRPCR+5~, PRCPRPCR+18*, PRCPRPCR+23*
SCREEN DQ+1~
SSN DQ+1~
START PRCPRPCR+5~, PRCPRPCR+22, PRCPRPCR+23, PRCPRPCR+27, PRCPRPCR+28, PRCPRPCR+32, PRCPRPCR+33, RANGE+3!, RANGE+4, RANGE+5*
, RANGE+7*, RANGE+8, RANGE+13, RANGE+15*
SURGDATA DQ+1~
SURGEON DQ+1~
SURGSPEC DQ+1~
TOTCOST DQ+1~
TYPE RANGE~, RANGE+5, RANGE+6, RANGE+10, RANGE+11, RANGE+13
VA DQ+1~
VADM DQ+1~
VAERR DQ+1~
X PRCPRPCR+5~, PRCPRPCR+6!, PRCPRPCR+7, PRCPRPCR+12!, PRCPRPCR+21!, PRCPRPCR+26!, PRCPRPCR+31!, PRCPRPCR+36!, GETDATE+1!, DQ+1~
, RANGE+2~, RANGE+5*, RANGE+6!, RANGE+7, RANGE+10*, RANGE+11!, RANGE+12*, RANGE+13!, RANGE+14
X(1 PRCPRPCR+6*, PRCPRPCR+12*, PRCPRPCR+21*, PRCPRPCR+26*, PRCPRPCR+31*, PRCPRPCR+36*, GETDATE+1*, RANGE+6*, RANGE+11*, RANGE+13*
>> XH PRCPRPCR+37*
>> XP PRCPRPCR+37*
Y PRCPRPCR+5~, DQ+1~
>> ZTDESC GETDATE+4*
>> ZTRTN GETDATE+4*
>> ZTSAVE("D*" GETDATE+5*
>> ZTSAVE("PRCP*" GETDATE+5*
>> ZTSAVE("ZTREQ" GETDATE+5*
>> ZTSAVE("^TMP($J,""PRCPURS3""," GETDATE+5*
ZTSK GETDATE+3!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All