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

Package: Problem List

Routine: GMPLSAVE


Information

GMPLSAVE ; ISL/MKB,KER,JER -- Save Problem List data ;08/02/12 08:47

Source Information

Source file <GMPLSAVE.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Kernel 3 ($$DT,$$FMTE,$$HTFM,$$NOW)^XLFDT  EN1^XQOR  USERINFO^XUSRB2  
VA Fileman 3 ^DIE  (,IX1)^DIK  $$GET1^DIQ  
MailMan 2 KILL^XM  ^XMB  
Problem List 2 ($$NOS,$$PROVNARR,AUDIT,DTMOD)^GMPLX  $$WRAP^GMPLX1  
Lexicon Utility 1 $$GETDES^LEXTRAN1  
Registration 1 $$SITE^VASITE  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Problem List 4 GMPL1  GMPLEDIT  GMPLUTL  GMPLUTL2  
Order Entry Results Reporting 2 ORQQPL1  ORQQPL2  

Entry Points

Name Comments DBIA/ICR reference
SPRCICD(GMPICD) ; Is ICD string sparce (i.e., called from SDS API w/order > 2)?
EN ; Save Changes made to Existing Problem
  • ICR #2978
    • Status: Active
    • Usage: Controlled Subscription
    NTRTBULL(GMPY,GMPTERM,GMPSCT,GMPSRCH) ; Send NTRT Request bulletin to NTRT mailgroup
    REFORM ; Audit Entry that has been Reformulated
    NEWNOTE ; Creates New Note Entries for Problem
    ; Requires GMPIFN Pointer to Problem
    ; GMPROV Current Provider
    ; GMPVAMC Facility
  • ICR #2978
    • Status: Active
    • Usage: Controlled Subscription
    NOTES ; Save Changes to Notes
    REACTV ; Audit Entry that has been Reactivated
    COEXPRS(GMPDA,GMPICD) ; File multiple ICDs
    EXIT ; Quit Saving Changes
    NNQ ; Quit Getting New Notes
    NEXTNMBR(DFN,VAMC) ; Returns Next Available Problem Number
    NEW ; Save Collected Values in new Problem Entry
    ; Output DA (left defined)
  • ICR #2978
    • Status: Active
    • Usage: Controlled Subscription
    NEWPROB(ICD,DFN) ; Creates New Problem Entry in file #9000011
    NN1 ; Get New Note

    External References

    Name Field # of Occurrence
    ^DIE EN+40
    ^DIK NOTES+12
    IX1^DIK NEW+46
    $$GET1^DIQ NTRTBULL+12
    $$NOS^GMPLX EN+2, EN+3, EN+6, EN+16, EN+34, EN+42, NEW+3, NEW+4, NEW+36, NEW+48
    , COEXPRS+11, SPRCICD+2
    $$PROVNARR^GMPLX EN+25, NEW+8
    AUDIT^GMPLX EN+30, EN+39, NOTES+9, REFORM+3, REACTV+3, COEXPRS+26, COEXPRS+32
    DTMOD^GMPLX EXIT+1
    $$WRAP^GMPLX1 NTRTBULL+9
    $$GETDES^LEXTRAN1 EN+14, EN+23, NEW+16, NEW+24
    $$SITE^VASITE NTRTBULL+1
    $$DT^XLFDT NEW+9
    $$FMTE^XLFDT NTRTBULL+13
    $$HTFM^XLFDT EN+26
    $$NOW^XLFDT NTRTBULL+13, COEXPRS+1
    KILL^XM NTRTBULL+17
    ^XMB NTRTBULL+17
    EN1^XQOR NEW+51
    USERINFO^XUSRB2 NTRTBULL+5

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,"Someone else is currently editing this file."
    • Line Location: NEWPROB+3
    Function Call: WRITE
    • Prompt: !,"Please try again later.",!
    • Line Location: NEWPROB+4
    Routine Call
    • DIE
    • Line Location:
      • EN+40

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^VA(200 - [#200] GET1^DIQ
    ^AUPNPROB - [#9000011] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^AUPNPROB - [#9000011] NOTES+3, NOTES+4*, REFORM+2, REACTV+2, NEW+29, NEW+30*, NEW+33*, NEW+38*, NEW+42*, 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+13, COEXPRS+15*, COEXPRS+16*
    , COEXPRS+18, COEXPRS+22, COEXPRS+29, COEXPRS+30
    ^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+51
    ^VA(200 - [#200] NTRTBULL+3

    Label References

    Name Line Occurrences
    $$NEWPROB NEW+26
    $$NEXTNMBR NEW+27
    $$SPRCICD COEXPRS+7
    COEXPRS EN+41, NEW+44
    NEWNOTE NOTES+13, NEW+47
    NNQ NEWNOTE+12
    NTRTBULL EN+42, NEW+48
    REACTV EN+31
    REFORM EN+32

    Naked Globals

    Name Field # of Occurrence
    ^(0 NEWNOTE+7*, NN1+1*

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    APCDALVR NEW+2~, NEW+46*
    APCDLOOK NEW+2~, NEW+46*
    AUDITED EN+1~, EN+26*, EN+31*, EN+32*, EN+38
    CHANGE COEXPRS+21~, COEXPRS+24*, COEXPRS+25*, COEXPRS+26, COEXPRS+30~, COEXPRS+31*, COEXPRS+32
    CHNGE EN+1~, EN+29*, EN+30, EN+38*, EN+39, NOTES+6*, NOTES+8*, NOTES+9, REFORM+1*, REFORM+3
    , REACTV+1*, REACTV+3
    CODSYS COEXPRS+1~, COEXPRS+3*, COEXPRS+15
    DA EN+1~, EN+40*, NOTES+12*, NEW+26*, NEW+29, NEW+30, NEW+33, NEW+38, NEW+42, NEW+44
    , NEW+47, NEW+50, NEWPROB+1~, NEWPROB+8*, NEWPROB+9, NEWPROB+10, NEWPROB+11
    DA(1 NOTES+12*
    DA(2 NOTES+12*
    DATA NEW+2~, NEW+29*, NEW+30, NEW+32*, NEW+33, NEW+37*, NEW+38, NEW+41*, NEW+42
    DFN NEW+50~*, NEWPROB~, NEWPROB+8, NEWPROB+9, NEXTNMBR~, NEXTNMBR+1, NEXTNMBR+2
    DIE EN+1~, EN+40*
    DIK EN+1~, NOTES+11*, NEW+2~, NEW+46*
    DR EN+1~, EN+27*, EN+37*
    DT NEW+29, NN1+6, COEXPRS+15
    DUZ EN+29, EN+38, NOTES+6, NOTES+8, REFORM+1, REACTV+1, NTRTBULL+3, NTRTBULL+12, COEXPRS+24, COEXPRS+25
    , COEXPRS+31
    FAC EN+1~, NOTES+2*, NOTES+3, NOTES+4, NOTES+11, NOTES+12, NEWNOTE+4~, NEWNOTE+6*, NEWNOTE+11*, NEWNOTE+12
    , NN1+1, NN1+2, NN1+3, NN1+6, NN1+7, NN1+9
    FLD EN+1~, EN+35*, EN+36, EN+37, EN+38
    GMPBULL EN+1~, EN+42, NEW+48
    GMPC COEXPRS+1~, COEXPRS+9*, COEXPRS+12*, COEXPRS+16
    GMPCODE COEXPRS+11~, COEXPRS+12*, COEXPRS+14, COEXPRS+15
    GMPD30 COEXPRS+11~, COEXPRS+13*, COEXPRS+14
    GMPDA COEXPRS~, COEXPRS+5, COEXPRS+7, COEXPRS+13, COEXPRS+15, COEXPRS+16, COEXPRS+18, COEXPRS+22, COEXPRS+24, COEXPRS+25
    , COEXPRS+29, COEXPRS+30, COEXPRS+31
    GMPDA1 COEXPRS+11~, COEXPRS+12*, COEXPRS+13, COEXPRS+15, COEXPRS+16
    >> GMPDFN NEW+26, NEW+27, NEW+50
    >> GMPFLD( EN+3*, EN+4, EN+5*, EN+6*, EN+8*, EN+9, EN+11, EN+16, EN+17, EN+19
    , EN+25*, EN+27, EN+28, EN+31, EN+32, EN+33*, EN+34, EN+36, EN+37, EN+38
    , EN+42, REFORM+1, NEW+3*, NEW+4*, NEW+5, NEW+6*, NEW+7*, NEW+8*, NEW+9*, NEW+10
    , NEW+12, NEW+18, NEW+20, NEW+26, NEW+29, NEW+32, NEW+36, NEW+48
    >> GMPFLD(10 NOTES+1, NOTES+2, NOTES+13, NEW+47, NN1+5, NN1+6
    >> GMPFLD(80001 EN+13*, EN+42, NEW+15*, NEW+35, NEW+37, NEW+48
    >> GMPFLD(80002 EN+15*, NEW+17*, NEW+37
    >> GMPFLD(80003 EN+22*, NEW+23*, NEW+35, NEW+37
    >> GMPFLD(80004 EN+24*, NEW+25*, NEW+35, NEW+37
    >> GMPFLD(80005 EN+16*, EN+34*, NEW+35, NEW+36*, NEW+37
    >> GMPFLD(80101 NEW+40, NEW+41
    >> GMPFLD(80102 NEW+40, NEW+41
    GMPI COEXPRS+1~, COEXPRS+10*, COEXPRS+12, COEXPRS+20*, COEXPRS+22, COEXPRS+28*, COEXPRS+29*, COEXPRS+30, SPRCICD+1~, SPRCICD+2*
    GMPICD EN+1~, EN+4*, EN+41, EN+42, NEW+2~, NEW+5*, NEW+44, NEW+48, COEXPRS~, COEXPRS+7
    , COEXPRS+9, COEXPRS+12, SPRCICD~, SPRCICD+2
    GMPIFN EN+29, EN+38, EN+40, EN+41, NOTES+3, NOTES+4, NOTES+6, NOTES+8, NOTES+11, NOTES+12
    , EXIT+1, REFORM+1, REFORM+2, REACTV+1, REACTV+2, NEW+2~, NEW+47*, NEW+50*, 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
    >> GMPLUSER EN+27
    GMPN COEXPRS+1~, COEXPRS+9*, COEXPRS+10
    GMPNCNT COEXPRS+1~, COEXPRS+18*, COEXPRS+27
    GMPNOS COEXPRS+11~*, COEXPRS+14
    GMPOCNT COEXPRS+1~, COEXPRS+18*, COEXPRS+27, COEXPRS+28
    GMPORIG COEXPRS+1~, COEXPRS+5*, COEXPRS+17
    GMPORIG( EN+2*, EN+7*, EN+28, EN+31, EN+32, EN+36, EN+38, REFORM+1, COEXPRS+20, COEXPRS+22
    GMPORIG(0 COEXPRS+18
    GMPORIG(10 NOTES+1, NOTES+2
    >> GMPROV EN+34, EN+38, NOTES+6, NOTES+8, REFORM+1, REACTV+1, NN1+6, COEXPRS+24, COEXPRS+25, COEXPRS+31
    >> GMPSAVED EN+40*, EXIT+1, NEW+27*
    GMPSCT NTRTBULL~, NTRTBULL+4*, NTRTBULL+11
    GMPSITE NTRTBULL+1~*, NTRTBULL+15
    GMPSRCH EN+42, NEW+48, NTRTBULL~, NTRTBULL+16
    GMPSVC NTRTBULL+1~, NTRTBULL+5*, NTRTBULL+14
    GMPTERM NTRTBULL~, NTRTBULL+2, NTRTBULL+9, NTRTBULL+10
    GMPUSER NTRTBULL+1~, NTRTBULL+5
    GMPUSER(5 NTRTBULL+5
    >> GMPVAMC NEW+27, NEW+29, 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+25*, NOTES+1*, NOTES+2, NEW+2~, NEW+32*, 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+21~, COEXPRS+22*, COEXPRS+23, COEXPRS+24, COEXPRS+30~*, COEXPRS+31
    NIFN EN+1~, NOTES+2*, NOTES+3, NOTES+4, NOTES+12, NEWNOTE+4~, NN1+4*, NN1+6, NN1+7, NN1+8*
    NODE EN+1~, NOTES+3*, NOTES+9, REFORM+2*, REFORM+3, REACTV+2*, REACTV+3
    NOW EN+1~, EN+26*, EN+29, EN+38, NOTES+6, NOTES+8, REFORM+1, REACTV+1, COEXPRS+1~*, COEXPRS+24
    , COEXPRS+25, COEXPRS+31
    NUM NEW+2~, NEW+27*, NEW+29, NEXTNMBR+1~*, NEXTNMBR+2*, NEXTNMBR+3*, NEXTNMBR+4
    OLD0 COEXPRS+21~, COEXPRS+22*, COEXPRS+23, COEXPRS+24, COEXPRS+25, COEXPRS+26
    OLDTEXT EN+1~, NOTES+2*, NOTES+5, NOTES+7
    SCTC EN+10~, EN+13*, NEW+11~, NEW+14*, NEW+15
    SCTD EN+10~, EN+14*, EN+15*, NEW+11~, NEW+16*, NEW+17*
    SCTS EN+10~, EN+11*, EN+12, EN+13, NEW+11~, NEW+12*, NEW+13, NEW+14
    SCTT EN+10~, EN+12*, EN+14, NEW+11~, NEW+13*, NEW+16
    TEXT EN+1~, NOTES+2*, NOTES+4, NOTES+5, NOTES+7, NOTES+8, NOTES+10
    TOTAL NEWPROB+1~, NEWPROB+6*, NEWPROB+10, NEWNOTE+4~, NEWNOTE+8*, NEWNOTE+11, NN1+2*, NN1+8*, NN1+9
    U EN+4, EN+6, EN+12, EN+13, EN+15, EN+20, EN+22, EN+24, EN+25, EN+29
    , EN+31, EN+36, EN+37, EN+38, EN+42, NOTES+2, NOTES+4, NOTES+6, NOTES+8, REFORM+1
    , REFORM+2, REACTV+1, REACTV+2, NEW+4, NEW+5, NEW+8, NEW+13, NEW+15, NEW+17, NEW+21
    , NEW+23, NEW+25, NEW+29, NEW+32, NEW+35, NEW+36, NEW+37, NEW+40, NEW+41, NEW+48
    , NEWPROB+6, NEWPROB+8, NEWPROB+10, NEWNOTE+8, NEWNOTE+11, NN1+2, NN1+6, NN1+9, NTRTBULL+15, COEXPRS+14
    , COEXPRS+15, COEXPRS+16, COEXPRS+18, COEXPRS+23, COEXPRS+24, COEXPRS+25, COEXPRS+31, SPRCICD+2
    VAMC NEXTNMBR~, NEXTNMBR+1, NEXTNMBR+2
    VHATC EN+18~, EN+21*, EN+22, NEW+19~, NEW+22*, NEW+23
    VHATD EN+18~, EN+23*, EN+24*, NEW+19~, NEW+24*, NEW+25*
    VHATS EN+18~, EN+19*, EN+20, EN+21, NEW+19~, NEW+20*, NEW+21, NEW+22
    VHATT EN+18~, EN+20*, EN+23, NEW+19~, NEW+21*, NEW+24
    X NEW+2~, NEW+8*, NEW+51*
    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@forum.domain.ext" , NTRTBULL+8*
    XMZ NTRTBULL+1~
    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 |  Naked Globals |  Local Variables |  All