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

Package: Auto Replenishment Ward Stock

Routine: PSGWUTL1


Information

PSGWUTL1 ;BHAM ISC/CML-Utility routine for HELP functions ; 15 Aug 93 / 4:46 PM

Source Information

Source file <PSGWUTL1.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 3 NOW^%DTC  ^DIC  ^DIE  

Caller Graph

Caller Graph Total: 33

Package Total Caller Graph
Auto Replenishment Ward Stock 33 PSGWAIO  PSGWARP  PSGWATR1  PSGWBOA  PSGWBOIP  PSGWBOS  PSGWCCP  PSGWCHG  
PSGWCLP  PSGWCPA  PSGWCPA1  PSGWDR  PSGWEXR  PSGWEXR1  PSGWEXR2  PSGWHC1  
PSGWHV1  PSGWLSI  PSGWNU  PSGWNU1  PSGWODP  PSGWODPR  PSGWPIG  PSGWPOST  
PSGWRAC  PSGWSC  PSGWSC1  PSGWSIG  PSGWSTD  PSGWTOT1  PSGWTOT2  PSGWVW  
PSGWWRD  

Entry Points

Name Comments DBIA/ICR reference
IGSET
ASKSEL ;
HELP ; Help for scroll-stop
QUIT
SS ; Scroll-stop for last page of 80 column reports
ASKIG
PSGWDT() ;Find current date and time
HELPSEL ;
SEL ; Ask if reports are to print by Inventory Group or AOU
IG ; Reset Sort Keys for inventory groups

External References

Name Field # of Occurrence
NOW^%DTC PSGWDT+1
^DIC ASKIG
^DIE IGSET+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: !!
  • Timeout: ",SS:DTIME
  • Variable: "END OF REPORT! Press <RETURN> to return to Menu
  • Line Location: SS+1
Function Call: WRITE
  • Prompt: *7,!,"Please Enter: <RETURN> to continue viewing report or ""^"" to Exit report: "
  • Line Location: HELP+1
Function Call: READ
  • Timeout: DTIME
  • Variable: ANS
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: IG+1
Function Call: WRITE
  • Prompt: !!?5,"You may select a single AOU, several AOUs,",!?5,"or enter ""^ALL"" to select all AOUs.",!?20,"-OR-",!?5,"You may select an Inventory Group."
  • Line Location: SEL+1
Function Call: READ
  • Timeout: DTIME
  • Variable: SEL
  • Line Location: ASKSEL+1
Function Call: WRITE
  • Prompt: *7,"??"
  • Line Location: ASKSEL+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKSEL+3
Function Call: WRITE
  • Prompt: *7,!!,"There are no AOUs defined for this Inventory Group!"
  • Line Location: ASKIG+1
Function Call: WRITE
  • Prompt: !!,"This Inventory Group contains the following AOU(s):"
  • Line Location: ASKIG+3
Function Call: WRITE
  • Prompt: " *** INACTIVE ***"
  • Line Location: ASKIG+3
Function Call: WRITE
  • Prompt: !!?5,"Enter an 'A' if you wish to select individual AOUs (one, several or ^ALL).",!?5,"Enter an 'I' if you wish to select all AOUs in an Inventory Group.",!?5,"Or enter ""^"" to Exit."
  • Line Location: HELPSEL+1
Routine Call
  • DIE
  • Line Location:
    • IGSET+1
Routine Call
  • DIC
  • Line Location:
    • ASKIG

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSI(58.2 - [#58.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" PSGWDT+3
^PSI(58.1 - [#58.1] ASKIG+3
^PSI(58.2 - [#58.2] IG+1, IGSET, ASKIG+1, ASKIG+2

Label References

Name Line Occurrences
ASKIG ASKIG+1
ASKSEL ASKSEL+1, ASKSEL+2
HELP HELP+2
HELPSEL ASKSEL+1, ASKSEL+2
IGSET IG+1
QUIT ASKSEL+1

Naked Globals

Name Field # of Occurrence
^("I" ASKIG+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% QUIT!, PSGWDT+2
>> ANS HELP+2*
AOU IGSET*, IGSET+2!
AOULP IGSET+2!
AOULP( IGSET*, IGSET+1, ASKIG+2*, ASKIG+3
CNT IGSET*, IGSET+2!
D IGSET+2!
D0 IGSET+2!
DA IGSET+1*, IGSET+2!
DA(1 IGSET+1*
DI IGSET+2!
DIC IGSET+2!, ASKIG*!, QUIT!
DIC("S" ASKIG*
DIC(0 ASKIG*
DIE IGSET+1*, IGSET+2!
DQ IGSET+2!
DR IGSET+1*, IGSET+2!
DT ASKIG+3
DTIME SS+1, HELP+2, ASKSEL+1
IGAOU ASKIG+2*, ASKIG+3*, QUIT!
>> IGDA ASKIG+1*, ASKIG+2
INVGRP IG+1*, IG+2!, IGSET, IGSET+1
NSK IGSET+1*, IGSET+2!
SEL ASKSEL+1*, ASKSEL+2, ASKIG!, QUIT!
SK IGSET*, IGSET+1*, IGSET+2!
SS SS+1*!
X IGSET+2!, QUIT!
Y ASKIG, ASKIG+1, QUIT!, PSGWDT+2*, PSGWDT+4
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