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

Package: Dental

Routine: DENTPEX


Information

DENTPEX ;ISC2/HCD-Inpatients needing Dental Exam Report ;10/23/90 14:35 ;

Source Information

Source file <DENTPEX.m>

Entry Points

Name Comments DBIA/ICR reference
D
QUE
RET
WRD
SET
WRD1
PR
PR2
PR1
HOLD1
HOLD
W
EXIT2
CLOSE
EXIT1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: I
  • Line Location: DENTPEX+2
Function Call: WRITE
  • Prompt: !,$J(DENTNB,3),?5,$E(X,1,10),?17,$E(X1,1,10),?29,$E(DENTNM,1,24),?54,DENTSSN,?65,$E(DENTDX,1,15),!
  • Line Location: PR2+1
Function Call: WRITE
  • Prompt: @IOF,$C(13),?(80-$L(Z1)/2),Z1,!,?(80-$L(Z2)/2),Z2,!,?(80-$L(Z3)/2),Z3,!!
  • Line Location: PR1+1
Function Call: WRITE
  • Prompt: !,?5,"Ward",?17,"Room-Bed",?29,"Patient Name",?54,"SSN",?65,"Diagnosis",!,?5,"----",?17,"--------",?29,"------------",?54,"---------",?65,"---------"
  • Line Location: PR1+2
Function Call: READ
  • Timeout: DTIME
  • Line Location: HOLD+0
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,"Stations have not been entered in the Dental Site Parameter file.",!,"You must enter a station before you can use this option."
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,"There are no examinations for station "_DENTSTA_" that need to be done today.",!
  • Line Location: EXIT2+0

FileMan Files Accessed Via FileMan Db Call

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