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

Package: IFCAP

Routine: PRCPSLOI


Information

PRCPSLOI ;WISC/RFJ-create and transmit 663,669 code sheets ;19 Feb 92

Source Information

Source file <PRCPSLOI.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
IFCAP 2 $$ERROR^PRCPSLOR  TRANSMIT^PRCPSMCL  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IFCAP 2 PRCPSLOR  PRCPWPL5  

Entry Points

Name Comments DBIA/ICR reference
DQ(TRANNO,TRANID) ; create/trans receiving code sheets to log
; tranno=transaction number
; tranid=tran register id number
ASKDEPT ; ask department number
; prcpflag is returned if incorrect response
ASKPER ; ask dietetic period
; prcpflag is returned if incorrect response
ASKDEPOT ; ask depot number (field 107 in 442)
; prcpflag is returned if incorrect response
ASKVOUCH ; ask depot voucher number (field .09 in 442)
; prcpflag is returned if incorrect response
ASKREQNO ; ask requisition number (supply) (field 102.4 in 442)
; prcpflag is returned if incorrect response

External References

Name Field # of Occurrence
^DIR ASKDEPT+2, ASKPER+2, ASKDEPOT+2, ASKVOUCH+2, ASKREQNO+2
$$ERROR^PRCPSLOR DQ+6, DQ+8
TRANSMIT^PRCPSMCL DQ+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$$ERROR^PRCPSLOR
  • Line Location: DQ+6
Function Call: WRITE
  • Prompt: !,$$ERROR^PRCPSLOR
  • Line Location: DQ+8
Function Call: WRITE
  • Prompt: " ",PRCPXMZ(%)," "
  • Line Location: DQ+17
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKDEPT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKPER+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKREQNO+2
Routine Call
  • DIR
  • Line Location:
    • ASKDEPT+2
    • ASKPER+2
    • ASKDEPOT+2
    • ASKVOUCH+2
    • ASKREQNO+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(420 - [#420] DQ+4, DQ+5
^PRC(441 - [#441] DQ+12
^PRC(442 - [#442] ASKDEPOT+4*, ASKVOUCH+4*, ASKREQNO+4*
^PRCP(445 - [#445] DQ+6, ASKDEPT+4
^PRCP(445.2 - [#445.2] DQ+10
^PRCS(410 - [#410] DQ+6, DQ+7, DQ+8, ASKPER+4*
^TMP($J DQ+10!, DQ+14*

Label References

Name Line Occurrences
ASKDEPT DQ+6
ASKPER DQ+8

Naked Globals

Name Field # of Occurrence
^(0 ASKDEPT+4*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DQ+3~, DQ+17*
%H DQ+3~
%I DQ+3~
COSTCNTR DQ+3~, DQ+7*, DQ+14
COUNT DQ+3~, DQ+10*, DQ+14*, DQ+15
CP DQ+3~, DQ+4*, DQ+5*, DQ+7, DQ+14
DATA DQ+3~, DQ+10*, DQ+11, DQ+12, DQ+13
DATE DQ+3~, DQ+11*
DATEREC DQ+3~, DQ+11*, DQ+14
>> DEPOT ASKDEPOT+2, ASKDEPOT+4*
DEPT DQ+3~, DQ+6*, DQ+7*, DQ+8, DQ+14, ASKDEPT+4*
DESC DQ+3~, DQ+13*, DQ+14
DIETPER DQ+3~, DQ+8*, DQ+9*, DQ+14, ASKPER+4*
DIR ASKDEPT+2!, ASKPER+2!, ASKDEPOT+2!, ASKVOUCH+2!, ASKREQNO+2!
DIR("A" ASKDEPT+2*, ASKPER+2*, ASKDEPOT+2*, ASKVOUCH+2*, ASKREQNO+2*
DIR("B" ASKDEPOT+2*, ASKVOUCH+2*
DIR(0 ASKDEPT+2*, ASKPER+2*, ASKDEPOT+2*, ASKVOUCH+2*, ASKREQNO+2*
DIRUT ASKDEPT+2~, ASKPER+2~, ASKDEPOT+2~, ASKVOUCH+2~, ASKREQNO+2~
DISYS DQ+3~
DTOUT ASKDEPT+2~, ASKPER+2~, ASKDEPOT+2~, ASKVOUCH+2~, ASKREQNO+2~
DUOUT ASKDEPT+2~, ASKPER+2~, ASKDEPOT+2~, ASKVOUCH+2~, ASKREQNO+2~
INVPT DQ+3~, DQ+6*, ASKDEPT+4
ITEMDATA DQ+3~, DQ+12*, DQ+13
NSN DQ+3~, DQ+12*, DQ+14
>> PODA ASKDEPOT+4, ASKVOUCH+4, ASKREQNO+4
>> PRCPFLAG DQ+6, DQ+8, ASKDEPT+2*, ASKDEPT+3*, ASKPER+2*, ASKPER+3*, ASKDEPOT+2*, ASKDEPOT+3*, ASKVOUCH+2*, ASKVOUCH+3*
, ASKREQNO+2*, ASKREQNO+3*
PRCPXMZ DQ+3~, DQ+17
PRCPXMZ( DQ+17
QTY DQ+3~, DQ+13*, DQ+14
>> REQNO ASKREQNO+4*
>> STATION ASKREQNO+4
TRANDA DQ+3~, DQ+6*, DQ+7, DQ+8, ASKPER+4
TRANID DQ~, DQ+10
TRANNO DQ~, DQ+4, DQ+5, DQ+6, DQ+10, DQ+14, DQ+16
TRANREG DQ+3~, DQ+10*
TRANTYPE DQ+3~, DQ+4*, DQ+5*, DQ+7, DQ+14, DQ+16, DQ+17
UI DQ+3~, DQ+12*, DQ+14
V DQ+3~, DQ+13*, DQ+14
>> VOUCHER ASKVOUCH+2, ASKVOUCH+4*
X DQ+3~, ASKDEPT+4, ASKDEPOT+4, ASKVOUCH+4, ASKREQNO+4
>> Y ASKDEPT+3, ASKPER+3, ASKPER+4, ASKDEPOT+3, ASKVOUCH+3, ASKREQNO+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All