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

Package Total Caller Graph
Equipment Turn-In Request 17 PRCN NX CMR MENU  PRCN NX CONC MENU  PRCN NX ENG MENU  PRCN NX EQ COMM MENU  PRCN NX MENU  PRCN TURN WHSE MENU  PRCNEDIT  PRCNENG  
PRCNOTHR  PRCNPPE  PRCNREQN  PRCNSPL  PRCNTICMR  PRCNTIPP  PRCNTIPPM  PRCNTIRQ  
PRCNTIWH  
Kernel 1 ^DIC(19  

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