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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SCDXSUP1

Package: Scheduling

Routine: SCDXSUP1


Information

SCDXSUP1 ;RENO/KEITH ALB/SCK - Supervisory Options for Ambulatory Care Reporting; 2/26/97

Source Information

Source file <SCDXSUP1.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 4 ^DIC  WAIT^DICD  ^DIE  ^DIR  
Kernel 1 ($$DT,$$FMTE)^XLFDT  
Scheduling 1 LOGDATA^SDAPIAP  

Entry Points

Name Comments DBIA/ICR reference
SCED ; Select stop code
ASKDT(TXT) ; Enter beginning date for searching outpatient encounter file
SET ;
APPQ ;
APPTY ; Edit Appointment type for Add/Edit
EXIT ;
APP1
ASK
GET(SCN) ; Select appointment from list

External References

Name Field # of Occurrence
^DIC ASK+1, SCED+28
WAIT^DICD ASK+12
^DIE SCED+46
^DIR GET+7, SCED+35, ASKDT+4
LOGDATA^SDAPIAP SCED+47
$$DT^XLFDT ASKDT+3
$$FMTE^XLFDT ASK+19, ASKDT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Ending date cannot be earlier than the beginning date!"
  • Line Location: APP1+2
Function Call: WRITE
  • Prompt: !!,"This patient has no outpatient encounters on file!",!!
  • Line Location: ASK+7
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+13
Function Call: WRITE
  • Prompt: !,SCI,?5,$$FMTE^XLFDT(SCDT,"1P")
  • Line Location: ASK+19
Function Call: WRITE
  • Prompt: !!,"No encounters on file for this patient during this date range.",!
  • Line Location: ASK+23
Function Call: WRITE
  • Prompt: !
  • Line Location: GET+3
Function Call: WRITE
  • Prompt: !!,"No occasion-of-service add/edits for this patient/date.",!
  • Line Location: SCED+13
Function Call: WRITE
  • Prompt: !!,"Appt. DT",?24,"Location",?60,"Appt. Type"
  • Line Location: SCED+16
Function Call: WRITE
  • Prompt: !,SCLINE
  • Line Location: SCED+17
Function Call: WRITE
  • Prompt: !!
  • Line Location: SCED+20
Function Call: WRITE
  • Prompt: !,Y,?24,$E($P(SCK(SCE),U,2),1,30),?60,$E($P(SCK(SCE),U,3),1,18)
  • Line Location: SCED+22
Function Call: WRITE
  • Prompt: !,"Outpatient Encounter entry: "_DA_" for "_$P($G(^DPT(SCDFN,0)),U)_" is in use, cannot edit."
  • Line Location: SCED+49
Function Call: WRITE
  • Prompt: !,"Done."
  • Line Location: SCED+52
Routine Call
  • DIE
  • Line Location:
    • SCED+46
Routine Call
  • DIC
  • Line Location:
    • ASK+1
    • SCED+28
Routine Call
  • DIR
  • Line Location:
    • GET+7
    • SCED+35
    • ASKDT+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^SD(409.1 - [#409.1] Classic Fileman Calls
^SCE - [#409.68] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" SCED+21
^DPT - [#2] SCED+49
^SC - [#44] SCED+10, SET+4
^SCE - [#409.68] SCED+9, SCED+10, SCED+43, SCED+50
^SCE("ADFN" ASK+15, SCED+6, SCED+8
^SCE("C" ASK+6
^SD(409.1 - [#409.1] SET+5
^TMP("SCEA" ASK+9!, ASK+18*, SCED+3

Label References

Name Line Occurrences
$$ASKDT APPTY+3, APP1
APP1 APP1+1
APPQ APPTY+3, APP1, ASK+2
ASK ASK+6, ASK+22, ASK+27
EXIT ASK+3
GET ASK+20, ASK+25
SCED ASK+26
SET SCED+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA SCED+1~, SCED+40*, SCED+41*, SCED+43, SCED+47, SCED+49, SCED+50
DIC APPTY+1~, ASK*, ASK+1!, SCED+1~, SCED+24!, SCED+25*, SCED+28!
DIC("A" SCED+26*
DIC("B" SCED+27*
DIC(0 ASK*, SCED+25*
DIE APPQ+1!, SCED+1~, SCED+39!, SCED+45*, SCED+46!
DIR APPTY+1~, GET+1~, GET+2!, GET+7!, SCED+1~, SCED+33!, SCED+35!, ASKDT+4!
DIR("?" GET+5*, GET+6*, ASKDT+2*
DIR("A" GET+4*, SCED+34*, ASKDT+1*
DIR("B" SCED+34*, ASKDT+3*
DIR(0 GET+4*, SCED+34*, ASKDT+1*
DIRUT APPTY+1~, GET+1~, GET+9, ASKDT+5, ASKDT+6!
DR APPQ+1!, SCED+1~, SCED+39!, SCED+45*
DTOUT APPTY+1~, ASK+2, APPQ+1!, GET+1~, GET+8, SCED+29, SCED+36
DUOUT ASK+2, APPQ+1!, GET+1~, GET+8, SCED+29, SCED+36
DUTOUT APPTY+1~
IOM SCED+17
>> SCBD APPTY+3*, APP1+1, ASK+15
SCCL SET+1~, SET+4*, SET+6
SCDATE SCED+1~, SCED+3*, SCED+5, SCED+6
SCDFN APPTY+1~, ASK+4*, ASK+6, ASK+15, SCED+6, SCED+8, SCED+49
SCDT APPTY+1~, ASK+14*, ASK+15*, ASK+17*, ASK+18, ASK+19, SCED+1~, SCED+5*, SCED+6*, SCED+8
, SET+1~, SET+3*, SET+6
SCE SCED+1~, SCED+7*, SCED+8*, SCED+9, SCED+10, SCED+19*, SCED+20*, SCED+21, SCED+22, SET+6
SCE0 SCED+1~, SCED+9*, SCED+10, SET+3, SET+4, SET+5
>> SCED APP1*, APP1+1, ASK+14
SCG APPTY+1~, ASK+10*, ASK+26, GET+10*, SCED+3
SCI APPTY+1~, ASK+10*, ASK+16*, ASK+18, ASK+19, ASK+20, ASK+22, ASK+25
SCK SCED+1~, SCED+12, SCED+15
SCK( SCED+20, SCED+21, SCED+22, SCED+41, SET+6*
SCLINE SCED+1~, SCED+17*
SCN GET~, GET+4
SCOUT APPTY+1~, ASK+10*, ASK+15, GET+8*, GET+10*
SCTY SET+1~, SET+5*, SET+6
SCY SCED+1~, SCED+31*
SDLOG SCED+1~, SCED+47
SUCCESS SCED+1~, SCED+42!, SCED+43*, SCED+44
TXT ASKDT~, ASKDT+1
U SCED+10, SCED+21, SCED+22, SCED+31, SCED+34, SCED+49, SET+4, SET+5, SET+6
>> Y ASK+3, ASK+4, GET+10, SCED+21*, SCED+22, SCED+30, SCED+31, SCED+34, SCED+37, ASKDT+5*
, ASKDT+7
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All