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

Package: Inpatient Medications

Routine: PSGPER1


Information

PSGPER1 ;BIR/CML3-PRINTS PRE-EXCHANGE NEEDS REPORT ;18 MAR 03 / 5:08 PM

Source Information

Source file <PSGPER1.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Inpatient Medications 3 ENP^PSGPER2  (ENCV,ENIVKV)^PSGSETU  ENTSK^PSGTI  
VA Fileman 2 YN^DICN  ^DIK  
Kernel 1 ^%ZIS  

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Inpatient Medications 7 PSGOE  PSGOESF  PSGPEN  PSGPER  PSGVBW  PSGVBW0  PSJOE  

Entry Points

Name Comments DBIA/ICR reference
DEFON() ; All Pre-Exchange Devices have been removed from Ward Parameters - restore previous functionality
AG ;
AGMSG ;
POP ;
DEV1
DONE ;
DEV ;
OUT ;

External References

Name Field # of Occurrence
^%ZIS DEV1, POP+3
YN^DICN POP+2, AG+1
^DIK DONE+1
ENP^PSGPER2 DEV1+3
ENCV^PSGSETU OUT+3
ENIVKV^PSGSETU OUT+3
ENTSK^PSGTI DEV1+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV1+0
Function Call: WRITE
  • Prompt: !,"Do you want another chance to choose a device"
  • Line Location: POP+2
Function Call: WRITE
  • Prompt: !?3,"Enter 'YES' to choose a device to print. Enter 'NO' to quit now."
  • Line Location: POP+2
Function Call: WRITE
  • Prompt: !!,"DO YOU NEED TO PRINT THIS REPORT AGAIN"
  • Line Location: AG+1
Function Call: WRITE
  • Prompt: $C(7)," ANSWER 'YES' OR 'NO' (Entry required)"
  • Line Location: AGMSG+1
Function Call: WRITE
  • Prompt: !," Enter 'YES' to print this report again. Enter 'NO' (or an '^') to quit",!,"now. PLEASE NOTE that you will NOT be able to retrieve this data at a later",!,"date. You should print this information now."
  • Line Location: AGMSG+2
Routine Call
  • %ZIS
  • Line Location:
    • DEV1
    • POP+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(53.4 - [#53.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(59.6 - [#59.6] DEFON+1

Label References

Name Line Occurrences
AG DEV1+3
AGMSG AG+1
DEV DEV1+2, DEV1+3
DEV1 DEV1+1
DONE DEV1+1
OUT DEV1+2
POP DEV1+1

Naked Globals

Name Field # of Occurrence
^( DEFON+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DEV1+1, DEV1+3, POP+1*, POP+2*, POP+3*, AG+1*
>> %Y AGMSG+1
%ZIS DEV1!*
%ZIS("A" DEV1*
%ZIS("B" DEV1*
>> DA DONE+1*
>> DIK DONE+1*
IO("Q" DEV1!, DEV1+2
ION DEV+1
IOP DEV1!, POP+3*
ON DEFON+1~*, DEFON+2*, DEFON+3
>> POP DEV1+1
>> PSGION DEV+1*, POP+3
PSGPERRF PSGPER1+3*, DEV1+3*, OUT+1!, POP+1, POP+2
PSGPXN DONE+1, OUT+1!
>> PSGTIR DEV1+2*
>> PSJCOM OUT+2
>> PSJPREX OUT+2
PSJPXDOF DEFON+2!
U DEFON+1
W DEFON+1~*
>> ZTDESC DEV1+2*
>> ZTDTH DEV1+2*
ZTSAVE DEV1+2!
ZTSAVE("PSGPXN" DEV1+2*
ZTSK DEV1+2!
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