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 |  Local Variables  | All
Print Page as PDF
Routine: PSODEDT

Package: Outpatient Pharmacy

Routine: PSODEDT


Information

PSODEDT ;BHAM ISC/SAB - edit due answer sheet ; 06/03/92 17:26

Source Information

Source file <PSODEDT.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 4 ^DIC  ^DIE  EN^DIQ1  ^DIR  
Outpatient Pharmacy 1 DIE^PSODLKP  

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

Package Total Caller Graph
Outpatient Pharmacy 3 PSOD EDIT ANSWER SHEET  PSODACT  PSODLKP  

Entry Points

Name Comments DBIA/ICR reference
SEQNUM
EDIT
EXIT
SEARCH
CHOICES
ASK
GETN
GETIXN
DISPLAY
WRAP ;Enter here from PSODACT,PSODLKP,PSODEDT to format Question
W1
QUES2

External References

Name Field # of Occurrence
^DIC SEQNUM
^DIE EDIT+1
EN^DIQ1 DISPLAY+2
^DIR ASK+1, DISPLAY
DIE^PSODLKP EDIT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " ??",$C(7)
  • Line Location: SEQNUM+4
Function Call: WRITE
  • Prompt: !,"Entry is being edited by another user. Try Later!"
  • Line Location: EDIT+0
Function Call: WRITE
  • Prompt: !!!!!,"If you do not know the Sequence Number, you may search by any or all of the",!,"following fields: "
  • Line Location: SEARCH+1
Function Call: WRITE
  • Prompt: !!?5,"QUESTIONNAIRE",!?5,"DRUG",!?5,"PROVIDER",!!?5,"Type '^' to exit.",!
  • Line Location: SEARCH+2
Function Call: WRITE
  • Prompt: !!?5,"No Matches Found!!!",!!
  • Line Location: SEARCH+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: SEARCH+11
Function Call: WRITE
  • Prompt: !!?2,"CHOOSE FROM...",!!
  • Line Location: CHOICES+0
Function Call: WRITE
  • Prompt: !,PSQNUM,"."
  • Line Location: WRAP+3
Function Call: WRITE
  • Prompt: ?($L(PSQNUM)+2),PSWRAP(K),!
  • Line Location: W1+1
Function Call: WRITE
  • Prompt: !!,?5,"Enter Y for YES, N for NO, U for UNKNOWN."
  • Line Location: QUES2+0
Function Call: WRITE
  • Prompt: !!,?5,"Enter a FREE TEXT answer from 1 to ",PSLEN," characters."
  • Line Location: QUES2+1
Function Call: WRITE
  • Prompt: !!,?5,"Enter a number between ",PSLO," and ",PSHI,!,?5,"with a maximum of ",PSDIG," decimal digits."
  • Line Location: QUES2+2
Function Call: WRITE
  • Prompt: !?5,"Enter carriage return to bypass."
  • Line Location: QUES2+3
Function Call: WRITE
  • Prompt: !?5,"Enter '^' to exit."
  • Line Location: QUES2+4
Routine Call
  • DIC
  • Line Location:
    • SEQNUM
Routine Call
  • DIE
  • Line Location:
    • EDIT+1
Routine Call
  • DIR
  • Line Location:
    • ASK+1
    • DISPLAY

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("XY" CHOICES+2, DISPLAY
^DD("DILOCKTM" EDIT
^PS(50.0731 - [#50.0731] EDIT, EDIT+1, EDIT+3, SEARCH+8, SEARCH+9, GETN
^TMP("PSOD" EXIT!, SEARCH!, SEARCH+8*, SEARCH+9*, SEARCH+10, SEARCH+11, CHOICES+3

Label References

Name Line Occurrences
ASK SEARCH+4
DISPLAY CHOICES+3
EXIT SEQNUM+1, EDIT, EDIT+2
GETIXN SEARCH+8, SEARCH+9, GETN
GETN SEARCH+8
PSODEDT EDIT+4
SEARCH SEQNUM+3
SEQNUM SEQNUM+3, SEQNUM+4
W1 W1
WRAP DISPLAY+4, QUES2+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EDIT*, EDIT+1!, EXIT+1!, ASK!, DISPLAY+1*, DISPLAY+3
DIC SEQNUM!*, EXIT+1!, CHOICES+1*, CHOICES+4!
DIC("A" SEQNUM*
DIC(0 SEQNUM*
DIE EDIT*, EDIT+1!, EXIT+1!
DIQ EXIT+1!, CHOICES+1*, CHOICES+4!
DIQ(0 CHOICES+1*
DIR EXIT+1!, SEARCH!, ASK+1!
DIR(0 SEARCH+4*, DISPLAY*
DIROUT EXIT+1!
DIRUT EXIT+1!
DR EDIT*, EDIT+1!, EXIT+1!, CHOICES+1*
DTOUT SEQNUM+1, EXIT+1!, SEARCH!, SEARCH+4
DUOUT EXIT+1!, SEARCH!, SEARCH+4
DX EXIT+1!, CHOICES+2*, DISPLAY*
DY EXIT+1!, CHOICES+2*, DISPLAY*
FLD EXIT+1!, SEARCH+4*, SEARCH+7*, ASK+2
I EXIT+1!, GETN*, WRAP+2~, W1*
ID EXIT+1!, DISPLAY+3*
IOM WRAP+4
IOSL CHOICES+2
IX EXIT+1!, SEARCH+8*, SEARCH+9*, GETN*, GETIXN
IXN EXIT+1!, SEARCH+8, SEARCH+9, GETN, GETIXN*
IXS EXIT+2!, SEARCH+6*, SEARCH+7*, SEARCH+8, SEARCH+9, GETN
K WRAP+2~, W1+1*
N EXIT+2!, SEARCH+8*, SEARCH+9*, CHOICES+3*, GETN, DISPLAY+1
PID EXIT+2!, SEARCH!
PID( DISPLAY+3
PSA SEQNUM+2*, SEQNUM+3, SEQNUM+4, EDIT, EDIT+3, EXIT+2!, SEARCH+11*, CHOICES+5*
PSCH EXIT+2!, SEARCH!
PSCH( SEARCH+7, SEARCH+8, SEARCH+9, ASK+2*, GETN
PSDIG EXIT+2!, QUES2+2
PSDPOP EXIT+2!, SEARCH+12*, CHOICES+3, DISPLAY*
PSEED EXIT+2!, SEARCH+8*
PSFLAG EXIT+2!, SEARCH+3*, SEARCH+5, ASK+2*
PSHI EXIT+2!, QUES2+2
PSHIT EXIT+2!, SEARCH+8*, GETN*
PSIX EXIT+2!, SEARCH!
PSL EXIT+2!, CHOICES+2*, DISPLAY
PSLEN EXIT+2!, QUES2+1
PSLO EXIT+3!, QUES2+2
PSMARG EXIT+3!, WRAP+4*, W1
PSODUEL EDIT*, EDIT+1!
>> PSORM WRAP+4
PSQ EXIT+3!, DISPLAY+1*, DISPLAY+3*, WRAP+3
PSQN EXIT+3!
PSQNUM EXIT+3!, DISPLAY+1*, WRAP+3, W1+1
PSQP EXIT+3!
PSTXT EXIT+3!, WRAP+3*, W1*
PSTYP EXIT+3!, QUES2, QUES2+1, QUES2+2
PSWRAP EXIT+3!, WRAP+4*, W1*, W1+1
PSWRAP( W1*, W1+1
X SEQNUM+1, SEQNUM+3, EXIT+3!
Y SEQNUM+2, EDIT+2, EXIT+3!, ASK+2, DISPLAY
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 |  Local Variables  | All