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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PRCNEQA1

Package: Equipment Turn-In Request

Routine: PRCNEQA1


Information

PRCNEQA1 ;SSI/ALA-Equipment Committee Approval ;[ 09/09/96 3:15 PM ]

Source Information

Source file <PRCNEQA1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 4 %XY^%RCR  (FILE,YN)^DICN  ^DIE  ^DIR  
Equipment Turn-In Request 1 MES^PRCNMESG  

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
QS
AXT
FAP ;
UPDT ; Update the line item/transaction
LINE2 ; Display line item & get input
QUAN
EXIT
SPLIT ; Split line item based on quantity approved
MSG ; Send message to CMR Official for final confirmation
LINE ; Display line item information
COPY ; Copy data from one line item to new line item

External References

Name Field # of Occurrence
%XY^%RCR COPY+2
FILE^DICN SPLIT+3
YN^DICN QS+1
^DIE QS+9, QS+12, UPDT+3, SPLIT+4, MSG+5
^DIR LINE2+2
MES^PRCNMESG QS+11, MSG+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Does request need a final confirmation from responsible CMR Official"
  • Line Location: QS+0
Function Call: WRITE
  • Prompt: !,"Enter 'Yes' if this request is to be sent to the CMR Offical for a final review"
  • Line Location: QS+3
Function Call: WRITE
  • Prompt: !,"before a 2237 is to be created. Enter 'No' if a 2237 should be created without"
  • Line Location: QS+4
Function Call: WRITE
  • Prompt: !,"further review."
  • Line Location: QS+5
Function Call: WRITE
  • Prompt: !!,"TRANSACTION #: ",$P(^PRCN(413,IN,0),U)
  • Line Location: LINE+1
Function Call: WRITE
  • Prompt: !!,"Qty: ",QTY,?20,"Price: ",PR,?40,"Total: ",QTY*PR,!,"Description:"
  • Line Location: LINE+8
Function Call: WRITE
  • Prompt: !," ",^(PRCNL,0)
  • Line Location: LINE+9
Function Call: WRITE
  • Prompt: !,"Quantity requested: ",REQ
  • Line Location: QUAN+0
Function Call: READ
  • Timeout: DTIME
  • Variable: PRCNN
  • Line Location: QUAN+1
Function Call: WRITE
  • Prompt: !!,"Enter a numeric quantity that is being approved. It"
  • Line Location: QUAN+3
Function Call: WRITE
  • Prompt: !,"does not have to be the same as the requested quantity."
  • Line Location: QUAN+4
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: QUAN+7
Routine Call
  • DIE
  • Line Location:
    • QS+9
    • QS+12
    • UPDT+3
    • SPLIT+4
    • MSG+5
Routine Call
  • DIR
  • Line Location:
    • LINE2+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCN(413 - [#413] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCN(413 - [#413] QS+12, LINE+1, LINE+2, LINE+4, LINE+5, LINE+7, LINE+9, SPLIT+1

Label References

Name Line Occurrences
AXT QS+13
COPY SPLIT+3
LINE FAP+1
LINE2 LINE+10, QUAN+11
MSG QS+6
QS QS+2
QUAN QUAN+1, QUAN+2, QUAN+7
SPLIT QUAN+8
UPDT QUAN+9

Naked Globals

Name Field # of Occurrence
^( QS+12, LINE+9
^(0 LINE+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% QS!, QS+2, QS+6, QS+7, AXT!, EXIT!
%X COPY+1*, COPY+3!
%Y COPY+1*, COPY+3!
APP LINE+6*, LINE+11!, QUAN+1, QUAN+6, QUAN+7, QUAN+10*
D0 QS+8*, QS+12, AXT!, LINE+11!, MSG+4*
D1 QS+12*, AXT!, LINE+11!
DA QS+8*, AXT!, LINE+11!, QUAN+9*, SPLIT+3*, EXIT!, MSG+4*
DA(1 QUAN+9*, UPDT+3, SPLIT+1*, SPLIT+2
DIC QS+8*, AXT!, LINE+11!, UPDT+3*, SPLIT+2*, SPLIT+4, EXIT!, MSG+4*
DIC(0 SPLIT+1*
DIE QS+8*, AXT!, UPDT+3*, SPLIT+4*, EXIT!, MSG+4*
DIR LINE+12!
DIR("A" LINE2+2*
DIR(0 LINE2+1*
>> DIRUT LINE2+2
DLAYGO LINE+12!, SPLIT+2*
DR QS+9*, AXT!, LINE+11!, UPDT+1*, UPDT+2*, SPLIT+4*, MSG+5*
DTIME QUAN+1
>> DUOUT QS+7*, LINE+3, QUAN+5*
EANS AXT!
>> EQXI QS+10, QS+13
>> IN QS+8, LINE+1, LINE+2, LINE+4, LINE+5, LINE+6, MSG+4
>> IN2 LINE+3*, LINE+4, LINE+5, LINE+6
LAPP LINE+11!, QUAN+10*
LST LINE+5*, LINE+12!, QUAN+6*, QUAN+8*, QUAN+9
>> MSGN QS+10*, MSG+1*
NOD MSG+1!
OIN2 LINE+2*, LINE+3, LINE+11!
PR LINE+7*, LINE+8, LINE+11!
PRCNDIS FAP+1*, AXT!, LINE+10
PRCNI LINE+6*, LINE+7, LINE+9, LINE+11!, QUAN+9, SPLIT+1, COPY+1
PRCNJ LINE+6*, LINE+7, LINE+9, LINE+11!, QUAN+9, SPLIT+1, SPLIT+3*, COPY+1
PRCNK LINE+6*, LINE+11!, COPY+1
PRCNL LINE+9*, LINE+11!
PRCNN LINE+12!, QUAN+1*, QUAN+2, QUAN+5, QUAN+6*, QUAN+7, QUAN+10
QTY QS+12*, AXT!, LINE+7*, LINE+8, LINE+11!
REQ LINE+5*, LINE+6, LINE+11!, QUAN
ST LINE+12!, LINE2+3*, QUAN+6, QUAN+8, QUAN+9, UPDT+2
U QS+12, LINE+1, LINE+2, LINE+5, LINE+7, SPLIT+1
>> X SPLIT+1*
>> Y LINE2+3, SPLIT+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All