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

Package: Scheduling

Routine: SDNACT1


Information

SDNACT1 ;ALB/TMP - Inactivate a Clinic (continued) ; 30 APR 85 9:02 am

Source Information

Source file <SDNACT1.m>

Entry Points

Name Comments DBIA/ICR reference
R
D1
LIST
SEL
DD
SET
PAT
SDEC(SC) ;remove inactivation and reactivation date from SDEC RESOURCE (lab 781)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"RESPOND YES (Y) OR NO (N)"
  • Line Location: D1+0
Function Call: WRITE
  • Prompt: !!!,"EXISTING PATTERNS: ",!
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: !,$P(SDAY,"^",A+1),"day "
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: !,$P(SDAY,"^",A+1),"day "
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: LIST+1
Function Call: WRITE
  • Prompt: !!,"AVAILABILITY DATE: ",$E(SDX,4,5),"-",$E(SDX,6,7),"-",$E(SDX,2,3)," ("
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: ")"
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: *7,!,"Inactivation date not deleted"
  • Line Location: DD+0
Function Call: WRITE
  • Prompt: !,*7,"Inactivation date deleted"
  • Line Location: DD+2
Info |  Source |  Entry Points |  Interaction Calls