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 |  All
Print Page as PDF
Routine: DWCNST03

Package: Uncategorized

Routine: DWCNST03


Information

DWCNST03 ;NEW PROGRAM [ 07/07/1999 4:37 PM ]

Source Information

Source file <DWCNST03.m>

Entry Points

Name Comments DBIA/ICR reference
PROCESS ; process & display # of consults for this SERVICE
OTHER ;replace usual service with the entry in ^DWCNST03 1966195
XIT ;K SVCN,SVC,XXCNT,XXIII,DWDFN,XXIV,XXNO,OSIE,XXX

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "No SERVICE/SECTION found for this user!!"
  • Line Location: DWCNST03+13
Function Call: WRITE
  • Prompt: !,"Press <Return> to Acknowledge..."
  • Line Location: DWCNST03+26
Function Call: WRITE
  • Prompt: !,XXIV_SVC_" service has "_XXCNT_" new consultation request"_$S(XXCNT>1:"s",1:"")_"."_XXNO
  • Line Location: PROCESS+6
Info |  Source |  Entry Points |  Interaction Calls |  All