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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SRSCHCC

Package: Surgery

Routine: SRSCHCC


Information

SRSCHCC ;B'HAM ISC/MAM - DELETE CONCURRENT CASES ; [ 04/26/97 3:08 PM ]

Source Information

Source file <SRSCHCC.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Surgery 3 DEL^SROERR  ^SROERR0  LIST^SRSCHDC  
VA Fileman 3 NOW^%DTC  ^DIE  ^DIK  

Entry Points

Name Comments DBIA/ICR reference
HELP
OERR ; delete from ORDER file (100)
REQ ; make requests
BEG
DEL
ASK

External References

Name Field # of Occurrence
NOW^%DTC REQ+2
^DIE REQ+3
^DIK DEL+4
DEL^SROERR OERR+1
^SROERR0 REQ+4
LIST^SRSCHDC BEG

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,"Since you have not entered all of the required operating room information, the",!,"schedule cannot be updated."
  • Line Location: BEG+1
Function Call: WRITE
  • Prompt: !!,"You have the following options available to you at this point. One of these",!,"two options must be selected. Entering an '^' will not be accepted."
  • Line Location: BEG+2
Function Call: WRITE
  • Prompt: !!,"1. Create an Operation Request for the "_$S($D(SRSCON(2)):"Concurrent Cases",1:"Case"),!,"2. Delete the "_$S($D(SRSCON(2)):"Concurrent Cases",1:"Case")
  • Line Location: ASK+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: ASK+1
Function Call: READ
  • Timeout: DTIME
  • Variable: SRYN
  • Line Location: DEL+0
Function Call: WRITE
  • Prompt: !!,"Enter RETURN to delete the "_$S($D(SRSCON(2)):"entries",1:"entry")_" from your records."
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: !!," Deleting Case "_SRSCON(CON)_" ..."
  • Line Location: DEL+4
Function Call: WRITE
  • Prompt: !!,"If you want to make an operation request for the "_$S($D(SRSCON(2)):"cases",1:"case")_" entered, select '1'."
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !,"A request will be created for "_$S($D(SRSCON(2)):"both cases",1:"case "_SRSCON(1))_" on "_SRSDT_"."
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!,"Select '2' if you want to REMOVE this record ENTIRELY from your records. "
  • Line Location: HELP+2
Routine Call
  • DIE
  • Line Location:
    • REQ+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SRF - [#130] Classic Fileman Calls

Label References

Name Line Occurrences
ASK ASK+3
BEG ASK+2
DEL ASK+4
HELP ASK+3
OERR DEL+4
REQ ASK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % REQ+2
>> C0N OERR+1
>> CON BEG*, ASK+5*, REQ+1, DEL+4*
DA REQ+3!*, DEL+4*
DIE REQ+3!*
>> DIK DEL+4*
DR REQ+3!*
DTIME ASK+1, DEL
DUZ REQ+3
>> I BEG*, ASK+5*
IOF BEG
>> SRDT REQ+2*, REQ+3
>> SROERR REQ+4*
>> SRSCON( BEG, ASK+5, REQ+1, DEL+4, OERR+1
>> SRSCON(1 HELP+1
>> SRSCON(2 ASK, DEL, DEL+2, HELP, HELP+1
>> SRSDATE REQ+3
>> SRSDOC REQ+1*
>> SRSDT HELP+1
>> SRSOP REQ+1*
>> SRSOUT DEL+3*
SRTN REQ+1*, REQ+3, REQ+4, DEL+2*, DEL+4!, OERR+1~*
>> SRYN DEL*, DEL+1*, DEL+2, DEL+3
>> X ASK+1*, ASK+2*, ASK+3, ASK+4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All