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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SROARET

Package: Surgery

Routine: SROARET


Information

SROARET ;BIR/MAM - UPDATE RETURNS ;07/07/04 12:27 PM

Source Information

Source file <SROARET.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Surgery 3 (,HDR)^SROAUTL  ^SROPS  ^SRSKILL  
VA FileMan 3 C^%DTC  FILE^DICN  ^DIK  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SRO UPDATE RETURNS  

Entry Points

Name Comments DBIA/ICR reference
RETURN
PICK
DEL ; delete returns
CHECK ; add to RETURNS if necessary
LIST ; list returns
LOOP ; break procedures
UPDATE ; update single return
END
END1
RELATED ; update RELATED/UNRELATED status
CHANGE

External References

Name Field # of Occurrence
C^%DTC SROARET+4
FILE^DICN CHECK+8
^DIK DEL+1
^SROAUTL SROARET+3
HDR^SROAUTL RETURNRELATED+2
^SROPS SROARET+2
^SRSKILL END1+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There are no surgical cases entered for "_SRNAME_"",!,"within 30 days of this operation."
  • Line Location: SROARET+10
Function Call: WRITE
  • Prompt: !,SRLINE,!
  • Line Location: RETURN+5
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PICK+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PICK+1
Function Call: WRITE
  • Prompt: !!,"Select the number corresponding to the return which you want to update, or",!,"enter RETURN to quit this option.",!!,"Press RETURN to continue "
  • Line Location: PICK+1
Function Call: WRITE
  • Prompt: !,CNT_".",?3,DATE,?15,SROPS(1)
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: !,?15,SROPS(2)
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: !,?15,SROPS(2)
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+6
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: RELATED+2
Function Call: WRITE
  • Prompt: !,SRLINE,!
  • Line Location: RELATED+2
Function Call: READ
  • Variable: SRYN
  • Timeout: DTIME
  • Line Location: CHANGE+0
Function Call: WRITE
  • Prompt: !!,"Enter 'YES' to change the status of this return from "_SRELATE_" to "_OPPOSITE_".",!,"Enter 'NO' to leave the information unchanged.",!
  • Line Location: CHANGE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] SROARET+3, SROARET+4, SROARET+5, SROARET+6, SROARET+7, SROARET+10, RETURN+1, RETURN+2*, CHECK+1, CHECK+2
CHECK+3, CHECK+4, CHECK+6, CHECK+7*, CHECK+9*, LIST+1, LIST+3, CHANGE+3*
^SRF("B" SROARET+9

Label References

Name Line Occurrences
CHANGE CHANGE+1
CHECK SROARET+9
DEL SROARET+7, SROARET+8
END SROARET+10, RETURN+4, PICK
END1 SROARET+2
LIST RETURN+3, RELATED+2
LOOP LIST+4
RELATED RETURN+4, PICK+2
RETURN PICK+1, PICK+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CAN CHECK+1*, CHECK+2*
>> CASE SROARET+6*, SROARET+7
>> CNT RETURN+1*, RETURN+2*, RETURN+3, LIST+5, RELATED+2*
>> CON CHECK+3*
DA DEL+1*, CHECK+8!
DA(1 DEL+1*, CHECK+8*
>> DATE CHECK+4*, LIST+3*, LIST+5
DD CHECK+8!
>> DFN SROARET+9
DIC CHECK+8!*
DIC(0 CHECK+8*
>> DIK DEL+1*
DINUM CHECK+8!*
DLAYGO CHECK+8*!
DO CHECK+8!
DTIME PICKPICK+1, ENDCHANGE
>> END SROARET+4*, SROARET+7, CHECK+4
>> I SROARET+3*
IOF END1+1
>> LOOP LOOP+1*
>> M LIST+4*, LOOP+1
MM LIST+4!, LOOP+1*
MMM LIST+4!, LOOP+1*
>> OPPOSITE RELATED+1*, CHANGE+1, CHANGE+3
>> RETURN RELATED+1*, CHANGE+3
>> SR(0 SROARET+3*, SROARET+4, SROARET+7, CHECK+4
>> SRCASE SROARET+5*, SROARET+6, SROARET+9*, RETURN+1*, RETURN+2, RETURN+3, DEL+1, CHECK+1, CHECK+2, CHECK+3
CHECK+4, CHECK+6, CHECK+8, CHECK+9, LIST+1, LIST+3, RELATED+2*
>> SRCT SROARET+6*, SROARET+7
>> SRELATE RETURN+3*, LIST+2, RELATED+1*, CHANGECHANGE+1
>> SRENDT SROARET+4*
SRETURN SROARET+4!
SRETURN( RETURN+3*, PICK+1, RELATED+1, RELATED+2
SRETURN(2 RETURN+4, RELATED+2
>> SRLINE SROARET+3*, RETURN+5, RELATED+2
>> SRNAME SROARET+3*, SROARET+10
>> SROPER LIST+1*, LIST+2*, LIST+4*, LOOP+1*
SROPS LIST+4!
SROPS( LOOP+1*
SROPS(1 LIST+4*, LIST+5
SROPS(2 LIST+5
SROPS(3 LIST+5
>> SRPAGE RETURN*, RELATED+2*
>> SRSDATE SROARET+4*, SROARET+7, CHECK+4
>> SRSOUT SROARET+2*, SROARET+3*, PICK*, END, CHANGE*
>> SRSUPCPT SROARET+3*
>> SRT SROARET+4*, SROARET+8, CHECK+5
>> SRT1 SROARET+6*, SROARET+8, CHECK+4*, CHECK+5
SRTN SROARET+2, SROARET+3, SROARET+4, SROARET+5, SROARET+6, SROARET+9, SROARET+10, RETURN+1, RETURN+2, DEL+1
CHECK+3, CHECK+6, CHECK+7, CHECK+8, CHECK+9, END1!, CHANGE+3
SRTN1 SROARET+2*, END1!
>> SRYN CHANGE*, CHANGE+1*, CHANGE+2*
>> VADM(1 SROARET+3
>> X SROARET+4, RETURN+2*, RETURN+3, RETURN+4*, PICK*, PICK+1*, CHECK+8*, END*, RELATED+1, RELATED+2
>> X1 SROARET+4*
>> X2 SROARET+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All