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: GMPLEDT3

Package: Problem List

Routine: GMPLEDT3


Information

GMPLEDT3 ; ISL/MKB,KER,JER -- Problem List edit utilities ;08/17/12 16:49

Source Information

Source file <GMPLEDT3.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 2 EN^DIQ1  ^DIR  
Kernel 1 $$UP^XLFSTR  
Problem List 1 $$EXTDT^GMPLX  

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Problem List 6 GMPL1  GMPLEDIT  GMPLEDT1  GMPLEDT2  GMPLEDT4  GMPLUTL  
Order Entry Results Reporting 1 ORQQPL1  

Entry Points

Name Comments DBIA/ICR reference
CK ; Check whether to Stop Processing
; Called from Exit Action of GMPL EDIT XXX Protocols
MSG() ; List Manager Message Bar
KEYS ; Setup XQORM("KEY") array
; Numbers ref'd also in IN4^-EDIT, NTES^-EDT4
FLDS ; Define GMPFLD("FLD") Array for Editing
GETFLDS(DA) ; Define GMPFLD(#) and GMPORIG(#) Arrays with Current Values
  • ICR #2977
    • Status: Active
    • Usage: Controlled Subscription
    JUMP(XFLD) ; Resolve ^- Jump Out of Field Order in Edit

    External References

    Name Field # of Occurrence
    EN^DIQ1 GETFLDS+3
    ^DIR JUMP+18
    $$EXTDT^GMPLX GETFLDS+9
    $$UP^XLFSTR JUMP+3

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: $C(7)," ^-jumping not allowed now!"
    • Line Location: JUMP+5
    Function Call: WRITE
    • Prompt: $C(7)," ??"
    • Line Location: JUMP+12
    Function Call: WRITE
    • Prompt: $E(PROMPT,$L(XFLD)+1,$L(PROMPT))
    • Line Location: JUMP+13
    Routine Call
    • DIR
    • Line Location:
      • JUMP+18

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^AUPNPROB - [#9000011] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^AUPNPROB - [#9000011] GETFLDS+13, GETFLDS+15, GETFLDS+16, GETFLDS+20, GETFLDS+21, GETFLDS+22, GETFLDS+23
    ^ORD(101 - [#101] KEYS+4, KEYS+5, KEYS+6, KEYS+7, KEYS+8, KEYS+9, KEYS+11, KEYS+12, KEYS+13, KEYS+15
    , KEYS+16, KEYS+17
    ^XUSEC("GMPL ICD CODE" KEYS+3, FLDS+3

    Label References

    Name Line Occurrences
    $$MSG KEYS+18, CK+4

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    CNT GETFLDS+1~, GETFLDS+19*, GETFLDS+23*, GETFLDS+24, GETFLDS+25, GETFLDS+26, JUMP+1~, JUMP+8*, JUMP+11*, JUMP+12
    , JUMP+13, JUMP+15, JUMP+16
    CODE GETFLDS+14~*, GETFLDS+16*, GETFLDS+17
    DA GETFLDS~, GETFLDS+5, GETFLDS+6, GETFLDS+8, GETFLDS+13, GETFLDS+15, GETFLDS+16, GETFLDS+20, GETFLDS+21, GETFLDS+22
    , GETFLDS+23
    DIC GETFLDS+1~, GETFLDS+2*
    DIQ GETFLDS+1~, GETFLDS+2*
    DIQ(0 GETFLDS+2*
    DIR JUMP+1~
    DIR("?" JUMP+17*
    DIR("A" JUMP+15*, JUMP+16*
    DIR(0 JUMP+16*
    DR GETFLDS+1~, GETFLDS+3*
    DTOUT JUMP+1~, JUMP+18, CK+3
    DUOUT JUMP+1~, JUMP+18
    DUZ KEYS+3, FLDS+3
    EXT GETFLDS+1~, GETFLDS+5*, GETFLDS+8*, GETFLDS+9*, GETFLDS+10*, GETFLDS+11*, GETFLDS+12
    FAC GETFLDS+1~, GETFLDS+20*, GETFLDS+21, GETFLDS+22, GETFLDS+23, GETFLDS+24
    >> GMPAGTOR FLDS+8
    >> GMPARAM("VER" KEYS+16
    >> GMPCV FLDS+13
    >> GMPFLD( GETFLDS+18*
    >> GMPFLD("FLD" FLDS+1*, FLDS+2*, FLDS+3*, FLDS+4*, FLDS+5*, FLDS+6*, FLDS+7*, FLDS+8*, FLDS+9*, FLDS+10*
    , FLDS+11*, FLDS+12*, FLDS+13*, FLDS+14*, FLDS+15*, FLDS+16*, FLDS+17*, FLDS+18*, FLDS+19*, FLDS+20*
    , FLDS+21*, JUMP+7, JUMP+9, JUMP+11
    >> GMPFLD(10 KEYS+14, GETFLDS+19*, GETFLDS+25*, GETFLDS+26*
    >> GMPGULF FLDS+10
    >> GMPHNC FLDS+11
    >> GMPION FLDS+9
    GMPL GETFLDS+1~
    GMPL(9000011 GETFLDS+5, GETFLDS+6, GETFLDS+8
    >> GMPLJUMP JUMP+5*, JUMP+7*, JUMP+13*, JUMP+19*
    >> GMPLMGR GETFLDS+22
    >> GMPLUSER KEYS+16
    >> GMPLVIEW("VIEW" FLDS+17, FLDS+18
    >> GMPMST FLDS+12
    >> GMPORIG( GETFLDS+5*, GETFLDS+6*, GETFLDS+7, GETFLDS+9, GETFLDS+12*, GETFLDS+14, GETFLDS+17*, GETFLDS+18
    >> GMPORIG(10 GETFLDS+19*, GETFLDS+23*, GETFLDS+24*, GETFLDS+25, GETFLDS+26*
    GMPQUIT JUMP+4*, CK+2!
    >> GMPREBLD CK+2*
    >> GMPROV GETFLDS+22
    >> GMPSC FLDS+7
    >> GMPSHD FLDS+14
    >> GMPVA KEYS+10
    >> GMPVAMC GETFLDS+20
    I KEYS+2~, KEYS+14*, GETFLDS+1~, GETFLDS+4*, GETFLDS+5, GETFLDS+6, GETFLDS+7, GETFLDS+8, GETFLDS+9, GETFLDS+10
    , GETFLDS+11, GETFLDS+12, GETFLDS+15*, GETFLDS+16, GETFLDS+18*, JUMP+1~, JUMP+15*
    ICD KEYS+2~, KEYS+3*, KEYS+9
    MATCH JUMP+1~
    MATCH( JUMP+11*, JUMP+15, JUMP+19
    MATCH(1 JUMP+13
    NIFN GETFLDS+1~, GETFLDS+21*, GETFLDS+22, GETFLDS+23
    NUM KEYS+2~, KEYS+8*, KEYS+9*, KEYS+11*, KEYS+12*, KEYS+14*, KEYS+15
    PROMPT JUMP+1~, JUMP+8*, JUMP+9*, JUMP+10, JUMP+11, JUMP+13*
    PROTCL KEYS+2~, KEYS+13*, KEYS+14
    U GETFLDS+8, GETFLDS+9, GETFLDS+10, GETFLDS+11, GETFLDS+12, GETFLDS+14, GETFLDS+16, GETFLDS+17, GETFLDS+22, GETFLDS+24
    , JUMP+3, JUMP+11, JUMP+13, JUMP+15
    >> VALMBCK CK+3*, CK+4*
    >> VALMSG KEYS+18*, CK+4*
    X JUMP+1~
    XFLD JUMP~, JUMP+3*, JUMP+4, JUMP+7, JUMP+10, JUMP+13
    >> XQORM("KEY" KEYS+4*, KEYS+5*, KEYS+6*, KEYS+7*, KEYS+8*, KEYS+9*, KEYS+11*, KEYS+12*, KEYS+14*, KEYS+15*
    , KEYS+16*, KEYS+17*
    >> XQORPOP CK+2*
    Y JUMP+1~, JUMP+18, JUMP+19
    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