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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DDSVAL

Package: VA Fileman

Routine: DDSVAL


Information

DDSVAL ;SFISC/MKO-GET,PUT FOR DD IELDS ;9:38 AM 29 Aug 1995

Source Information

Source file <DDSVAL.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 9 GL^DDS10  (RPB,RPF)^DDS7  RPCF^DDSCOMP  ($$AFTQ,$$FIND,$$UQT)^DDSLIB  ($$REL,ERR,GETWP,MULT)^DDSVALM  BLD^DIALOG  (FILE,VAL)^DIE  AUXVAL^DIEV  
$$EXTERNAL^DILFD  

Caller Graph

Caller Graph Total: 49

Package Total Caller Graph
Pharmacy Point of Sale 11 ABSPOSI1  ABSPOSI2  ABSPOSI7  ABSPOSI8  ABSPOSIB  ABSPOSID  ABSPOSIH  ABSPOSII  
ABSPOSIO  ABSPOSIP  ABSPOSQP  
VA Fileman 10 DDGFU  DDSCAP  DDSVALM  DDXP1  DIKCDD  DIKCFORM  DIKCU1  DIKKDD  
DIKKFORM  DIU20  
Clinical Reminders 4 PXRMOCR  PXRMSMAN  PXRMTXDL  PXRMTXSM  
Kernel 4 XPDET  XQOPED  XUA4A72  XUSER2  
Mental Health Social Services 4 AMHLEPOV  AMHUTIL  AMHUTIL1  AMHUTIL3  
Supply 4 ASU4XUPD  ASUJCLER  ASUJSAVE  ASUJVALF  
Barcode Medication Administration 2 PSBMD  PSBO  
Computerized Public Health Activity Data 2 BNIE  BNIG  
IHS RPMS CHR System 2 BCHUTIL  BCHUTIL4  
Referred Care Information System 2 BMCADD1  BMCSMC  
Women's Health 2 BWMPUTL  BWUTL6  
IHS Patient 1 AUPNREP  
Patient Care Component 1 APCDETP  

Entry Points

Name Comments DBIA/ICR reference
GDIE(DDSVL) ;In:
; DDSFILE = File # or root
; DA = Record array
; DDSVL = Flag to lock record
PUTQ
VALPUT ;Validate and put
GNDPC ;In:
; DDP = File #
; DDSFLD = Field #
FIELD(DDP,FLD) ;Get field number
PUT(DDSFILE,DA,DDSFLD,DDSVAL,DDSER,DDSPARM) ;Put value for file/field
  • ICR #10149
    • Status: Active
    • Usage: Supported
    GET(DDSFILE,DA,DDSFLD,DDSER,DDSPARM) ;Get value for file/field
  • ICR #10149
    • Status: Active
    • Usage: Supported
    GETQ
    UPDATE(DDP,DDSVDA,DA,FLD,PG,Y) ;Store value, repaint
    GVAL(DIE,DA,ND,PC) ;Get value

    External References

    Name Field # of Occurrence
    GL^DDS10 GDIE+11
    RPB^DDS7 UPDATE+28
    RPF^DDS7 UPDATE+9
    RPCF^DDSCOMP UPDATE+29
    $$AFTQ^DDSLIB FIELD+2
    $$FIND^DDSLIB GET+9
    $$UQT^DDSLIB FIELD+2
    $$REL^DDSVALM GET+10
    ERR^DDSVALM GETQ, PUTQ
    GETWP^DDSVALM GET+22
    MULT^DDSVALM PUT+13
    BLD^DIALOG PUT+9, GDIE+10, GNDPC+9, GNDPC+14, GNDPC+22, GNDPC+25, FIELD+7, FIELD+9
    FILE^DIE VALPUT+16
    VAL^DIE VALPUT+3
    AUXVAL^DIEV VALPUT+5
    $$EXTERNAL^DILFD GET+24

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: $S(RJ:$J("",LEN-$L(EXT))_VAL,1:VAL_$J("",LEN-$L(EXT)))
    • Line Location: UPDATE+26
    Routine Call
    • DIE
    • Line Location:
      • VALPUT+16
    Routine Call
    • DIALOG
    • Line Location:
      • PUT+9
      • GDIE+10
      • GNDPC+9
      • GNDPC+14
      • GNDPC+22
      • GNDPC+25
      • FIELD+7
      • FIELD+9
    Routine Call
    • DIE
    • Line Location:
      • VALPUT+3

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD( PUT+11, GNDPC+10, GNDPC+24, FIELD+6, FIELD+9
    ^TMP("DDSWP" GET+17

    Label References

    Name Line Occurrences
    $$FIELD GET+12, PUT+8
    $$GVAL GET+23
    GDIE GET+7, PUT+7
    GETQ GET+7, GET+9, GET+12
    GNDPC GET+21
    PUTQ PUT+7, PUT+8, PUT+9
    UPDATE VALPUT+11
    VALPUT PUT+14

    Naked Globals

    Name Field # of Occurrence
    ^("F" UPDATE+2*
    ^("GL" VALPUT+10*
    ^("M" GET+16
    ^("X" GET+19, UPDATE+2*

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    BK UPDATE+1~, UPDATE+6*, UPDATE+7, UPDATE+8, UPDATE+11*, UPDATE+12, UPDATE+13, UPDATE+15, UPDATE+18, UPDATE+19
    , UPDATE+20
    DA GET~, GET+10, GET+23, PUT~, VALPUT+11, UPDATE~, UPDATE+9, GDIE+11, GVAL~
    >> DDGLDEL UPDATE+24
    >> DDGLVID UPDATE+24
    DDO UPDATE+1~, UPDATE+12*, UPDATE+13
    DDP GET+1~, GET+10, GET+12, GET+14, GET+17, GET+24, PUT+1~, PUT+8, PUT+11, VALPUT+3
    , VALPUT+5, VALPUT+7, VALPUT+10, VALPUT+11, VALPUT+15, UPDATE~, UPDATE+2*, UPDATE+5, UPDATE+6, UPDATE+9
    , UPDATE+11, UPDATE+12, UPDATE+28, UPDATE+29, GDIE+9*, GDIE+10, GDIE+11, GNDPC+10, GNDPC+13, GNDPC+20
    , FIELD~, FIELD+4, FIELD+6, FIELD+9
    >> DDS GET+15, PUT+7, VALPUT+9
    DDSANS GET+1~, GET+4*, GET+10*, GET+17*, GET+18, GET+19*, GET+23*, GET+24*, GETQ+1
    >> DDSCHG VALPUT+12*
    DDSER GET~, PUT~
    DDSFDA VALPUT+14~
    DDSFDA( VALPUT+15*
    DDSFILE GET~, PUT~, GDIE+9
    DDSFLD GET~, GET+9, GET+10, GET+12*, GET+14, GET+17, GET+24, PUT~, PUT+8*, PUT+9
    , PUT+11, VALPUT+3, VALPUT+5, VALPUT+7, VALPUT+10, VALPUT+11, VALPUT+15, GNDPC+9, GNDPC+10, GNDPC+13
    , GNDPC+20
    DDSPARM GET~, GET+5*, GET+10, GET+19, GET+24, PUT~, PUT+5*, VALPUT+2
    >> DDSPG VALPUT+11
    DDSPTB UPDATE+8~*, UPDATE+9
    >> DDSREFS UPDATE+5, UPDATE+6, UPDATE+7, UPDATE+8, UPDATE+11, UPDATE+12, UPDATE+13, UPDATE+15, UPDATE+28, UPDATE+29
    >> DDSREFT GET+14, GET+15, VALPUT+7, VALPUT+10, UPDATE+2*, UPDATE+18, UPDATE+19, UPDATE+20
    DDSTMP GET+1~, GET+14*, GET+15, GET+16, GET+18, GET+19
    DDSV0 PUT+1~, PUT+11*, VALPUT+5
    DDSV02 PUT+1~, PUT+11*, PUT+12, VALPUT+5
    DDSVAL PUT~, PUT+4*, PUT+9, VALPUT+3, VALPUT+5
    DDSVDA GET+2~, GET+7, GET+14, GET+17, PUT+1~, PUT+7, VALPUT+3, VALPUT+5, VALPUT+7, VALPUT+10
    , VALPUT+11, VALPUT+15, UPDATE~, UPDATE+2, UPDATE+9, UPDATE+20, GDIE+11
    DDSVDDL0 GET+2~, GNDPC+10*, GNDPC+11, GNDPC+16, GNDPC+18
    DDSVDL GET+2~, PUT+1~, GDIE+11
    DDSVDV GET+2~, GET+22, GNDPC+18*, GNDPC+24*, GNDPC+25
    DDSVL GDIE~, GDIE+11
    DDSVND GET+2~, GET+23, GNDPC+17*
    DDSVPC GET+2~, GET+22, GET+23, GNDPC+16*, GNDPC+17*, GNDPC+21, GNDPC+23
    DDSVY VALPUT+1~, VALPUT+3, VALPUT+5, VALPUT+7, VALPUT+11, VALPUT+15
    DDSVY(0 VALPUT+7!
    DIE GET+1~, GET+23, PUT+1~, VALPUT+10, GDIE+11, GVAL~, GVAL+2
    DIERR GET+2~, GET+7, GET+12, GET+21, GETQ, PUT+2~, PUT+7, PUT+8, PUTQ, VALPUT+6
    , FIELD+5
    DX UPDATE+1~, UPDATE+14*
    DY UPDATE+1~, UPDATE+14*, UPDATE+16, UPDATE+18*, UPDATE+19*, UPDATE+20*, UPDATE+22*, UPDATE+23*
    E GNDPC+12~, GNDPC+14
    E("FIELD" GNDPC+13*
    E("FILE" GNDPC+13*
    EXT UPDATE+1~, UPDATE+2*, UPDATE+24, UPDATE+26
    F FIELD+1~, FIELD+4*, FIELD+6*, FIELD+7, FIELD+9, FIELD+10
    FLD UPDATE~, UPDATE+2, UPDATE+4, UPDATE+5, UPDATE+6, UPDATE+11, UPDATE+12, UPDATE+28, UPDATE+29, FIELD~
    , FIELD+2*, FIELD+4, FIELD+5, FIELD+6, FIELD+7
    I GNDPC+12~, GNDPC+14
    I("FILE" GNDPC+13*
    I(1 GNDPC+13*
    >> IOXY UPDATE+25
    LEN UPDATE+1~, UPDATE+13*, UPDATE+14*, UPDATE+24, UPDATE+26
    LN GVAL+1~, GVAL+2*, GVAL+3, GVAL+4
    ND GVAL~
    OFS UPDATE+17~, UPDATE+21*, UPDATE+22
    P GNDPC+20~, GNDPC+22, GNDPC+25, FIELD+1~, FIELD+7, FIELD+9
    P("FIELD" GNDPC+20*
    P("FILE" GNDPC+20*, FIELD+4*
    P(1 FIELD+7*, FIELD+9*
    PAGE UPDATE+1~, UPDATE+5*, UPDATE+6, UPDATE+7, UPDATE+8
    PC GVAL~, GVAL+3, GVAL+4
    PDA UPDATE+17~, UPDATE+18*, UPDATE+19, UPDATE+20
    PG UPDATE~, UPDATE+11, UPDATE+12, UPDATE+13, UPDATE+15, UPDATE+18, UPDATE+19, UPDATE+20, UPDATE+28, UPDATE+29
    REP UPDATE+1~, UPDATE+15*, UPDATE+16, UPDATE+19*, UPDATE+21, UPDATE+22
    RJ UPDATE+1~, UPDATE+14*, UPDATE+26
    SN UPDATE+17~, UPDATE+20*, UPDATE+21
    U PUT+11, UPDATE+7, UPDATE+14, UPDATE+15, UPDATE+19, UPDATE+21, UPDATE+22, GDIE+9, GNDPC+16, GNDPC+18
    , GNDPC+24, GVAL+3
    VAL UPDATE+1~, UPDATE+24*, UPDATE+26
    X GET+1~, GNDPC+18*
    Y UPDATE~, UPDATE+2, GVAL+1~, GVAL+3*, GVAL+4*, GVAL+5
    Y(0 UPDATE+2
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All