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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCPRODA

Package: IFCAP

Routine: PRCPRODA


Information

PRCPRODA ;WOIFO/VAC-On-Demand Audit Activity Report ; 2/22/07 9:05am

Source Information

Source file <PRCPRODA.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
IFCAP 7 $$GROUPNM^PRCPEGRP  ($$SCRPAUSE,END,P)^PRCPUREP  GROUPSEL^PRCPURS1  DATESEL^PRCPURS2  ^PRCPUSEL  $$DESCR^PRCPUX1  ($$SINGIT,$$SRTPRMP,DISPLAY)^PRCPUX2  
Kernel 4 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  $$FMTE^XLFDT  
VA FileMan 2 DD^%DT  (,NOW)^%DTC  

Entry Points

Name Comments DBIA/ICR reference
PRIMARY ;This routine displays the audit information on On-Demand Items updates
DESC ; Ask user for Item#/Description sort preference
BEGIN
DQ ; queue starts here
REPORT ; Print Report
Q
H ;PRINT HEADING

External References

Name Field # of Occurrence
DD^%DT REPORT+1
^%DTC PRIMARY+29
NOW^%DTC REPORT+1
^%ZIS BEGIN
HOME^%ZIS BEGIN
^%ZISC Q
^%ZTLOAD BEGIN
$$S^%ZTLOAD REPORT+4
$$GROUPNM^PRCPEGRP REPORT+8
$$SCRPAUSE^PRCPUREP REPORT+1
END^PRCPUREP REPORT+25
P^PRCPUREP REPORT+5, REPORT+17, REPORT+21
GROUPSEL^PRCPURS1 PRIMARY+33
DATESEL^PRCPURS2 PRIMARY+28
^PRCPUSEL PRIMARY+6
$$DESCR^PRCPUX1 PRIMARY+19, DQ+7
$$SINGIT^PRCPUX2 PRIMARY+12
$$SRTPRMP^PRCPUX2 DESC+1
DISPLAY^PRCPUX2 PRIMARY+8, PRIMARY+11, PRIMARY+26, PRIMARY+32
$$FMTE^XLFDT REPORT+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PRIMARY+24
Function Call: WRITE
  • Prompt: !,"-- TOTAL NUMBER OF DAYS: ",X+1,!
  • Line Location: PRIMARY+30
Function Call: WRITE
  • Prompt: !,"*** NO GROUP CATEGORIES SELECTED !"
  • Line Location: PRIMARY+34
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: BEGIN+4
Function Call: WRITE
  • Prompt: !?10,"<<< TASKMANAGER JOB TERMINIATED BY USER >>>"
  • Line Location: REPORT+4
Function Call: WRITE
  • Prompt: !?7,"GROUP: ",GRPDESC,!
  • Line Location: REPORT+10
Function Call: WRITE
  • Prompt: !,$P(ITEMDA,"^",1),?9,$P(ITEMDA,"^",2)
  • Line Location: REPORT+18
Function Call: WRITE
  • Prompt: !
  • Line Location: REPORT+23
Function Call: WRITE
  • Prompt: !
  • Line Location: REPORT+24
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+1
Function Call: WRITE
  • Prompt: "ON-DEMAND AUDIT FOR: ",$E(PRCP("IN"),1,20),?(80-$L(%)),%
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,"IM#",?9,"DESCRIPTION"
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !,?32,"INVENTORY POINT"
  • Line Location: H+5
Function Call: WRITE
  • Prompt: !,?3,"SETTING",?12,"DATE/TIME",?38,"USER",?49,"REASON"
  • Line Location: H+6
Function Call: WRITE
  • Prompt: !,%,!
  • Line Location: H+7
Routine Call
  • %ZIS
  • Line Location:
    • BEGIN
Routine Call
  • %ZIS
  • Line Location:
    • BEGIN

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCP(445 - [#445] PRIMARY+17, PRIMARY+21, PRIMARY+22, PRIMARY+23, DQ+4, DQ+6, DQ+18, DQ+19, DQ+23
^TMP($J PRIMARY+4!, PRIMARY+23*, PRIMARY+34, DQ+13, DQ+23*, REPORT+3, REPORT+11, REPORT+12, REPORT+14, REPORT+15
, Q!
^VA(200 - [#200] REPORT+20

Label References

Name Line Occurrences
BEGIN PRIMARY+15
DESC DESC+3
H REPORT+1, REPORT+5, REPORT+17, REPORT+21
Q PRIMARY+28, PRIMARY+34
REPORT DQ+3

Naked Globals

Name Field # of Occurrence
^( DQ+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DQ+1~, REPORT+1, H+1*, H+2, H+3*, H+7
>> %ZIS BEGIN*
CTR DQ+1~
D DQ+1~, DQ+4*, DQ+9
DAT DQ+2~
DATE0 DQ+2~, REPORT+19*
DATE1 DQ+2~, REPORT+19*, REPORT+22
DATE2 DQ+2~, REPORT+19*, REPORT+22
DATEEND PRIMARY+2~, PRIMARY+5*, PRIMARY+28, PRIMARY+29, DQ+21
DATESTRT PRIMARY+2~, PRIMARY+5*, PRIMARY+29, DQ+20
DESCR PRIMARY+2~, PRIMARY+19*, PRIMARY+20*, PRIMARY+23, DQ+1~, DQ+7*, DQ+16, DQ+23
DIST DQ+2~, REPORT+11*, REPORT+12, REPORT+14, REPORT+15
GR PRIMARY+1~, DQ+13*, DQ+14
GROUP PRIMARY+1~, DQ+9*, REPORT+3*, REPORT+6, REPORT+7, REPORT+8, REPORT+9, REPORT+11, REPORT+12, REPORT+14
REPORT+15
GROUPALL PRIMARY+1~, PRIMARY+34, PRIMARY+35, DQ+11, DQ+12
GROUPYES PRIMARY+1~, DQ+10*, DQ+11*, DQ+14*, DQ+15
GRPDESC DQ+2~, REPORT+6*, REPORT+8*, REPORT+9*, REPORT+10
GRPFLG PRIMARY+2~, PRIMARY+17*, PRIMARY+18*, PRIMARY+23, DQ+9*, DQ+14, DQ+23
I PRIMARY+21*, PRIMARY+22, PRIMARY+23, DQ+1~, DQ+18*, DQ+19, DQ+23
IO REPORT+1
IO("Q" BEGIN!
IOF H+1
IOSL REPORT+5, REPORT+17, REPORT+21
ITEMDA DQ+1~, DQ+4*, DQ+6, DQ+7, DQ+17, DQ+18, DQ+19, DQ+23, REPORT+15*, REPORT+18
REPORT+19, REPORT+20, REPORT+22
ITEMFLG PRIMARY+1~, REPORT+13*, REPORT+16, REPORT+18*
ITEMSEL PRIMARY+2~, PRIMARY+12*, PRIMARY+13, PRIMARY+15, PRIMARY+16, PRIMARY+17, PRIMARY+19, PRIMARY+21, PRIMARY+22, PRIMARY+23
DQ+3
NOW PRIMARY+2~, REPORT+1*, H+1
ORDER PRIMARY+2~, PRIMARY+16*, PRIMARY+23, DQ+1~, DQ+16*, DQ+17*, DQ+23, REPORT+12*, REPORT+14, REPORT+15
PAGE DQ+1~, REPORT+1*, H+1*
PERS1 PRIMARY+1~, REPORT+20*
PERSNAM PRIMARY+1~, REPORT+20*, REPORT+22
POP PRIMARY+3~, BEGIN
>> PRCP("I" PRIMARY+6, PRIMARY+12, PRIMARY+17, PRIMARY+19, PRIMARY+21, PRIMARY+22, PRIMARY+23, PRIMARY+33, DQ+4, DQ+6
DQ+7, DQ+18, DQ+19, DQ+23
>> PRCP("IN" H+2
PRCPFLAG PRIMARY+2~, DQ+2~, REPORT+3, REPORT+4*, REPORT+5, REPORT+11, REPORT+12, REPORT+14, REPORT+16, REPORT+17
REPORT+21, REPORT+25
SCREEN DQ+1~, REPORT+1*, REPORT+5, REPORT+17, REPORT+21, H+1
SRT PRIMARY+1~, DESC+1*, DESC+2, DESC+3, DQ+16, DQ+17
TIMFLG PRIMARY+1~, PRIMARY+22*, PRIMARY+23, DQ+19*, DQ+20, DQ+21, DQ+22*, DQ+23, REPORT+14*, REPORT+15
X PRIMARY+1~, PRIMARY+7!, PRIMARY+8, PRIMARY+10!, PRIMARY+11, PRIMARY+25!, PRIMARY+26, PRIMARY+30, PRIMARY+31!, PRIMARY+32!
DQ+1~
X(1 PRIMARY+7*, PRIMARY+10*, PRIMARY+25*, PRIMARY+31*, PRIMARY+32*
X1 PRIMARY+2~, PRIMARY+29*
X2 PRIMARY+2~, PRIMARY+29*
Y PRIMARY+1~, DQ+1~, REPORT+1*
ZTDESC PRIMARY+3~, BEGIN+1*
ZTQUEUED PRIMARY+3~, REPORT+4
ZTRTN PRIMARY+3~, BEGIN+1*
ZTSAVE PRIMARY+3~
ZTSAVE("DATE*" BEGIN+3*
ZTSAVE("GROUP*" BEGIN+2*
ZTSAVE("ITEM*" BEGIN+3*
ZTSAVE("PRCP*" BEGIN+2*
ZTSAVE("S*" BEGIN+2*
ZTSAVE("ZTREQ" BEGIN+2*
ZTSAVE("^TMP($J,""PRCPURS1""," BEGIN+2*
ZTSK BEGIN!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All