Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(50.0731 - [#50.0731] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call