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

Package: Surgery

Routine: SROAOPS


Information

SROAOPS ;BIR/MAM - OTHER PROCEDURES ; 17 MAR 1992 1:30 pm [ 12/15/98 12:51 PM ]

Source Information

Source file <SROAOPS.m>

Entry Points

Name Comments DBIA/ICR reference
OTHER ; other procedures
ASK
END
HELP
SETOP ; set other operative info
RANGE ; range of numbers
ONE ; edit one procedure
HDR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"1. Other Procedure (1):"
  • Line Location: OTHER+5
Function Call: WRITE
  • Prompt: ?25,$P(SRAOTH(1),"^")
  • Line Location: OTHER+5
Function Call: WRITE
  • Prompt: !," CPT Code:"
  • Line Location: OTHER+6
Function Call: WRITE
  • Prompt: ?25,$P(SRAOTH("1A"),"^")
  • Line Location: OTHER+6
Function Call: WRITE
  • Prompt: !!,"2. Other Procedure (2):"
  • Line Location: OTHER+7
Function Call: WRITE
  • Prompt: ?25,$P(SRAOTH(2),"^")
  • Line Location: OTHER+7
Function Call: WRITE
  • Prompt: !," CPT Code:"
  • Line Location: OTHER+8
Function Call: WRITE
  • Prompt: ?25,$P(SRAOTH("2A"),"^")
  • Line Location: OTHER+8
Function Call: WRITE
  • Prompt: !!,"3. Other Procedure (3):"
  • Line Location: OTHER+9
Function Call: WRITE
  • Prompt: ?25,$P(SRAOTH(3),"^")
  • Line Location: OTHER+9
Function Call: WRITE
  • Prompt: !," CPT Code:"
  • Line Location: OTHER+10
Function Call: WRITE
  • Prompt: ?25,$P(SRAOTH("3A"),"^")
  • Line Location: OTHER+10
Function Call: WRITE
  • Prompt: !!,"4. Other Procedure (4):"
  • Line Location: OTHER+11
Function Call: WRITE
  • Prompt: ?25,$P(SRAOTH(4),"^")
  • Line Location: OTHER+11
Function Call: WRITE
  • Prompt: !," CPT Code:"
  • Line Location: OTHER+12
Function Call: WRITE
  • Prompt: ?25,$P(SRAOTH("4A"),"^")
  • Line Location: OTHER+12
Function Call: WRITE
  • Prompt: !!,"5. Other Procedure (5):"
  • Line Location: OTHER+13
Function Call: WRITE
  • Prompt: ?25,$P(SRAOTH(5),"^")
  • Line Location: OTHER+13
Function Call: WRITE
  • Prompt: !," CPT Code:"
  • Line Location: OTHER+14
Function Call: WRITE
  • Prompt: ?25,$P(SRAOTH("5A"),"^")
  • Line Location: OTHER+14
Function Call: WRITE
  • Prompt: !
  • Line Location: OTHER+15
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OTHER+15
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: @IOF,!!!!!,"Enter the number or range of numbers you want to edit. Examples of proper",!,"responses are listed below."
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !!,"1. Enter 'A' to update all information.",!!,"2. Enter a number (1-5) to update one specific procedure. For example, ",!," enter '1' to update Other Procedure (1)."
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!,"3. Enter a range of numbers, separated by a ':' to update more than one",!," procedure. For example, enter '1:2' to enter Other Procedure (1) and",!," Other Procedure (2)."
  • Line Location: HELP+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: @IOF,!,SRANAME,!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+0
Info |  Source |  Entry Points |  Interaction Calls