GMRCSTL2 ;SLC/DCM,dee;06-Jul-2012 13:02;DU;PLS
Source file <GMRCSTL2.m>
Package | Total | Call Graph |
---|---|---|
Consult Request Tracking | 4 | $$HRCN^GMRCMP ($$STATABBR,$$STATNAME)^GMRCSTL1 GETDT^GMRCSTU (REGDT,REGDTM)^GMRCU |
VA Fileman | 2 | ^%DTC $$GET1^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETRDT(GMRCPT) | ;get the received date
; Input: ; GMRCPT = File #123 IEN ; Output: ; GMRCRDT = Date of action entry for remote request received/received |
|
CTRL | ||
ADDTOT | ||
ONESTAT(GMRCARRN,GMRTST) | ;Process one status
; Input -- GMRCARRN List Template Array Name (Subscript) ; Values: ; "CP": pending consults; "IFC": inter-facility consults ; Output - None |
|
ONE |
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | ONE+19, ONE+24, ONE+25 |
^GMR(123 - [#123] | ONESTAT+8, ONE+1, ONE+3, ONE+4!, ONE+9, ONE+14, ONE+48, ONE+51, GETRDT+7, GETRDT+8 , GETRDT+9, GETRDT+10, GETRDT+11 |
^GMR(123.1 - [#123.1] | ONE+52 |
^GMR(123.5 - [#123.5] | ONE+66 |
^SC - [#44] | ONE+54 |
^TMP("GMRCR" | ONE+63*, ONE+67*, CTRL+14*, CTRL+17* |
^TMP("GMRCRINDEX" | CTRL+3* |
^TMP("GMRCTOT" | ONESTAT+5*, ONESTAT+6*, ONE+34, ONE+35*, ONE+61, CTRL+18*, ADDTOT+2*, ADDTOT+4*, ADDTOT+6*, ADDTOT+10* |
^TMP("GMRCTOTX" | ADDTOT+9, ADDTOT+10* |
Name | Line Occurrences |
---|---|
$$GETRDT | ONE+42 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
COMPLDT | ONE+30~, ONE+38, ONE+39 |
>> CTRLTEMP | ONE+63, ONE+67 |
DUZ(2 | ONE+26 |
GMRCARRN | ONESTAT~, ONE+10, ONE+29, ONE+59, ONE+63, ONE+67, CTRL+14, CTRL+16, CTRL+17 |
>> GMRCCK | ONE+10, ONE+11*, ONE+12*, ONE+13, ONE+15*, ONE+16*, ONE+17*, ONE+18* |
GMRCCKR | GETRDT+5~, GETRDT+6*, GETRDT+7, GETRDT+9* |
>> GMRCCNSLT( | CTRL+18* |
>> GMRCCT | ONE+62*, ONE+63, ONE+64*, ONE+67, CTRL+13*, CTRL+14, CTRL+17 |
>> GMRCCTRL | CTRL, CTRL+1, CTRL+6, CTRL+7 |
>> GMRCD | ONE+47*, ONE+48*, ONE+49, ONE+51 |
>> GMRCD(0 | ONE+9*, ONE+12, ONE+18, ONE+19, ONE+24, ONE+25, ONE+26, ONE+32, ONE+52, ONE+53 , ONE+55, ONE+56, ONE+57, ONE+58 |
>> GMRCD(12 | ONE+14*, ONE+15, ONE+16, ONE+17 |
>> GMRCDA | ONE+50*, ONE+51* |
>> GMRCDLA | ONE+8*, ONE+52*, CTRL+14 |
>> GMRCDT | ONE+7*, CTRL+14 |
>> GMRCDT1 | ONESTAT+7, ONESTAT+8, ONE+38 |
>> GMRCDT2 | ONESTAT+7, ONE+38 |
>> GMRCIDD | ONE+31*, ONE+40*, CTRL+17, CTRL+19, CTRL+20, CTRL+22 |
GMRCIRF | ONE+30~, ONE+32*, ONE+33 |
>> GMRCIRFN | ONE+31*, ONE+33*, ONE+34, ONE+35, ONE+36, CTRL+17, CTRL+18, CTRL+20, CTRL+21 |
>> GMRCIS | ONE+12, ONE+15, ONE+16, ONE+41 |
>> GMRCLINE | CTRL+2*, CTRL+3, CTRL+4 |
>> GMRCLOC | ONE+53*, ONE+54*, ONE+55, ONE+56*, ONE+57, ONE+58*, ONE+59, ONE+60*, CTRL+14, CTRL+17 |
GMRCPT | ONESTAT+9*, ONE+1*, ONE+3, ONE+4, ONE+9, ONE+14, ONE+37, ONE+42, ONE+48, ONE+51 , CTRL+3, CTRL+5, CTRL+6, CTRL+18, GETRDT~, GETRDT+7, GETRDT+8, GETRDT+9, GETRDT+10, GETRDT+11 |
>> GMRCPTN | ONE+19*, ONE+20*, CTRL+14 |
>> GMRCPTSN | ONE+27*, CTRL+14 |
GMRCRDT | ONE+31*, ONE+42*, ONE+43, ONE+45, ONE+46*, CTRL+17, GETRDT+5~, GETRDT+6*, GETRDT+9*, GETRDT+11* , GETRDT+12 |
>> GMRCREMP | ONE+17 |
>> GMRCRF | ONE+18 |
>> GMRCST(1 | ONE+36*, CTRL+20*, CTRL+21*, CTRL+22*, CTRL+23* |
>> GMRCSVC | ONESTAT+5, ONESTAT+6, ONESTAT+8, ONE+1, ONE+4, ONE+34, ONE+35, ONE+36, ONE+61, CTRL+18 , CTRL+20, CTRL+21, CTRL+22, CTRL+23, ADDTOT+2, ADDTOT+4, ADDTOT+6, ADDTOT+9, ADDTOT+10 |
>> GMRCSVCG | ONE+66 |
>> GMRCSVCP | ONE+65 |
>> GMRCXDT | ONESTAT+7*, ONESTAT+8*, ONE+1, ONE+4, ONE+5 |
GMRTST | ONESTAT~, ONE+24, ONE+25 |
>> GROUPER | ADDTOT+8 |
>> GROUPER( | ADDTOT+9, ADDTOT+10 |
>> GRP | ADDTOT+8*, ADDTOT+9, ADDTOT+10 |
>> LINETEMP | ONE+69*, CTRL+4*, CTRL+5*, CTRL+6*, CTRL+14 |
ND | ONE+30~, GETRDT+5~, GETRDT+6*, GETRDT+7*, GETRDT+8, GETRDT+9, GETRDT+10, GETRDT+11 |
>> NUMCLIN | ONE+68* |
RCVDT | ONE+30~, ONE+38, ONE+39 |
>> STATUS | ONESTAT+5, ONESTAT+6, ONESTAT+8, ONE+1, ONE+4, CTRL+8, CTRL+11, ADDTOT+4, ADDTOT+6, ADDTOT+9 , ADDTOT+10 |
>> STS | CTRL+8*, CTRL+9*, CTRL+11*, CTRL+12*, CTRL+14 |
>> TEMP | ONE+65*, ONE+66*, ONE+67 |
U | ONE+55, ONE+56, ONE+57, ONE+58 |
X | ONE+5*, ONE+7, ONE+8, ONE+26*, ONE+27, ONE+40, ONE+44~, ONE+45*, ONE+46 |
>> X1 | ONE+39* |
>> X2 | ONE+39* |