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

Package: Scheduling

Routine: SDWLSCPE


Information

SDWLSCPE ;IOFO BAY PINES/TEH - EWL - EDIT SC PRIORITY ;20 Aug 2002 2:10 PM

Source Information

Source file <SDWLSCPE.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Called from option file.
EN1
PAT ;PATIENT LOOK-UP
PAT1
DIS ;DISPLAY DATA FOR PATIENT
GETDATA ;PATIENT DATA RETRIEVAL
EDIT ;EDIT PRIORITY
DIE(DA,SDWLDIS) ; Update file 409.3 with SERVICE CONNECTED PRIORITY data.
HD ;HEADER
END ;QUIT OPTION

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,VADM(1),?40,VA("PID"),*7,!,"This Patient has NO entries on the Electronic Wait List."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,VADM(1),?40,VA("PID")
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!,"Patient has no Wait List Entries to edit."
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: *7," Invalid Entry"
  • Line Location: EN1+7
Function Call: WRITE
  • Prompt: *7," Invalid Entry"
  • Line Location: EN1+10
Function Call: WRITE
  • Prompt: " Invalid Entry "
  • Line Location: EN1+18
Function Call: WRITE
  • Prompt: !,"Another User is Editing this Entry. Try Later."
  • Line Location: EN1+23
Function Call: WRITE
  • Prompt: !,*7,"PATIENT'S DATE OF DEATH HAS BEEN RECORDED"
  • Line Location: PAT+5
Function Call: WRITE
  • Prompt: !,"Invalid Entry. Service Connected Percentage greater than 49%"
  • Line Location: EDIT+7
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(IOF)
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !!,?80-$L("Wait List - SERVICE CONNECTED PRIORITY")\2,"Wait List - SERVICE CONNECTED PRIORITY",!!
  • Line Location: HD+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^SDWL(409.3 - [#409.3] Classic Fileman Calls,  EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call