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

Package: Consult Request Tracking

Routine: GMRCSLM


Information

GMRCSLM ;SLC/DCM,JFR - List Mgr routine for consult tracking list ;9/8/99 14:52

Source Information

Source file <GMRCSLM.m>

Call Graph

Call Graph Total: 18

Package Total Call Graph
Consult Request Tracking 10 EN^GMRCACTM  ASRV^GMRCASV  EN^GMRCMENU  ^GMRCREXT  SELPT^GMRCS  AD^GMRCSLM1  EXIT^GMRCSLMA  RESET^GMRCSLMV  
^GMRCSPD  DEM^GMRCU  
Registration 3 EN^VALM  FULL^VALM1  SET^VALM10  
VA Fileman 2 ^DIC  ^DIR  
General Medical Record - Vitals 1 EN6^GMRVUTL  
Kernel 1 $$LOW^XLFSTR  
Order Entry Results Reporting 1 $$CWAD^ORQPT2  

Caller Graph

Caller Graph Total: 11

Package Total Caller Graph
Consult Request Tracking 11 GMRC IFC RPT CONSULTS BY PT  GMRC SERVICE TRACKING  GMRCAR  GMRCMCP  GMRCMP  GMRCPX  GMRCPZ  GMRCSLDT  
GMRCSLMA  GMRCSSP  GMRCSTAT  

Entry Points

Name Comments DBIA/ICR reference
FND(CD) ;status already selected?
EN ; -- main entry point for GMRC CONSULT TRACKING
END
HELP ; -- help code
STS ;Select a status for view. i.e., only active, pendings, DC'd, etc.
HDR2(GMRCX) ;format VALMHDR(2) with patient weight
SS ;Select A New Service or ALL SERVICES to Display Patient Consults
PHYEN ;Entry Point When Provider's service is known and only needs to look at consults for that service
HDR1 ;format VALMHDR(1) with patient information
INIT ; -- init variables and list array
SPK ;Kill variables
EXIT ; -- exit code
SPQ ;New patient has not been selected - keep current patient
SP ;;Select a new patient and return DFN and GMRCSSNM to display consults and requested Service.
SPD ;Enter a date range for serching consults; null entry selects all consults and does not exclude by date
STCK(RES)
HDR ; -- header code

External References

Name Field # of Occurrence
^DIC PHYEN+2
^DIR EN+8, STS+11
EN^GMRCACTM SS+7
ASRV^GMRCASV SP+9, SS+3
EN^GMRCMENU SP+11, SS+7
^GMRCREXT EXIT+3
SELPT^GMRCS SP+3
AD^GMRCSLM1 PHYEN+6, SPD+4, SS+5
EXIT^GMRCSLMA HELP+10
RESET^GMRCSLMV SP+6, SS+8, STS+14, STS+17
^GMRCSPD SPD+1
DEM^GMRCU HDR1+5
EN6^GMRVUTL HDR1+3
$$CWAD^ORQPT2 HDR1+16
EN^VALM EN+11, PHYEN+7, PHYEN+8
FULL^VALM1 HELP+1, SP+1, SS+2, STS+1
SET^VALM10 INIT+3
$$LOW^XLFSTR STS+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Enter the display number of the item you wish to act on, or select an action."
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !!,"If you'd like another view of the consults, enter CV."
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !!,"Status key:",!?5,"'a' - active",?27,"'c' - complete",?50,"'dc' - discontinued",!?5,"'p' - pending",?27,"'x' - cancelled",?50,"'pr' - partial results",!?5,"'s' - scheduled",?27,"'e' - expired"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !!,"Enter ?? to see a list of actions available for navigating the list."
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !!,"Press <return> to continue ..."
  • Line Location: HELP+6
Function Call: WRITE
  • Prompt: " "_GMRCPNM
  • Line Location: SPQ+2
Function Call: WRITE
  • Prompt: $C(7),!,"Already selected"
  • Line Location: STCK+10
Routine Call
  • VALM
  • Line Location:
    • EN+11
    • PHYEN+7
    • PHYEN+8
Routine Call
  • DIC
  • Line Location:
    • PHYEN+2
Routine Call
  • DIR
  • Line Location:
    • EN+8
    • STS+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(49 - [#49] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("XY" HELP+9
^DIC(42 - [#42] HDR1+8
^GMR(123.5 - [#123.5] PHYEN+2, SP+10, SS+4
^SC - [#44] HDR1+10
^TMP("GMRC" INIT+6
^TMP("GMRCR" INIT+1!, INIT+3, EXIT+1!
^VA(200 - [#200] PHYEN+1, PHYEN+2

Label References

Name Line Occurrences
$$FND STCK+10
END PHYEN+4, PHYEN+7, PHYEN+8, STS+12, STS+13
EXIT PHYEN+4, PHYEN+7, PHYEN+8
HDR SS+5
HDR1 HDR+3
HDR2 HDR+4
INIT SS+5
SP EN+10, PHYEN+3
SPD PHYEN+4
SPK SP+3, SP+4, SP+5, SP+8, SPD+2
STCK STS+13
STS STS+18

Naked Globals

Name Field # of Occurrence
^( INIT+3
^("MENU" INIT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CD FND~, FND+1, FND+2, FND+3
CODE STCK+1~, STCK+3*, STCK+4*, STCK+5*, STCK+6*, STCK+7*, STCK+8*, STCK+9*, STCK+10, STCK+11
, STCK+12
DATA INIT+2*, INIT+3*, INIT+5!
>> DFN HDR1+16, SP+2, SP+3*, SP+5*, SPQ+1, SPQ+2*
DIC PHYEN+2*!
DIC(0 PHYEN+2*
DIR EN+5~, STS+3~, END!
DIR("A" EN+7*, STS+6*, STS+9*
DIR("B" STS+7*, STS+10!
DIR(0 EN+6*, STS+4*, STS+5*
DIROUT SP+9!
DIRUT EN+5~, EN+8
DSPLINE INIT+2*, INIT+3*, INIT+5!
DTIME HELP+6
DTOUT EN+5~, SP+9!, STS+12
DUOUT EN+5~, SP+9!, STS+12
DUZ PHYEN+1, PHYEN+2
DX HELP+1~, HELP+9*
DY HELP+1~, HELP+9*
>> GMRC("NMBR" SP+6!, SS+8!, STS+13, STS+14, STS+15!, STS+17!
>> GMRCAGE HDR1+15
GMRCBM SPK+2!
GMRCDFN1 SP+2*, SP+3, SP+5, SPD+5!, SPQ+1!, SPQ+2!, SPQ+3!, SPK+2!
>> GMRCDG SP+10, SS+4
>> GMRCDOB HDR1+15
GMRCEN EN+2*, EN+4!, EN+10!, SPD+2
GMRCERR STS+2*, END!
GMRCFL PHYEN+3*, PHYEN+5!, SP+8
GMRCIS EN+4!, EN+9*, HDR+2
>> GMRCLOC HDR1+8*, HDR1+9, HDR1+10
GMRCOER EN+1!, SPD+3*, SS+1*
>> GMRCPNM HDR1+6, SPQ+2
>> GMRCQIT SP+9*
GMRCQUT EN+2!, EN+4!, EN+8*, EN+10!, PHYEN+3, PHYEN+4, SP+2!, SP+3*, SP+4*, SP+5*
, SP+9*, SPD+1, SPQ+1*, SPQ+3*, SS+1!, SS+3
>> GMRCRB HDR1+12
>> GMRCSN HDR1+6
>> GMRCSS PHYEN+2*, SP+10*, SS+4*
>> GMRCSSNM PHYEN+2*, PHYEN+7, SP+10*, SS+4*
>> GMRCSTCK SP+10*, STS+8, STS+13, STCK+2*, STCK+10, STCK+11*, STCK+12*, FND+1, FND+2, FND+3
GMRCTM SPK+2!
GMRCVP SS+1!
>> GMRCWARD SP+7
>> GMRCWLI HDR1+8
>> GMRCWRD SP+7*
>> GMRCWT HDR+4, HDR1+4*, HDR2+1
GMRCX HDR1+1~, HDR1+14*, HDR1+17, HDR2~, HDR2+1
GMRCX1 HDR1+1~, HDR1+6*, HDR1+14
GMRCX2 HDR1+1~, HDR1+9*, HDR1+10*, HDR1+11*, HDR1+12*, HDR1+14
GMRCX3 HDR1+1~, HDR1+15*, HDR1+16*, HDR1+17
GMRVSTR HDR1+1~, HDR1+3*
>> IOBM STS+1
>> IOSTBM STS+1
>> IOTM STS+1
L HDR1+10~*, HDR1+11
LINE INIT+3*, INIT+5!
>> LNCT INIT+3, INIT+4, SPD+5, SS+6
RES STCK~, STCK+2, STCK+3, STCK+4, STCK+5, STCK+6, STCK+7, STCK+8, STCK+9
TIUCWAD HDR1+1~, HDR1+16*
U HDR1+4, HDR1+10, HDR1+11, STS+5
>> VALM SP+1
>> VALM("TITLE" HDR+2*
>> VALMAR INIT+2*
VALMBCK HELP+7*, EXIT+2!, SPD+5*, SPQ+3*, SS+6*
VALMCNT INIT+4*, EXIT+2!, SPD+5*, SS+6*
>> VALMHDR(1 HDR1+17*
>> VALMHDR(2 HDR1+18!, HDR2+1*
VALMPGE INIT+4*, EXIT+2!, SPD+5*
X HDR1+1~, HDR1+4, HELP+1~, HELP+6*, PHYEN+2*, SP+4, STS+3~
>> XQAID HDR1+8
>> XQORM("A" INIT+4*
>> XQORM("HIJACK" INIT+6*
Y EN+5~, EN+9, PHYEN+2, SP+4, SP+5, STS+3~, STS+12, STS+13, END!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All