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

Package: Equipment Turn-In Request

Routine: PRCNEQA2


Information

PRCNEQA2 ;SSI/ALA-Equipment Committee Approval ;[ 09/11/96 2:01 PM ]

Source Information

Source file <PRCNEQA2.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 HOME^%ZIS  $$UP^XLFSTR  
VA FileMan 2 EN^DIQ1  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Equipment Turn-In Request 1 PRCNEQAP  

Entry Points

Name Comments DBIA/ICR reference
BPRT ; Update display number and print a screenful
HDR ; Prints NX header and up to 12 lines of NX data
GETSUMS ; Get line item total & display stuff
BLP ; Main loop: get input & process help
BEG
BLST ; Build list of Equipment Requests
SEL
SEL1 ;

External References

Name Field # of Occurrence
HOME^%ZIS HDR+1
EN^DIQ1 GETSUMS+5
^DIR SEL+3, SEL1+2
$$UP^XLFSTR SEL+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NO RECORDS TO PROCESS"
  • Line Location: BLP+3
Function Call: WRITE
  • Prompt: !,"No Next Page"
  • Line Location: SEL+4
Function Call: WRITE
  • Prompt: !,"No Previous Page"
  • Line Location: SEL+5
Function Call: WRITE
  • Prompt: @IOF,?15,EQXT_" in the following Equipment Requests",!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"Num#",?7,"Rank",?13,"Request #",?33,"Service",?60,"# Items",?70,"Amount",!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,Y,?7,$P($G(^PRCN(413,D0,6)),U,3)
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?13,$P($G(^PRCN(413,D0,0)),U)
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: ?33,$E(SERV,1,25),?62,TQTY,?70,"$",$J(TOTAL,8,2)
  • Line Location: HDR+8
Routine Call
  • %ZIS
  • Line Location:
    • HDR+1
Routine Call
  • DIR
  • Line Location:
    • SEL+3
    • SEL1+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(49 - [#49] HDR+7
^PRCN(413 - [#413] BLST+1, BLST+2, HDR+6, HDR+7, GETSUMS+2, GETSUMS+12
^TMP($J BEG!, BLST+3*, BLP+5!, SEL1+4, SEL1+5, SEL1+6*, HDR+5

Label References

Name Line Occurrences
BLP SEL+6, SEL+7
BLST BLST+5
BPRT BLST+1
GETSUMS HDR+6
HDR BLP+1
SEL SEL+4, SEL+5
SEL1 SEL+1

Naked Globals

Name Field # of Occurrence
^(0 HDR+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> COST GETSUMS+12*
>> D0 HDR+5*, HDR+6, HDR+7, GETSUMS+2, GETSUMS+4, GETSUMS+12
D1 GETSUMS+1*, GETSUMS+2*, GETSUMS+4~
>> DA GETSUMS+4*
>> DA( GETSUMS+4*
>> DA(1 GETSUMS+4*
DIC GETSUMS+4*, GETSUMS+9!
DIQ GETSUMS+3*, GETSUMS+9!
DIQ(0 GETSUMS+3*
DIR BEG!, SEL+3!, SEL1+2!
DIR("A" SEL+2*, SEL1+1*
DIR(0 SEL*, SEL1+1*
>> DIRUT SEL1+2
DR GETSUMS+3*, GETSUMS+9!
DR( GETSUMS+3*
DTIME BLP+4
DUOUT BLP+5!
>> EQDA SEL1+3*, SEL1+5, SEL1+6
>> EQLS SEL1+2*, SEL1+3
>> EQXT HDR+2
>> ER BLP+5*
>> ER(0 BLP+5*
>> FN GETSUMS+10*, GETSUMS+11
>> I HDR+4*, GETSUMS+11*, GETSUMS+12
IOF HDR+1, HDR+2
>> J SEL1+3*
>> LBN GETSUMS+6*, GETSUMS+7
LBTOT GETSUMS+9!
LBTOT( GETSUMS+6, GETSUMS+7
>> LTOTAL GETSUMS+1*, GETSUMS+8*, GETSUMS+10
>> NPG BPRT+1*, SEL, SEL+1, SEL+4
>> PG BEG*, BLST+3, BLST+4*, BPRT+1*, SEL+4, SEL+5, SEL+6*, SEL+7*, HDR+5
>> PN GETSUMS+11*, GETSUMS+12
>> PPG SEL1+4*, SEL1+5, SEL1+6
>> PRCNT BEG*, BLST+3*, BLST+4, BLP+2, SEL1+1
>> PRCNX BEG*, BLST+1*, BLST+2, BLST+3, BLP+4*
>> PRCNZ BEG*
>> SERV HDR+7*, HDR+8
>> TOTAL HDR+8, GETSUMS+1*, GETSUMS+10*, GETSUMS+12*
>> TQTY HDR+8, GETSUMS+1*, GETSUMS+2*
U BLST+2, HDR+6, HDR+7, GETSUMS+12
>> VTI SEL+3*, SEL+4, SEL+5, SEL+6, SEL+7
X BLP+5*, SEL+3, SEL1+2!, GETSUMS+7*, GETSUMS+8, GETSUMS+9!
Y BEG!, SEL1+2!, HDR+5*, HDR+6, GETSUMS+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All