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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SRSWL

Package: Surgery

Routine: SRSWL


Information

SRSWL ;B'HAM ISC/MAM - PRINT WAITING LIST; 3 Feb 1989 1:38 PM

Source Information

Source file <SRSWL.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Registration 1 DEM^VADPT  

Entry Points

Name Comments DBIA/ICR reference
END
LOOP ; break procedure if greater than 50 characters
MORE
HDR
SET ;
PAGE ;
NUM

External References

Name Field # of Occurrence
DEM^VADPT SET+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Date Entered",?14,"Patient",?29,"Procedure",!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,Z_".",?3,$E(SRSWDT,4,5)_"/"_$E(SRSWDT,6,7)_"/"_$E(SRSWDT,2,3),?12,SRSDFN,?29,SROPS(1)
  • Line Location: SET+5
Function Call: WRITE
  • Prompt: !,?29,SROPS(2)
  • Line Location: SET+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SET+6
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SET+6
Function Call: READ
  • Variable: ZZ
  • Timeout: DTIME
  • Line Location: PAGE+1
Function Call: READ
  • Variable: ZZ
  • Timeout: DTIME
  • Line Location: NUM+0
Function Call: WRITE
  • Prompt: !!,"Enter the number corresponding to the patient that you want to "_$S(SRSDEL:"delete",1:"edit")_", or",!,"press RETURN to continue. Entering a '^' will exit you from this option."
  • Line Location: NUM+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRO(133.8 - [#133.8] SRSWL+3, MORE
^SRO(137.45 - [#137.45] SRSWL+2

Label References

Name Line Occurrences
END SET+1
HDR SRSWL+3, SET+2
LOOP SET+4
MORE SRSWL+3
NUM SRSWL+4
PAGE SET+1, NUM+2
SET MORE

Naked Globals

Name Field # of Occurrence
^( MORE

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN SET+3*
DTIME PAGE+1, NUM
>> I HDR*, SET+6*
IO("Q" END!
IOF HDR
IOSL SET+1
>> LOOP LOOP+1*
>> M LOOP+1, SET+4*
MM SRSWL+4, LOOP+1*, MORE, SET+4!, NUM+3*
MMM LOOP+1*, SET+4!
OPT END!
>> SR SRSWL+3*, SRSWL+4*, MORE, PAGE+1*, NUM*, NUM+3*
>> SRHDR SRSWL+3*, SET+2*, PAGE+1*, NUM+1*
>> SROP SRSWL+3*, MORE*, SET+3, SET+4
>> SROPER LOOP+1*, SET+4*
SROPS SET+4!
SROPS( LOOP+1*
SROPS(1 SET+4*, SET+5
SROPS(2 SET+5
>> SRSDA(1 MORE*, SET+3
>> SRSDEL SRSWL+4, PAGE+1, NUM+2
>> SRSDFN SET+3*, SET+5
>> SRSDPT SRSWL+3*, MORE, SET+3
>> SRSERV SRSWL+2, SRSWL+3, MORE, SET+3
>> SRSWDT SRSWL+3*, MORE, SET+3, SET+5
>> SRTS SRSWL+2*, HDR
>> SRW( SET+3*, NUM+2
>> VADM(1 SET+3
>> Z SRSWL+3*, SET+3*, SET+5
>> ZZ SET+1, PAGE+1*, NUM*, NUM+1, NUM+2, NUM+3*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All