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
Print Page as PDF
Routine: MCARDNJ1

Package: Medicine

Routine: MCARDNJ1


Information

MCARDNJ1 ;WISC/TJK,JA-INSERT AND LOOK UP ;7/22/96 11:10

Source Information

Source file <MCARDNJ1.m>

Entry Points

Name Comments DBIA/ICR reference
P
Q1
T1
K1
C
ER
WP ;PRINT WORD PROCESSOR FIELD
CONT
R
EN ;COMPUTE AND DISPLAY
LOCK ;LOCK GLOBAL THAN IS BEING ACCESSED BY ANOTHER USER
KILL
EN2
O ;EX OUTPUT TRANSFROM
EN3 ;ERROR ON DIE
E

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: MCARDNJ1+2
Function Call: WRITE
  • Prompt: DJHIN
  • Line Location: MCARDNJ1+6
Function Call: WRITE
  • Prompt: V(V),DJLIN
  • Line Location: MCARDNJ1+6
Function Call: WRITE
  • Prompt: DJHIN
  • Line Location: T1+4
Function Call: WRITE
  • Prompt: V(V),DJLIN
  • Line Location: T1+4
Function Call: WRITE
  • Prompt: DJLIN
  • Line Location: T1+6
Function Call: WRITE
  • Prompt: X
  • Line Location: K1+2
Function Call: READ
  • Formatting: !
  • Prompt: "Press <RETURN> to Continue"
  • Variable: X
  • Timeout: DTIME
  • Line Location: K1+3
Function Call: WRITE
  • Prompt: *7
  • Line Location: ER+0
Function Call: WRITE
  • Prompt: !,^(DJZ1,0)
  • Line Location: WP+4
Function Call: READ
  • Variable: DJX
  • Timeout: DTIME
  • Line Location: CONT+0
Function Call: WRITE
  • Prompt: !,"Press <RETURN> to Continue, '^' to Quit: "
  • Line Location: CONT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+0
Function Call: READ
  • Variable: DJX
  • Timeout: DTIME
  • Line Location: R+0
Function Call: WRITE
  • Prompt: "Press <RETURN> to Continue"
  • Line Location: R+0
Function Call: WRITE
  • Prompt: DJDB
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: DJHIN
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: V(DJVV)
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: DJLIN
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: "THIS ENTRY IS BEING EDITED BY ANOTHER USER. TRY LATER.",*7
  • Line Location: LOCK+1
Function Call: READ
  • Formatting: !
  • Prompt: "Press <RETURN> to Continue"
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN2+0
Function Call: WRITE
  • Prompt: !!,"THIS IS NOT THE FIRST SCREEN",*7
  • Line Location: EN2+0
Function Call: WRITE
  • Prompt: !,"You have a bad default variable, please check with your",!,"Data Base administrator",*7
  • Line Location: EN3+1
Function Call: WRITE
  • Prompt: DJHIN
  • Line Location: EN3+2
Function Call: WRITE
  • Prompt: DJDB,DJLIN
  • Line Location: EN3+4
Function Call: WRITE
  • Prompt: DJHIN
  • Line Location: E+0
Function Call: WRITE
  • Prompt: V(V),DJDB,DJLIN
  • Line Location: E+0
Info |  Source |  Entry Points |  Interaction Calls