GMPLSAVE ; ISL/MKB,KER,JER,TC,PWC -- Save Problem List data ; April 09, 2019
Source file <GMPLSAVE.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 4 | (,DD)^%DT (FILE,UPDATE)^DIE (,IX1)^DIK $$GET1^DIQ |
Kernel | 3 | ($$DT,$$FMTE,$$HTFM,$$NOW)^XLFDT EN1^XQOR USERINFO^XUSRB2 |
Lexicon Utility | 2 | ($$GETDES,$$GETSYN)^LEXTRAN1 $$IMPDATE^LEXU |
MailMan | 2 | KILL^XM ^XMB |
Problem List | 2 | ($$EXTDT,$$NOS,$$PROVNARR,AUDIT,DTMOD)^GMPLX $$WRAP^GMPLX1 |
DRG Grouper | 1 | ($$CODEC,$$CODECS,$$CS,$$CSI,$$SAB)^ICDEX |
Registration | 1 | $$SITE^VASITE |
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 |
---|---|---|
Problem List | 5 | GMPL EDIT SAVE GMPL1 GMPLEDIT GMPLUTL GMPLUTL2 |
Order Entry Results Reporting | 2 | ORQQPL1 ORQQPL2 |
Enterprise Health Management Platform | 1 | HMPWBPL |
Kernel | 1 | ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Save Changes made to Existing Problem
|
|
NOTES | ; Save Changes to Notes
|
|
EXIT | ; Quit Saving Changes
|
|
REFORM | ; Audit Entry that has been Reformulated
|
|
REACTV | ; Audit Entry that has been Reactivated
|
|
NEW | ; Save Collected Values in new Problem Entry
; Output DA (left defined) |
|
NEWPROB(ICD,DFN) | ; Creates New Problem Entry in file #9000011
|
|
NEWNOTE | ; Creates New Note Entries for Problem
; Requires GMPIFN Pointer to Problem ; GMPROV Current Provider ; GMPVAMC Facility |
|
NN1 | ; Get New Note
|
|
NNQ | ; Quit Getting New Notes
|
|
NEXTNMBR(DFN,VAMC) | ; Returns Next Available Problem Number
|
|
NTRTBULL(GMPY,GMPTERM,GMPSCT,GMPSRCH) | ; Send NTRT Request bulletin to NTRT mailgroup
|
|
COEXPRS(GMPDA,GMPICD) | ; File multiple ICDs
|
|
SPRCICD(GMPICD) | ; Is ICD string sparce (i.e., called from SDS API w/order > 2)?
|
Name | Field # of Occurrence |
---|---|
^%DT | NOTES+3 |
DD^%DT | COEXPRS+20 |
FILE^DIE | EN+52, COEXPRS+12 |
UPDATE^DIE | COEXPRS+24 |
^DIK | NOTES+15 |
IX1^DIK | NEW+64 |
$$GET1^DIQ | NTRTBULL+12 |
$$EXTDT^GMPLX | EN+8, NEW+11 |
$$NOS^GMPLX | EN+3, EN+4, EN+7, EN+26, EN+45, EN+55, NEW+7, NEW+8, NEW+50, NEW+67 , COEXPRS+16, SPRCICD+2 |
$$PROVNARR^GMPLX | EN+35, NEW+15 |
AUDIT^GMPLX | EN+41, EN+51, NOTES+12, REFORM+3, REACTV+3, COEXPRS+34, COEXPRS+40 |
DTMOD^GMPLX | EXIT+1 |
$$WRAP^GMPLX1 | NTRTBULL+9 |
$$CODEC^ICDEX | NEW+9 |
$$CODECS^ICDEX | EN+9, NEW+12, COEXPRS+3 |
$$CS^ICDEX | NEW+5 |
$$CSI^ICDEX | EN+9, NEW+5 |
$$SAB^ICDEX | EN+9, NEW+6, COEXPRS+3 |
$$GETDES^LEXTRAN1 | EN+33, NEW+38 |
$$GETSYN^LEXTRAN1 | EN+18, NEW+24 |
$$IMPDATE^LEXU | EN+2, NEW+3 |
$$SITE^VASITE | NTRTBULL+1 |
$$DT^XLFDT | NEW+16 |
$$FMTE^XLFDT | NTRTBULL+13 |
$$HTFM^XLFDT | EN+36 |
$$NOW^XLFDT | EN+2, NEW+3, NTRTBULL+13, COEXPRS+1 |
KILL^XM | NTRTBULL+17 |
^XMB | NTRTBULL+17 |
EN1^XQOR | NEW+70 |
USERINFO^XUSRB2 | NTRTBULL+5 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^AUPNPROB - [#9000011] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNPROB - [#9000011] | NOTES+4, NOTES+5*, NOTES+7*, NOTES+8*, REFORM+2, REACTV+2, NEW+43, NEW+44*, NEW+47*, NEW+52* , NEW+56*, NEW+60*, NEWPROB+7, NEWPROB+8*, NEWNOTE+5, NEWNOTE+6, NEWNOTE+7, NEWNOTE+8, NEWNOTE+9, NEWNOTE+10* , NEWNOTE+11*, NN1+1, NN1+2, NN1+3, NN1+6*, NN1+7*, NN1+9*, NNQ+1, COEXPRS+5, COEXPRS+7 , COEXPRS+18, COEXPRS+30, COEXPRS+37, COEXPRS+38 |
^AUPNPROB("AA" | NEXTNMBR+1, NEXTNMBR+2 |
^AUPNPROB("AC" | NEWPROB+9* |
^AUPNPROB("B" | NEWPROB+9* |
^AUPNPROB(0 | NEWPROB+2, NEWPROB+5, NEWPROB+10* |
^ORD(101 - [#101] | NEW+70 |
^VA(200 - [#200] | NTRTBULL+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | EN+1~, NOTES+3* |
APCDALVR | NEW+2~, NEW+64* |
APCDLOOK | NEW+2~, NEW+64* |
AUDITED | EN+1~, EN+36*, EN+42*, EN+43*, EN+50 |
CHANGE | COEXPRS+29~, COEXPRS+32*, COEXPRS+33*, COEXPRS+34, COEXPRS+38~, COEXPRS+39*, COEXPRS+40 |
CHNGE | EN+1~, EN+40*, EN+41, EN+50*, EN+51, NOTES+9*, NOTES+11*, NOTES+12, REFORM+1*, REFORM+3 , REACTV+1*, REACTV+3 |
CODSYS | COEXPRS+1~, COEXPRS+3*, COEXPRS+16, COEXPRS+22 |
CSAB | NEW+2~, NEW+6*, NEW+7, NEW+8, NEW+12 |
CSDT | NEW+2~, NEW+4*, NEW+5, NEW+6, NEW+7, NEW+8, NEW+11, NEW+12 |
CSID | NEW+2~, NEW+5*, NEW+6 |
DA | EN+1~, NOTES+15*, NEW+40*, NEW+43, NEW+44, NEW+47, NEW+52, NEW+56, NEW+60, NEW+62 , NEW+65, NEW+69, NEWPROB+1~, NEWPROB+8*, NEWPROB+9, NEWPROB+10, NEWPROB+11 |
DA(1 | NOTES+15* |
DA(2 | NOTES+15* |
DATA | NEW+2~, NEW+43*, NEW+44, NEW+46*, NEW+47, NEW+51*, NEW+52, NEW+55*, NEW+56, NEW+59* , NEW+60 |
DFN | NEW+69~*, NEWPROB~, NEWPROB+8, NEWPROB+9, NEXTNMBR~, NEXTNMBR+1, NEXTNMBR+2 |
DIE | EN+1~ |
DIK | EN+1~, NOTES+14*, NEW+2~, NEW+64* |
DR | EN+1~ |
DT | EN+8, EN+9, EN+18, NEW+4, NEW+24, NEW+43, NN1+6, COEXPRS+3, COEXPRS+20 |
DUZ | EN+40, EN+50, NOTES+9, NOTES+11, REFORM+1, REACTV+1, NTRTBULL+3, NTRTBULL+12, COEXPRS+32, COEXPRS+33 , COEXPRS+39 |
FAC | EN+1~, NOTES+2*, NOTES+4, NOTES+5, NOTES+7, NOTES+8, NOTES+14, NOTES+15, NEWNOTE+4~, NEWNOTE+6* , NEWNOTE+11*, NEWNOTE+12, NN1+1, NN1+2, NN1+3, NN1+6, NN1+7, NN1+9 |
FLD | EN+1~, EN+46*, EN+47, EN+49, EN+50 |
GMPBULL | EN+1~, EN+55, NEW+67 |
GMPC | COEXPRS+1~ |
GMPCODE | COEXPRS+16~, COEXPRS+17*, COEXPRS+19, COEXPRS+21 |
GMPD30 | COEXPRS+16~, COEXPRS+18*, COEXPRS+19 |
GMPDA | COEXPRS~, COEXPRS+5, COEXPRS+7, COEXPRS+11, COEXPRS+18, COEXPRS+21, COEXPRS+22, COEXPRS+23, COEXPRS+30, COEXPRS+32 , COEXPRS+33, COEXPRS+37, COEXPRS+38, COEXPRS+39 |
>> GMPDFN | NEW+40, NEW+41, NEW+69 |
GMPDT | COEXPRS+16~, COEXPRS+20*, COEXPRS+23 |
GMPFDA | COEXPRS+16~ |
GMPFDA( | COEXPRS+21*, COEXPRS+22*, COEXPRS+23* |
>> GMPFLD( | EN+4*, EN+5, EN+6*, EN+7*, EN+9, EN+11*, EN+12, EN+15, EN+26, EN+27 , EN+29, EN+35*, EN+38, EN+39, EN+42, EN+43, EN+44*, EN+45, EN+47, EN+49 , EN+50, EN+55, REFORM+1, NEW+5, NEW+7*, NEW+8*, NEW+9, NEW+13*, NEW+14*, NEW+15* , NEW+16*, NEW+17, NEW+20, NEW+32, NEW+34, NEW+40, NEW+43, NEW+46, NEW+50, NEW+67 |
>> GMPFLD(10 | NOTES+1, NOTES+2, NOTES+8, NOTES+16, NEW+65, NN1+5, NN1+6 |
>> GMPFLD(80001 | EN+17*, EN+55, NEW+23*, NEW+49, NEW+51, NEW+67 |
>> GMPFLD(80002 | EN+25*, NEW+31*, NEW+51 |
>> GMPFLD(80003 | EN+32*, NEW+37*, NEW+49, NEW+51 |
>> GMPFLD(80004 | EN+34*, NEW+39*, NEW+49, NEW+51 |
>> GMPFLD(80005 | EN+26*, EN+45*, NEW+49, NEW+50*, NEW+51 |
>> GMPFLD(80101 | NEW+54, NEW+55 |
>> GMPFLD(80102 | NEW+54, NEW+55 |
>> GMPFLD(80201 | EN+3, EN+4, EN+7, EN+8*, EN+26, EN+45, EN+55, NEW+4, NEW+11*, NEW+50 , NEW+58, NEW+59, NEW+67 |
>> GMPFLD(80202 | EN+3, EN+4, EN+7, EN+9*, EN+26, EN+45, EN+55, NEW+6, NEW+12*, NEW+50 , NEW+58, NEW+59, NEW+67 |
GMPI | COEXPRS+1~, COEXPRS+15*, COEXPRS+17, COEXPRS+18, COEXPRS+28*, COEXPRS+30, COEXPRS+36*, COEXPRS+37*, COEXPRS+38, SPRCICD+1~ , SPRCICD+2* |
GMPICD | EN+1~, EN+5*, EN+9, EN+54, EN+55, NEW+2~, NEW+9*, NEW+10*, NEW+12, NEW+62 , NEW+67, COEXPRS~, COEXPRS+3, COEXPRS+8, COEXPRS+14, COEXPRS+17, SPRCICD~, SPRCICD+2 |
GMPIFN | EN+38, EN+40, EN+49, EN+50, EN+54, NOTES+4, NOTES+5, NOTES+7, NOTES+8, NOTES+9 , NOTES+11, NOTES+14, NOTES+15, EXIT+1, REFORM+1, REFORM+2, REACTV+1, REACTV+2, NEW+2~, NEW+65* , NEW+69*, NEWNOTE+5, NEWNOTE+6, NEWNOTE+7, NEWNOTE+8, NEWNOTE+9, NEWNOTE+10, NEWNOTE+11, NN1+1, NN1+2 , NN1+3, NN1+6, NN1+7, NN1+9, NNQ+1 |
GMPIMPDT | EN+1~, EN+2*, EN+55, NEW+2~, NEW+3* |
GMPJ | COEXPRS+1~, COEXPRS+10*, COEXPRS+11 |
GMPLERR | EN+38~ |
GMPLFDA | EN+38~, COEXPRS+9~ |
GMPLFDA( | COEXPRS+11* |
GMPLFDA(9000011 | EN+38*, EN+49* |
>> GMPLUSER | EN+38 |
GMPN | COEXPRS+1~, COEXPRS+14*, COEXPRS+15 |
GMPNCNT | COEXPRS+1~, COEXPRS+7*, COEXPRS+10, COEXPRS+35 |
GMPNOS | COEXPRS+16~*, COEXPRS+19 |
GMPNOW | EN+1~, EN+2*, EN+55, NEW+2~, NEW+3* |
GMPNUM | EN+13~, EN+14*, EN+21*, EN+22, NEW+18~, NEW+19*, NEW+27*, NEW+28 |
GMPOCNT | COEXPRS+1~, COEXPRS+26*, COEXPRS+35, COEXPRS+36 |
GMPORIG | COEXPRS+1~, COEXPRS+5*, COEXPRS+25 |
GMPORIG( | EN+3*, EN+10*, EN+39, EN+42, EN+43, EN+47, EN+50, REFORM+1, COEXPRS+28, COEXPRS+30 |
GMPORIG(0 | COEXPRS+26 |
GMPORIG(10 | NOTES+1, NOTES+2, NOTES+7, NOTES+8 |
GMPQT | EN+13~, EN+14*, EN+20, EN+21, EN+22*, EN+23, EN+24*, NEW+18~, NEW+19*, NEW+26 , NEW+27, NEW+28*, NEW+29, NEW+30* |
>> GMPROV | EN+45, EN+50, NOTES+9, NOTES+11, REFORM+1, REACTV+1, NN1+6, COEXPRS+32, COEXPRS+33, COEXPRS+39 |
>> GMPSAVED | EN+53*, EXIT+1, NEW+41* |
GMPSCT | NTRTBULL~, NTRTBULL+4*, NTRTBULL+11 |
GMPSITE | NTRTBULL+1~*, NTRTBULL+15 |
GMPSRCH | EN+55, NEW+67, NTRTBULL~, NTRTBULL+16 |
GMPSVC | NTRTBULL+1~, NTRTBULL+5*, NTRTBULL+14 |
GMPSYN | EN+13~, EN+25!, NEW+18~, NEW+31! |
GMPSYN( | EN+20, EN+21, EN+22, EN+24, NEW+26, NEW+27, NEW+28, NEW+30 |
GMPTERM | NTRTBULL~, NTRTBULL+2, NTRTBULL+9, NTRTBULL+10 |
GMPTYP | EN+13~, EN+14*, EN+20*, EN+21, EN+22, EN+24, NEW+18~, NEW+19*, NEW+26*, NEW+27 , NEW+28, NEW+30 |
GMPUSER | NTRTBULL+1~, NTRTBULL+5 |
GMPUSER(5 | NTRTBULL+5 |
>> GMPVAMC | NEW+41, NEW+43, NEWNOTE+6, NEWNOTE+10 |
GMPWRAP | NTRTBULL+1~, NTRTBULL+9* |
GMPY | NTRTBULL~, NTRTBULL+2*, NTRTBULL+3*, NTRTBULL+17*, SPRCICD+1~*, SPRCICD+2*, SPRCICD+3 |
HDR | NEWPROB+1~, NEWPROB+5*, NEWPROB+6, NEWNOTE+4~, NEWNOTE+8*, NN1+2* |
I | EN+1~, EN+35*, NOTES+1*, NOTES+2, NOTES+7, NOTES+8, NEW+2~, NEW+46*, NEWPROB+1~, NEWPROB+7* , NEWPROB+8, NEWNOTE+4~, NEWNOTE+9*, NEWNOTE+10, NEWNOTE+11, NN1+3*, NN1+4, NN1+5*, NN1+6, NEXTNMBR+1~* , NEXTNMBR+2* |
ICD | NEWPROB~, NEWPROB+8, NEWPROB+9 |
J | NEXTNMBR+1~, NEXTNMBR+2* |
LAST | NEWPROB+1~, NEWPROB+6*, NEWPROB+7, NEWNOTE+4~, NEWNOTE+8*, NEWNOTE+9, NN1+2*, NN1+3, NN1+8*, NN1+9 |
NEW0 | COEXPRS+29~, COEXPRS+30*, COEXPRS+31, COEXPRS+32, COEXPRS+38~*, COEXPRS+39 |
NEWNTDT | EN+1~, NOTES+2*, NOTES+3*, NOTES+7 |
NIFN | EN+1~, NOTES+2*, NOTES+4, NOTES+5, NOTES+7, NOTES+8, NOTES+15, NEWNOTE+4~, NN1+4*, NN1+6 , NN1+7, NN1+8* |
NODE | EN+1~, NOTES+4*, NOTES+12, REFORM+2*, REFORM+3, REACTV+2*, REACTV+3 |
NOW | EN+1~, EN+36*, EN+40, EN+50, NOTES+9, NOTES+11, REFORM+1, REACTV+1, COEXPRS+1~*, COEXPRS+32 , COEXPRS+33, COEXPRS+39 |
NUM | NEW+2~, NEW+41*, NEW+43, NEXTNMBR+1~*, NEXTNMBR+2*, NEXTNMBR+3*, NEXTNMBR+4 |
OLD0 | COEXPRS+29~, COEXPRS+30*, COEXPRS+31, COEXPRS+32, COEXPRS+33, COEXPRS+34 |
OLDTEXT | EN+1~, NOTES+2*, NOTES+6, NOTES+10 |
SCTC | EN+13~, EN+17*, EN+18, NEW+18~, NEW+22*, NEW+23, NEW+24 |
SCTD | EN+13~, EN+18*, EN+19*, EN+22*, EN+24*, EN+25, NEW+18~, NEW+24*, NEW+25*, NEW+28* , NEW+30*, NEW+31 |
SCTS | EN+13~, EN+15*, EN+16, EN+17, NEW+18~, NEW+20*, NEW+21, NEW+22 |
SCTT | EN+13~, EN+16*, EN+22, EN+24, NEW+18~, NEW+21*, NEW+28, NEW+30 |
TEXT | EN+1~, NOTES+2*, NOTES+5, NOTES+6, NOTES+10, NOTES+11, NOTES+13 |
TOTAL | NEWPROB+1~, NEWPROB+6*, NEWPROB+10, NEWNOTE+4~, NEWNOTE+8*, NEWNOTE+11, NN1+2*, NN1+8*, NN1+9 |
U | EN+3, EN+4, EN+5, EN+7, EN+8, EN+9, EN+16, EN+17, EN+19, EN+22 , EN+24, EN+25, EN+26, EN+30, EN+32, EN+34, EN+35, EN+40, EN+42, EN+45 , EN+47, EN+49, EN+50, EN+55, NOTES+2, NOTES+5, NOTES+7, NOTES+8, NOTES+9, NOTES+11 , REFORM+1, REFORM+2, REACTV+1, REACTV+2, NEW+4, NEW+6, NEW+8, NEW+9, NEW+11, NEW+12 , NEW+15, NEW+21, NEW+23, NEW+25, NEW+28, NEW+30, NEW+31, NEW+35, NEW+37, NEW+39 , NEW+43, NEW+46, NEW+49, NEW+50, NEW+51, NEW+54, NEW+55, NEW+58, NEW+59, NEW+67 , NEWPROB+6, NEWPROB+8, NEWPROB+10, NEWNOTE+8, NEWNOTE+11, NN1+2, NN1+6, NN1+9, NTRTBULL+15, COEXPRS+7 , COEXPRS+19, COEXPRS+26, COEXPRS+31, COEXPRS+32, COEXPRS+33, COEXPRS+39, SPRCICD+2 |
VAMC | NEXTNMBR~, NEXTNMBR+1, NEXTNMBR+2 |
VHATC | EN+28~, EN+31*, EN+32, NEW+33~, NEW+36*, NEW+37 |
VHATD | EN+28~, EN+33*, EN+34*, NEW+33~, NEW+38*, NEW+39* |
VHATS | EN+28~, EN+29*, EN+30, EN+31, NEW+33~, NEW+34*, NEW+35, NEW+36 |
VHATT | EN+28~, EN+30*, EN+33, NEW+33~, NEW+35*, NEW+38 |
X | EN+1~, NOTES+3*, NEW+2~, NEW+15*, NEW+70* |
XMB | NTRTBULL+1~, NTRTBULL+6* |
XMB(1 | NTRTBULL+10* |
XMB(2 | NTRTBULL+11* |
XMB(3 | NTRTBULL+12* |
XMB(4 | NTRTBULL+13* |
XMB(5 | NTRTBULL+14* |
XMB(6 | NTRTBULL+15* |
XMB(7 | NTRTBULL+16* |
XMBNM | NTRTBULL+1~ |
XMDUZ | NTRTBULL+1~, NTRTBULL+7* |
XMY | NTRTBULL+1~ |
XMY("G.PROBLE | M LIST NTRT@domain.ext" , NTRTBULL+8* |
XMZ | NTRTBULL+1~ |
Y | NOTES+3, COEXPRS+16~, COEXPRS+20* |