GMRCIBKG ;SLC/JFR - IFC BACKGROUND ERROR PROCESSOR; Jun 18, 2024@15:09:24
Source file <GMRCIBKG.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 4 | ^%ZTLOAD ($$DOW,$$FMADD,$$FMDIFF,$$FMTH,$$NOW)^XLFDT (DELETEA,SETUP)^XQALERT $$STA^XUAF4 |
Consult Request Tracking | 3 | (PTERRMSG,SNDALRT)^GMRCIERR ($$CNVTD,TRIGR)^GMRCIEVT $$OBR^GMRCISG1 |
VA FileMan | 3 | $$FIND1^DIC ^DIK $$GET1^DIQ |
Health Level Seven | 2 | INIT^HLFNC2 LINK^HLUTIL3 |
Registration | 2 | $$EN^VAFCPID $$SITE^VASITE |
Master Patient Index VistA | 1 | ($$GETICN,$$IFLOCAL)^MPIF001 |
Toolkit | 1 | ($$GET,EN)^XPAR |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Consult Request Tracking | 3 | GMRC IFC BACKGROUND STARTUP GMRCIEVT GMRCINC |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;process file 123.6 and take action
|
|
REQUEUE | ;task job to start up again one hour after completing
|
|
DELALRT(MSGLOG) | ;delete obsolete alerts for an entry
; Input: ; MSGLOG = ien from file 123.6 |
|
OVERDUE | ; write message for alert to tell IRM job is overdue
|
|
GONOGO() | ; determine if background job should run or not
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | REQUEUE+6 |
$$FIND1^DIC | EN+79 |
^DIK | EN+46 |
$$GET1^DIQ | EN+82 |
PTERRMSG^GMRCIERR | EN+87 |
SNDALRT^GMRCIERR | EN+60, EN+100, EN+109 |
$$CNVTD^GMRCIEVT | EN+76 |
TRIGR^GMRCIEVT | EN+18, EN+24, EN+30, EN+38, EN+56, EN+97, EN+105 |
$$OBR^GMRCISG1 | EN+84 |
INIT^HLFNC2 | EN+63 |
LINK^HLUTIL3 | EN+71 |
$$GETICN^MPIF001 | EN+67 |
$$IFLOCAL^MPIF001 | EN+68 |
$$EN^VAFCPID | EN+69 |
$$SITE^VASITE | EN+86 |
$$DOW^XLFDT | EN+52, EN+94 |
$$FMADD^XLFDT | EN+12, EN+24, EN+30, EN+44, EN+49, EN+90, REQUEUE+5 |
$$FMDIFF^XLFDT | GONOGO+13, GONOGO+15 |
$$FMTH^XLFDT | REQUEUE+5 |
$$NOW^XLFDT | EN+8, EN+12, EN+24, EN+30, EN+49, EN+90, EN+113, REQUEUE+5, GONOGO+10 |
$$GET^XPAR | EN+42, EN+51, EN+78, EN+93, GONOGO+8, GONOGO+12 |
EN^XPAR | EN+8, EN+113 |
DELETEA^XQALERT | DELALRT+6, GONOGO+18 |
SETUP^XQALERT | GONOGO+23 |
$$STA^XUAF4 | EN+83 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^GMR(123.6 - [#123.6] | Classic Fileman Calls |
^HLCS(870 - [#870] | FIND1^DIC, GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^GMR(123 - [#123] | EN+65 |
^GMR(123.6 - [#123.6] | EN+13, EN+14, EN+36 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CNVDT | EN+75~, EN+76*, EN+77, EN+80 |
DA | EN+41~, EN+45* |
DIK | EN+41~, EN+45* |
DIV | EN+86~* |
DOM | EN+62~, EN+82*, EN+87 |
DOW | EN+50~, EN+52*, EN+53, EN+92~, EN+94*, EN+95 |
DT | EN+52, EN+94 |
GMRCBFI | GONOGO+7~, GONOGO+12*, GONOGO+13, GONOGO+15 |
GMRCBST | GONOGO+7~, GONOGO+8*, GONOGO+9, GONOGO+11, GONOGO+13, GONOGO+15 |
GMRCDFN | EN+65~*, EN+66, EN+67, EN+68, EN+69 |
GMRCIQT | EN+62~, EN+64, EN+66*, EN+67*, EN+68* |
GMRCLNK | EN+62~, EN+71, EN+79*, EN+80*, EN+81, EN+82 |
GMRCLNK(0 | EN+80 |
GMRCLNK(1 | EN+78*, EN+79 |
GMRCLOG | EN+10~, EN+11*, EN+13*, EN+14, EN+37, EN+45, EN+55, EN+59, EN+60, EN+99 , EN+100, EN+104, EN+108, EN+109 |
GMRCLOG0 | EN+10~, EN+14*, EN+17, EN+18, EN+22, EN+24, EN+28, EN+30, EN+33, EN+35 , EN+36, EN+38, EN+40, EN+44, EN+49, EN+56, EN+57, EN+65, EN+71, EN+76 , EN+83, EN+84, EN+90, EN+97, EN+98, EN+103, EN+105, EN+107 |
GMRCNOW | GONOGO+7~, GONOGO+10*, GONOGO+11, GONOGO+13 |
GMRCPAR | EN+50~, EN+51*, EN+53, EN+92~, EN+93*, EN+95 |
GMRCQT | GONOGO+4~, GONOGO+5*, GONOGO+11*, GONOGO+13*, GONOGO+26 |
GMRCRETN | EN+41~, EN+42*, EN+43*, EN+44 |
GMRCSND | EN+50~, EN+53*, EN+54, EN+57, EN+92~, EN+95*, EN+96 |
GMRCTIM | EN+10~, EN+12*, EN+33, EN+44 |
HL | EN+62~, EN+63 |
HLECH | EN+62~ |
HLFS | EN+62~ |
HLQ | EN+62~ |
IOF | OVERDUE+1 |
MSGLOG | DELALRT~, DELALRT+5 |
OBR | EN+62~, EN+84*, EN+87 |
PID | EN+62~, EN+69*, EN+70*, EN+87 |
STA | EN+62~, EN+83*, EN+86*, EN+87 |
U | EN+17, EN+18, EN+22, EN+24, EN+28, EN+30, EN+33, EN+35, EN+36, EN+38 , EN+40, EN+44, EN+49, EN+56, EN+57, EN+65, EN+71, EN+76, EN+83, EN+84 , EN+86, EN+90, EN+97, EN+98, EN+103, EN+105, EN+107 |
XQA | GONOGO+17~ |
XQA("G.IFC TE | CH ERRORS" , GONOGO+19* |
XQAID | DELALRT+4~, DELALRT+5*, GONOGO+17~, GONOGO+18*, GONOGO+21* |
XQAKILL | DELALRT+4~, DELALRT+5*, OVERDUE+8*, GONOGO+17~, GONOGO+18* |
XQAMSG | GONOGO+17~, GONOGO+20* |
XQAROU | GONOGO+17~, GONOGO+22* |
ZTDESC | REQUEUE+1~, REQUEUE+2* |
ZTDTH | REQUEUE+1~, REQUEUE+5* |
ZTIO | REQUEUE+1~, REQUEUE+3* |
>> ZTQUEUED | EN+2 |
>> ZTREQ | EN+2* |
ZTRTN | REQUEUE+1~, REQUEUE+4* |
ZTSK | REQUEUE+1~ |