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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: GMRCDIS

Package: Consult Request Tracking

Routine: GMRCDIS


Information

GMRCDIS ;SLC/JFR - LM ROUTINE TO DISASSOCIATE MED RESULTS; 11/5/01 11:20

Source Information

Source file <GMRCDIS.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Consult Request Tracking 8 ($$LOCK,UNLOCK)^GMRCA1  SELECT^GMRCA2  EXAC^GMRCADC  $$ORTX^GMRCAU  EN^GMRCHL7  ($$SELECT,RESETIT,SET)^GMRCMED  (AUDIT,MSG,STATUS)^GMRCP  HDR^GMRCSLDT  
VA FileMan 3 ^DIE  ^DIK  ^DIR  
List Manager 2 (EN,SHOW)^VALM  ($$SETSTR,FULL)^VALM1  
Authorization Subscription 1 $$ISA^USRLM  
Kernel 1 $$CJ^XLFSTR  
Medicine 1 $$SINGLE^MCAPI  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Consult Request Tracking 6 GMRC DISASSOC RESULTS  GMRCACT DISASSOC MED RSLT  GMRCACT REMOVE MED RESULT  GMRCACTM  GMRCACTM DISASSOC MED RSLT  GMRCIACT  
Order Entry Results Reporting 2 ORCONSLT  ORQQCN3  

Entry Points

Name Comments DBIA/ICR reference
EN ;invoke list template
HDR ;format list template header
PHDR
INIT ; set up array into ^TMP("GMRCR",$J,"DT"...
; should already have it
GETRES(GMRCO) ; get associated MEDICINE results and format
DIS(GMRCO) ;select consult and start disassoc process
EXIT ;
EN1(GMRCRSLT) ; select result and verify remove action
REMOVE(GMRCO,RSLT,GMRCAD,GMRCORNP) ;disassociate result
; remove rslt, log actv, update sts, send alerts
; Input:
; GMRCO - ien from file 123
; RSLT - medicine result in var ptr form (e.g. "19;MCAR(691.5,")
; GMRCAD - FM date/time of action (optional)
; GMRCORNP - DUZ of person performing action (optional)
STSCHG(GMRCIEN) ;completed before or go back
REFRESH(GMRCIEN) ;re-build list of associated results
REMUSR(GMRCIEN,USER) ; check to see if user is authorized to remove results

External References

Name Field # of Occurrence
^DIE REMOVE+15
^DIK REMOVE+12
^DIR EN1+14
$$LOCK^GMRCA1 DIS+4
UNLOCK^GMRCA1 DIS+12
SELECT^GMRCA2 DIS+2
EXAC^GMRCADC DIS+9, EN1+2, REMOVE+10
$$ORTX^GMRCAU REMOVE+35
EN^GMRCHL7 REMOVE+28
$$SELECT^GMRCMED EN1+5
RESETIT^GMRCMED REFRESH+1
SET^GMRCMED EN1+6
AUDIT^GMRCP REMOVE+19
MSG^GMRCP REMOVE+36
STATUS^GMRCP REMOVE+25
HDR^GMRCSLDT HDR+3
$$SINGLE^MCAPI GETRES+5
$$ISA^USRLM REMUSR+10
EN^VALM EN+1
SHOW^VALM PHDR+3
$$SETSTR^VALM1 HDR+5, GETRES+7, GETRES+8, GETRES+9, GETRES+10
FULL^VALM1 EN1+8
$$CJ^XLFSTR PHDR+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(123 - [#123] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(123 - [#123] GETRES+3, GETRES+4, GETRES+5, GETRES+12, REMOVE+9, REMOVE+13, REMOVE+22, REMOVE+27, REMOVE+31, REMOVE+32
, REMOVE+34, STSCHG+1, STSCHG+2, STSCHG+4, STSCHG+5, REMUSR+2, REMUSR+3, REMUSR+5, REMUSR+7
^GMR(123.5 - [#123.5] REMUSR+4
^ORD(101 - [#101] PHDR+4, PHDR+5, PHDR+6, PHDR+7, PHDR+8, PHDR+9, PHDR+10
^TMP("GMRCR" INIT+2, GETRES+11*, GETRES+12*, EXIT+1!, EN1+1, EN1+9, EN1+10, REFRESH+2!, REFRESH+4, REFRESH+5*
, REFRESH+6

Label References

Name Line Occurrences
$$REMUSR DIS+5
$$STSCHG REMOVE+23
EN DIS+11
GETRES DIS+10, REFRESH+3
REMOVE EN1+15

Naked Globals

Name Field # of Occurrence
^(2 STSCHG+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT STSCHG+3~*
ACT(0 STSCHG+5*, STSCHG+6
ACT(2 STSCHG+5*, STSCHG+6
CHG STSCHG+3~*, STSCHG+7*, STSCHG+9
CNT GETRES+1~, GETRES+2*, GETRES+7, GETRES+11, GETRES+12, GETRES+13*
DA REMOVE+8~, REMOVE+12*, REMOVE+14~, REMOVE+15*
DA(1 REMOVE+12*
DATA GETRES+1~, GETRES+6*, GETRES+7*, GETRES+8*, GETRES+9*, GETRES+10*, GETRES+11
DIE REMOVE+14~, REMOVE+15*
DIK REMOVE+8~, REMOVE+12*
DIR EN1+3~
DIR("A" EN1+12*, EN1+13*
DIR("B" EN1+11*
DIR(0 EN1+11*
DIROUT EN1+3~
DR REMOVE+14~, REMOVE+15*
DTOUT EN1+3~
DUOUT EN1+3~
DUZ DIS+5, REMOVE+30, REMUSR+9
GMRCA REMOVE+17~, REMOVE+18*
GMRCAD REMOVE~
GMRCADUZ REMOVE+33~, REMOVE+36
GMRCADUZ( REMOVE+34*
GMRCCLS REMUSR+1~, REMUSR+4*, REMUSR+10
GMRCDFN REMOVE+21~, REMOVE+22*, REMOVE+28, REMOVE+36
GMRCIEN STSCHG~, STSCHG+1, STSCHG+2, STSCHG+4, STSCHG+5, REFRESH~, REFRESH+3, REMUSR~, REMUSR+2, REMUSR+3
, REMUSR+5, REMUSR+7
GMRCMCR GETRES+1~, GETRES+5*, GETRES+8, GETRES+9, GETRES+10
GMRCMEDR EN1+4, EN1+7, REFRESH+1, REFRESH+2!
GMRCMSG DIS+1~, DIS+5*, DIS+7, DIS+9
GMRCO HDR+4, GETRES~, GETRES+3, GETRES+4, GETRES+5, GETRES+12, DIS~, DIS+2, DIS+3, DIS+4
, DIS+5, DIS+10, DIS+12, EN1+15, REMOVE~, REMOVE+9, REMOVE+12, REMOVE+13, REMOVE+15, REMOVE+22
, REMOVE+23, REMOVE+27, REMOVE+28, REMOVE+31, REMOVE+32, REMOVE+34, REMOVE+35, REMOVE+36
GMRCORNP REMOVE~, REMOVE+28, REMOVE+30*, REMOVE+31
GMRCORTX REMOVE+33~, REMOVE+35*, REMOVE+36
GMRCQIT DIS+1~, REMOVE+8~
GMRCQUT DIS+1~, DIS+2, REMOVE+8~
GMRCRES REMOVE+8~, REMOVE+9*, REMOVE+12
GMRCRSLT EN1~, REMOVE+17~, REMOVE+18*
GMRCSS DIS+1~, REMUSR+1~, REMUSR+3*, REMUSR+4
GMRCSTS REMOVE+24~, REMOVE+25*
GMRCTYP REMOVE+21~, REMOVE+27*, REMOVE+28
GMRCVTIT HDR+1~, HDR+2*
I STSCHG+3~*, STSCHG+4*, STSCHG+5
>> ITEM EN1+4, EN1+5*, EN1+6, EN1+7*, EN1+9, EN1+10
MSG DIS+6~, DIS+8*, DIS+9
RES GETRES+1~, GETRES+2*, GETRES+3*, GETRES+4, GETRES+5, GETRES+12, REMUSR+1~, REMUSR+6*, REMUSR+7*, REMUSR+8
RESTXT EN1+3~, EN1+9*, EN1+12
RESULT EN1+3~, EN1+10*, EN1+15
RSLT REMOVE~, REMOVE+9, REMOVE+13, REMOVE+18
U GETRES+8, GETRES+9, GETRES+10, DIS+7, DIS+9, REMOVE+13, REMOVE+22, REMOVE+27, REMOVE+31, REMOVE+32
, REMOVE+34, STSCHG+6, REMUSR+2, REMUSR+3, REMUSR+4
USER REMUSR~, REMUSR+9*, REMUSR+10
>> VALMBCK REFRESH+7*
>> VALMBG INIT+2*
>> VALMCNT PHDR+4, INIT+2*, EN1+5, REFRESH+6*
>> VALMHDR(2 HDR+4*, HDR+5*
>> VALMSG PHDR+1*
X EN1+3~
>> XQORM("#" PHDR+4*
>> XQORM("KEY" PHDR+5*, PHDR+6*, PHDR+7*, PHDR+8*, PHDR+9*, PHDR+10*
>> XQORM("M" PHDR+2*
Y EN1+3~, EN1+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All