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

Package: Equipment Turn-In Request

Routine: PRCNUTL


Information

PRCNUTL ;SSI/ALA-UTILITY PROGRAM ;[ 09/11/96 2:08 PM ]

Source Information

Source file <PRCNUTL.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 ^DIC  FILE^DICN  ^DIE  
IFCAP 1 ESIG^PRCUESIG  

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

Package Total Caller Graph
Equipment Turn-In Request 7 PRCNENG  PRCNOTHR  PRCNREQN  PRCNSPL  PRCNTIPP  PRCNTIRQ  PRCNTIWH  

Entry Points

Name Comments DBIA/ICR reference
SEQ ; Get the next sequential number, returns PRCNDA and TST
; TST is the beginning part of the transaction number
EXIT
EMSG ; Loop for message for requests
TMSG ; Loop for turn-in messages
ES
ES1
EQ
FYQ ;RETURNS FY AND QTR GIVEN IN FILEMANAGER DATE IN 'X'
QQ
EN1 ; Check for utilities=13 to ask for free text OTHER
VEN ; Translate potential vendor field into pointer and store it
EX
VENHLP ; Executable help for potential vendor field
T
CHECK ; PRCN*1.0*15 new subroutine to check if all line items for a
; transaction have been dispositioned - CMR equals null if dispo'd
DMSG ; PRCN*1.0*15 new subroutine to display message to user
RESET ; PRCN*1.0*15 reset status, plus original CMR and SGL values
; and set disposition date, method and value each to null

External References

Name Field # of Occurrence
^DIC VEN+3
FILE^DICN SEQ+4
^DIE RESET+3, RESET+9
ESIG^PRCUESIG ES

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!!
  • Line Location: EMSG+7
Function Call: WRITE
  • Prompt: !,?3,"There "_TEX1_" "_CT_" equipment "_TEX2_" "_TEX3_"."
  • Line Location: EMSG+10
Function Call: WRITE
  • Prompt: $C(7),!!!
  • Line Location: TMSG+5
Function Call: WRITE
  • Prompt: ?3,"There "_TEX1_" "_CT_" Turn-In "_TEX2_" "_TEX3
  • Line Location: TMSG+8
Function Call: READ
  • Variable: X
  • Timeout: 3
  • Line Location: ES1+0
Function Call: WRITE
  • Prompt: $C(7)," SIGNATURE CODE FAILURE "
  • Line Location: ES1+0
Function Call: WRITE
  • Prompt: !,^DD(413.015,2,21,HL0,0)
  • Line Location: VENHLP+2
Function Call: WRITE
  • Prompt: !!,"Current Vendors: "
  • Line Location: VENHLP+3
Function Call: WRITE
  • Prompt: !,L
  • Line Location: T+1
Function Call: READ
  • Formatting: !
  • Prompt: "'^' TO STOP: "
  • Variable: PRCNA
  • Timeout: DTIME
  • Line Location: T+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: DMSG+1
Function Call: WRITE
  • Prompt: "*"
  • Line Location: DMSG+1
Function Call: WRITE
  • Prompt: !,"* SORRY. THERE ARE ADDITIONAL LINE ITEMS FOR TRANSACTION:",?78,"*"
  • Line Location: DMSG+2
Function Call: WRITE
  • Prompt: !,"*",?78,"*"
  • Line Location: DMSG+3
Function Call: WRITE
  • Prompt: !,"*",?80-$L($G(Y(0,0)))/2,$G(Y(0,0)),?78,"*"
  • Line Location: DMSG+4
Function Call: WRITE
  • Prompt: !,"*",?78,"*"
  • Line Location: DMSG+5
Function Call: WRITE
  • Prompt: !,"* THAT MUST BE DISPOSITIONED BEFORE THIS TRANSACTION CAN BE FINALIZED.",?78,"*"
  • Line Location: DMSG+6
Function Call: WRITE
  • Prompt: !
  • Line Location: DMSG+7
Function Call: WRITE
  • Prompt: "*"
  • Line Location: DMSG+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: DMSG+8
Routine Call
  • DIC
  • Line Location:
    • VEN+3
Routine Call
  • DIE
  • Line Location:
    • RESET+3
    • RESET+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCN(413.1 - [#413.1] Classic Fileman Calls
^PRCN(413.7 - [#413.7] Classic Fileman Calls
^PRC(440 - [#440] Classic Fileman Calls
^ENG(6914 - [#6914] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(413.015 VENHLP+2
^ENG(6914 - [#6914] CHECK+6
^PRC(440 - [#440] VENHLP+4
^PRCN(413 - [#413] EMSG+1, EMSG+2, EMSG+3, EMSG+4, EMSG+5, EN1+1, VEN+4*, VEN+5*
^PRCN(413.1 - [#413.1] TMSG+1, TMSG+2, TMSG+3, CHECK+4, CHECK+5
^PRCN(413.5 - [#413.5] EMSG+8, TMSG+7
^PRCN(413.7 - [#413.7] SEQ+2, SEQ+5*, SEQ+6*

Label References

Name Line Occurrences
DMSG CHECK+7
EQ ES1
EX VEN+4
QQ FYQ+1
T VENHLP+4

Naked Globals

Name Field # of Occurrence
^(0 VEN+4*, VEN+5*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % FYQ+3*, QQ*
%DT QQ!
%F QQ!
A QQ!
B QQ!
CT EMSG+1*, EMSG+6*, EMSG+7, EMSG+8, EMSG+9, EMSG+10, EMSG+11!, TMSG+1*, TMSG+4*, TMSG+5
TMSG+6, TMSG+8, TMSG+9!
>> D0 VEN+4, VEN+5
>> D1 VEN+4, VEN+5
DA SEQ+3~, EN1+1, VEN+2~, RESET+4~, RESET+7*, RESET+10!
DATA RESET+2~, RESET+6*, RESET+7
DC VEN+2~
DH VEN+2~
DI VEN+2~
DIC SEQ+3~, SEQ+4*, QQ!, VEN+2~, VEN+3*
DIC(0 SEQ+4*, VEN+3*
DIE SEQ+3~, VEN+2~, RESET+3*, RESET+8*, RESET+10!
DIEL VEN+2~
DIFLD VEN+2~
DK VEN+2~
DL VEN+2~
DLAYGO SEQ+3~, SEQ+4*
DM VEN+2~
DP VEN+2~
DQ VEN+2~
DR SEQ+3~, VEN+2~, RESET+3*, RESET+9*, RESET+10!
DTIME T+2
>> DUOUT VENHLP+1*, VENHLP+4*, T+3*
DUZ EMSG+2, EMSG+3, EMSG+4, EMSG+5, TMSG+2, TMSG+3, ES
>> FAIL ES*, ES1
>> FL EN1+1*
>> HL0 VENHLP+1*, VENHLP+2*
I EQ!
L VENHLP+4*, VENHLP+5!, T+1
N RESET+2~, RESET+5*, RESET+6
N1 CHECK+2~, CHECK+4*, CHECK+5
NDA SEQ+2*, SEQ+5*, SEQ+6, EXIT!
NULL RESET+2~, RESET+6*
OLDCMR RESET+2~, RESET+7*
OLDSGL RESET+2~, RESET+7*
OLDUST RESET+2~, RESET+7*
>> OLDVALUE( RESET+5, RESET+6
>> POP CHECK+3*, CHECK+6*, CHECK+7
PRC QQ!
PRC("FY" FYQ+2*
PRC("QTR" FYQ+3*
PRCB QQ!
PRCF("X" QQ!
PRCNA VENHLP+5!, T+2*, T+3
>> PRCNCT VENHLP+1*, T*, T+1, T+4*
PRCND VENHLP+5!
>> PRCNDA SEQ+6*
PRCNDI VENHLP+5!
PRCNT0 CHECK+2~, CHECK+5*, CHECK+6
>> PRCNTDA CHECK+4, CHECK+5
PRCNVEN VEN+3*, VEN+4, VEN+5, EX!
>> STA EMSG+1, EMSG+2, EMSG+3, EMSG+4, EMSG+5, EMSG+8, TMSG+1, TMSG+2, TMSG+3, TMSG+7
TEX1 EMSG+8*, EMSG+10, EMSG+11!, TMSG+6*, TMSG+8
TEX2 EMSG+9*, EMSG+10, EMSG+11!, TMSG+6*, TMSG+8
TEX3 EMSG+8*, EMSG+10, EMSG+11!, TMSG+7*, TMSG+8
>> TST SEQ+2, SEQ+4
U SEQ+5, SEQ+6, EMSG+2, EMSG+3, EMSG+5, EMSG+8, TMSG+2, TMSG+3, TMSG+7, VEN+4
VEN+5, T+2, T+3, CHECK+5, CHECK+6, RESET+7
VEN VEN+1*, VEN+3, VEN+4, EX!
X SEQ+4*, EXIT!, EMSG+1*, EMSG+2, EMSG+3, EMSG+4, EMSG+5, EMSG+11!, TMSG+1*, TMSG+2
TMSG+3, TMSG+9!, ES1*, EQ!, FYQ+1, FYQ+2, QQ!, VEN+1, VEN+2~, VEN+3*
VENHLP+5!, DMSG+1*, DMSG+7*
Y SEQ+5, EXIT!, FYQ+2*, FYQ+3!, QQ!, VEN+2~, VEN+3
Y(0 DMSG+4
Y(1 FYQ+2*, FYQ+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