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

Package: Scheduling

Routine: SCDXUAPI


Information

SCDXUAPI ;ALB/MLI - Utility API to add OOS clinic locations ; 10/8/96

Source Information

Source file <SCDXUAPI.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 FILE^DICN  ^DIE  GETS^DIQ  
Scheduling 1 $$EX^SDCOU2  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Lab Service 1 LRCAPPH2  
Radiology Nuclear Medicine 1 RASYS1  

Entry Points

Name Comments DBIA/ICR reference
VAR(IEN,SC) ; set up variables for ADD and EDIT calls based on existing entry
VARQ
EDIT(SCIEN,SCNAME,SCINST,SCSTOP,SCPKG,SCINACT) ; update fields
CHKQ
ADD(SCNAME,SCPKG) ; add new entry
ERRORS ; list of error messages
SCREEN(PKG) ; screen to only allow OOS locations for specified package
  • ICR #1623
    • Status: Active
    • Usage: Controlled Subscription
    LOC(NAME,INST,STOP,PKG,IEN,INACT) ; add/edit location for ancillary app
  • ICR #1623
    • Status: Active
    • Usage: Controlled Subscription
    NEW(IEN,PKG) ; create new entry given parameters from existing entry
    ERRCHKQ
    ERR(NUMBER) ; return error message corresponding to the number passed in
    RAD(IEN,PKG) ; radiology call
  • ICR #1623
    • Status: Active
    • Usage: Controlled Subscription
    CHK(IEN) ; check to see if patterns exist for IEN
    EXEMPT() ; screen on clinic stop file to select only OOS stops
  • ICR #1623
    • Status: Active
    • Usage: Controlled Subscription
    LOCQ
    ERRCHK(SC,RAD) ; check input variables for consistency
    PKGIENQ
    UPD(IEN,PKG) ; update existing entry
    PKGNM(SCPKG) ; Return Name of Package
    ; Input: SCPKG - Pointer to Package File (9.4)
    ; Returned: Name of Package or 'Bad or Missing Pointer'
    RADQ
    PKGIEN(PKG) ; get IEN of package file entry
    DIV(INST) ; return division associated with institution
    NONCOUNT(IEN) ; convert location to non-count

    External References

    Name Field # of Occurrence
    FILE^DICN ADD+5
    ^DIE NONCOUNT+7, EDIT+22
    GETS^DIQ PKGNM+5
    $$EX^SDCOU2 ERRCHK+23

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^SC - [#44] Classic Fileman Calls
    ^DIC(9.4 - [#9.4] GETS^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DG(40.8 - [#40.8] VAR+12, DIV+1
    ^DIC(4 - [#4] ERRCHK+11
    ^DIC(40.7 - [#40.7] LOC+27, ERRCHK+21
    ^DIC(9.4 - [#9.4] PKGIEN+9, PKGIEN+10
    ^SC - [#44] LOC+30, ERRCHK+9, ERRCHK+13, ERRCHK+15, VAR+8, CHK+7, CHK+8, CHK+9, CHK+10

    Label References

    Name Line Occurrences
    $$ADD LOC+35, NEW+8
    $$CHK RAD+22
    $$ERR LOC+27, LOC+32, LOC+34, LOC+35, ERRCHK+10, ERRCHK+12, ERRCHK+14, ERRCHK+16, ERRCHK+17, ERRCHK+22
    , ERRCHK+23
    $$ERRCHK RAD+20, LOC+25
    $$NEW RAD+26
    $$PKGIEN RAD+18, LOC+23, SCREEN+1
    CHKQ CHK+7, CHK+8, CHK+9
    EDIT LOC+31, LOC+36, UPD+8, NEW+9
    ERRCHKQ ERRCHK+6, ERRCHK+17, ERRCHK+18
    LOCQ LOC+26, LOC+27
    NONCOUNT RAD+25
    PKGIENQ PKGIEN+7, PKGIEN+8, PKGIEN+9, PKGIEN+10
    RADQ RAD+21
    UPD RAD+23
    VAR UPD+7, NEW+7
    VARQ VAR+11

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DA NONCOUNT+5~, NONCOUNT+6*, EDIT+2~, EDIT+3*
    DD ADD+2~
    DIC ADD+2~, ADD+3*
    DIC("DR" ADD+4*
    DIC(0 ADD+3*
    DIE NONCOUNT+5~, NONCOUNT+6*, EDIT+2~, EDIT+3*
    DINUM ADD+2~
    DIV VAR+7~, VAR+12*
    DO ADD+2~
    DR NONCOUNT+5~, NONCOUNT+6*, EDIT+2~, EDIT+3*, EDIT+4*, EDIT+5*, EDIT+7*, EDIT+8*, EDIT+9*, EDIT+10*
    , EDIT+11*, EDIT+12*, EDIT+13*, EDIT+14*, EDIT+15*, EDIT+16*, EDIT+17*, EDIT+18*, EDIT+20*, EDIT+21*
    DT ERRCHK+14
    ERR RAD+17~, RAD+20*, RAD+21, RADQ, LOC+22~, LOC+25*, LOC+26, LOC+32*, LOC+34*, LOC+35*
    , LOCQ
    I RAD+17~, RAD+19*, LOC+22~, LOC+24*, LOC+34*, CHK+5~, CHK+10*
    IEN RAD~, RAD+22, RAD+23, RAD+25, RAD+26*, RADQ, LOC~, LOC+28, LOC+30, LOC+31
    , LOC+35*, LOC+36, LOCQ, ERRCHK+7~, ERRCHK+8*, ERRCHK+9, ERRCHK+13, ERRCHK+15, NONCOUNT~, NONCOUNT+6
    , UPD~, UPD+7, UPD+8, NEW~, NEW+7, NEW+8*, NEW+9, NEW+10, VAR~, VAR+8
    , CHK~, CHK+7, CHK+8, CHK+9, CHK+10
    INACT LOC~, LOC+31
    INST LOC~, LOC+31, LOC+36, DIV~, DIV+1, EDIT+2~
    LOC ERRCHK+4~, ERRCHK+9*, ERRCHK+10, ERRCHK+12
    NAME LOC~, LOC+31, LOC+35, LOC+36
    NUMBER ERR~, ERR+5
    OK RAD+17~, RAD+22*, RAD+23, RAD+24, ERRCHK+4~, CHK+5~, CHK+6*, CHK+7*, CHK+8*, CHK+9*
    , CHK+10*, CHKQ
    PKG RAD~, RAD+18*, RAD+23, RAD+26, LOC~, LOC+23*, LOC+31, LOC+35, LOC+36, ERRCHK+17
    , UPD~, UPD+8, NEW~, NEW+8, NEW+9, PKGIEN~, PKGIEN+6*, PKGIEN+7, PKGIEN+8, PKGIEN+9
    , PKGIEN+10, SCREEN~, SCREEN+1
    RAD ERRCHK~, ERRCHK+11
    SC ERRCHK~, UPD+6~, UPD+7, NEW+6~, NEW+7, VAR~
    SC("IEN" ERRCHK+6, ERRCHK+8
    SC("INST" ERRCHK+11, UPD+8, NEW+9, VAR+11*, VAR+12*
    SC("NAME" UPD+8, NEW+8, NEW+9, VAR+9*
    SC("PKG" ERRCHK+16
    SC("STOP" ERRCHK+18, ERRCHK+20, UPD+8, NEW+9, VAR+10*
    SCERR LOC+22~, LOC+25
    SCERR( LOC+24*
    SCIEN EDIT~, EDIT+3
    SCINACT EDIT~, EDIT+19
    SCINST EDIT~, EDIT+6
    SCNAME ADD~, ADD+3, EDIT~, EDIT+4
    SCOS PKGNM+4~
    SCOS( PKGNM+6
    SCPKG ADD~, EDIT~, PKGNM~, PKGNM+5, PKGNM+6
    SCSTOP EDIT~, EDIT+9
    SDERR RAD+17~, RAD+20
    SDERR( RAD+19*
    STOP LOC~, LOC+27*, LOC+31, LOC+36, ERRCHK+19~, ERRCHK+20*, ERRCHK+21*, ERRCHK+22, ERRCHK+23
    X RAD+17~, LOC+22~, LOC+29~, LOC+30*, LOC+31, ERRCHK+4~, ERRCHK+13*, ERRCHK+14, ERRCHK+15*, ERRCHK+16
    , VAR+7~, VAR+8*, VAR+9, VAR+10, VAR+11, VAR+12, ADD+2~, ADD+3*, EDIT+2~
    Y RAD+17~, LOC+27*, ERRCHK+4~, ERRCHK+5*, ERRCHK+6, ERRCHK+10*, ERRCHK+11, ERRCHK+12*, ERRCHK+14*, ERRCHK+16*
    , ERRCHK+17*, ERRCHK+18, ERRCHK+22*, ERRCHK+23*, ERRCHKQ, PKGIEN+5~, PKGIEN+7*, PKGIEN+8*, PKGIEN+9*, PKGIEN+10*
    , PKGIEN+11*, PKGIENQ, ADD+2~, ADD+6

    Marked Items

    Name Field # of Occurrence
    $T(ERRORS+NUMBER ERR+5
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All