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

Package: Consult Request Tracking

Routine: GMRCINC


Information

GMRCINC ;SLC/JFR - list incomplete IFC transactions ; 2/12/02 15:05

Source Information

Source file <GMRCINC.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Consult Request Tracking 4 DELALRT^GMRCIBKG  (ACTLG,EN)^GMRCIERR  TRIGR^GMRCIEVT  (BLD,DATA,HDR,LM)^GMRCITR  
List Manager 3 EN^VALM  FULL^VALM1  CNTRL^VALM10  
VA FileMan 3 UPDATE^DIE  $$GET1^DIQ  ^DIR  
Kernel 2 $$FMTE^XLFDT  DISP^XQORM1  

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 8 GMRC IF CHANGE VIEW  GMRC IF INCOMPLETE TRANSACTION  GMRC IF MRK TRANSACTION COMP  GMRC IF RETRANSMIT ACTIVITY  GMRC IF SELECT NEW CONSULT  GMRC IF TRANSACTION  GMRC IFC INC TRANS  GMRCITR  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for GMRCIF INCOMPLETE TRANSACTION
BLD(GMRCDA) ;get list of incomplete IF transactions for a consult #
; Input:
; GMRCDA = ien of consult from file 123
HDR ; -- header code
INIT ; -- init variables and list array
HELP ; -- help code
EXIT ; -- exit code
NEWCSLT ; pick new consult number to check for inc. trans.
RETRAN ;resend a particular transaction
SELACT(GMRCDA)
MKCOMP ; mark a particular transaction complete

External References

Name Field # of Occurrence
UPDATE^DIE MKCOMP+17
$$GET1^DIQ RETRAN+13, MKCOMP+8
^DIR EN+5, EN+9, NEWCSLT+5, NEWCSLT+9, RETRAN+8, RETRAN+15, SELACT+2, SELACT+8, SELACT+11, MKCOMP+12
DELALRT^GMRCIBKG RETRAN+17
ACTLG^GMRCIERR BLD+20
EN^GMRCIERR BLD+14
TRIGR^GMRCIEVT RETRAN+18
BLD^GMRCITR NEWCSLT+19
DATA^GMRCITR NEWCSLT+23
HDR^GMRCITR NEWCSLT+24
LM^GMRCITR NEWCSLT+24
EN^VALM EN+12
FULL^VALM1 NEWCSLT+2, RETRAN+2, MKCOMP+2
CNTRL^VALM10 INIT+6
$$FMTE^XLFDT RETRAN+13, MKCOMP+8
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There is no such consult request number"
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"There is no such consult request number"
  • Line Location: NEWCSLT+8
Function Call: WRITE
  • Prompt: !!,"There is at least one earlier incomplete transaction for this"
  • Line Location: RETRAN+5
Function Call: WRITE
  • Prompt: !,"consult, all incomplete transactions should be processed in "
  • Line Location: RETRAN+6
Function Call: WRITE
  • Prompt: !,"order.",!
  • Line Location: RETRAN+7
Function Call: WRITE
  • Prompt: !
  • Line Location: RETRAN+9
Function Call: WRITE
  • Prompt: !,"There is no such activity number for consult# "_GMRCNUM
  • Line Location: SELACT+7
Function Call: WRITE
  • Prompt: !,"There is no incomplete IFC transaction for that activity"
  • Line Location: SELACT+10
Function Call: WRITE
  • Prompt: !
  • Line Location: MKCOMP+4
Routine Call
  • DIE
  • Line Location:
    • MKCOMP+17
Routine Call
  • DIR
  • Line Location:
    • EN+5
    • EN+9
    • NEWCSLT+5
    • NEWCSLT+9
    • RETRAN+8
    • RETRAN+15
    • SELACT+2
    • SELACT+8
    • SELACT+11
    • MKCOMP+12
Routine Call
  • VALM
  • Line Location:
    • EN+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(123.1 - [#123.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(123 - [#123] EN+7, NEWCSLT+7, RETRAN+13, SELACT+6, MKCOMP+8
^GMR(123.6 - [#123.6] BLD+8, BLD+9, RETRAN+4, RETRAN+17, SELACT+9, MKCOMP+14
^TMP("GMRCIERR" BLD+15, BLD+18!, BLD+21, BLD+22, BLD+23, BLD+24, BLD+27!
^TMP("GMRCINC" BLD+12*, BLD+15*, BLD+19, BLD+22*, BLD+24*, INIT+3, INIT+4, INIT+5, EXIT+2!, NEWCSLT+10!
NEWCSLT+21*, NEWCSLT+25, MKCOMP+18!
^TMP("GMRCS" EXIT+2!, NEWCSLT+10!, MKCOMP+18!

Label References

Name Line Occurrences
$$SELACT RETRAN+3, MKCOMP+3
BLD EN+11, NEWCSLT+13, MKCOMP+19
HDR NEWCSLT+15
INIT NEWCSLT+14, MKCOMP+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT BLD+6~, BLD+7*, BLD+8*, BLD+9, BLD+10, BLD+16*, BLD+17*, BLD+20, BLD+22, INIT+1~
INIT+4*, INIT+5
DIR EN+1~, EN+9!, NEWCSLT+1~, NEWCSLT+9!, RETRAN+1~, SELACT+1~, SELACT+5!, MKCOMP+1~
DIR("?" EN+3*, NEWCSLT+4*
DIR("A" EN+2*, NEWCSLT+3*, RETRAN+11*, RETRAN+12*, RETRAN+13*, RETRAN+14*, SELACT+2*, MKCOMP+6*, MKCOMP+7*, MKCOMP+8*
MKCOMP+9*, MKCOMP+10*, MKCOMP+11*
DIR("S" EN+4*
DIR(0 EN+2*, EN+9*, NEWCSLT+3*, NEWCSLT+9*, RETRAN+8*, RETRAN+10*, SELACT+2*, SELACT+8*, SELACT+11*, MKCOMP+5*
DIROUT EN+1~, NEWCSLT+1~, RETRAN+1~, SELACT+1~, MKCOMP+1~
DIRUT EN+1~, EN+6, NEWCSLT+1~, NEWCSLT+6, RETRAN+1~, SELACT+1~, SELACT+3, MKCOMP+1~
DTOUT NEWCSLT+1~, RETRAN+1~, SELACT+1~, MKCOMP+1~
DUOUT NEWCSLT+1~, RETRAN+1~, SELACT+1~, MKCOMP+1~
ENT BLD+6~, BLD+9*, BLD+10
FDA MKCOMP+1~
FDA(1 MKCOMP+16*
GMRC40 SELACT+1~, SELACT+4*, SELACT+6, SELACT+9, SELACT+12
GMRCACT RETRAN+1~, RETRAN+3*, RETRAN+4, RETRAN+13, RETRAN+17, RETRAN+18, MKCOMP+1~, MKCOMP+3*, MKCOMP+8, MKCOMP+14
GMRCDA BLD~, BLD+8, BLD+9, BLD+12, BLD+14, BLD+20, SELACT~, SELACT+6, SELACT+9
GMRCERR MKCOMP+1~
GMRCLOG BLD+6~, BLD+13*, BLD+14, NEWCSLT+18!, MKCOMP+1~, MKCOMP+14*, MKCOMP+15, MKCOMP+16
GMRCLOG( BLD+10*, BLD+13, BLD+17, BLD+20
GMRCLOG(0 BLD+11, BLD+13, BLD+14, NEWCSLT+20
GMRCNUM EN+10*, EN+11, HDR+1, EXIT+1!, NEWCSLT+11*, NEWCSLT+13, NEWCSLT+17, NEWCSLT+19, NEWCSLT+21, RETRAN+3
RETRAN+4, RETRAN+13, RETRAN+17, RETRAN+18, SELACT+7, MKCOMP+3, MKCOMP+8, MKCOMP+14, MKCOMP+19
>> GMRCS NEWCSLT+23
GMRCSEL EXIT+1!, NEWCSLT+12, NEWCSLT+17*
>> IORVOFF INIT+6
>> IORVON INIT+6
LIN INIT+1~, INIT+5*, INIT+6
LINE BLD+6~, BLD+19*, BLD+20, BLD+23*, BLD+24
U RETRAN+13, MKCOMP+8
>> VALMBCK INIT+7*
>> VALMBG INIT+2*, NEWCSLT+26*, RETRAN+19*, MKCOMP+21*
>> VALMCNT INIT+3*, NEWCSLT+25*
>> VALMHDR(1 HDR+1*
X EN+1~, HELP+1*, NEWCSLT+1~, RETRAN+1~, SELACT+1~, MKCOMP+1~
Y EN+1~, EN+7, EN+10, NEWCSLT+1~, NEWCSLT+7, NEWCSLT+11, RETRAN+1~, RETRAN+16, SELACT+1~, SELACT+4
MKCOMP+1~, MKCOMP+13
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 |  Local Variables  | All