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 |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: VAQUTL50

Package: Patient Data Exchange

Routine: VAQUTL50


Information

VAQUTL50 ;ALB/JRP - CREATE DATA SEGMENT FROM H.S. COMPONENT;Jun 07, 2023@11:47

Source Information

Source file <VAQUTL50.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Patient Data Exchange 2 $$VALOCC^VAQDBIH2  $$LIMITS^VAQDBIH3  
VA FileMan 2 MSG^DIALOG  (FILE,UPDATE)^DIE  
Kernel 1 ($$LOW,$$UP)^XLFSTR  

Entry Points

Name Comments DBIA/ICR reference
ADDSEG(HSPTR,MAXTIME,MAXOCCUR) ;ADD NEW DATA SEGMENT USING H.S. COMPONENT
  • ICR #1023
    • Status: Active
    • Usage: Private
    LIMITS(VAQHSPTR,VAQMAXTIME,VAQMAXOCCUR) ;DETERMINE MAX TIME/OCCURRENCE LIMITS
    UPDSEG(VAQHSPTR,VAQMAXTIME,VAQMAXOCCUR) ;UPDATE EXISTING DATA SEGMENT USING H.S. COMPONENT
  • ICR #1023
    • Status: Active
    • Usage: Private
    FIRSTUP(TEXT) ;FIRST CHARACTER EVERY WORD UPPER
  • ICR #1023
    • Status: Active
    • Usage: Private

    External References

    Name Field # of Occurrence
    MSG^DIALOG ADDSEG+50, UPDSEG+52
    FILE^DIE UPDSEG+50
    UPDATE^DIE ADDSEG+48
    $$VALOCC^VAQDBIH2 LIMITS+16, LIMITS+18
    $$LIMITS^VAQDBIH3 LIMITS+13
    $$LOW^XLFSTR FIRSTUP+10
    $$UP^XLFSTR ADDSEG+35, UPDSEG+34

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZOSF("UPPERCASE" FIRSTUP+13, FIRSTUP+20
    ^GMT(142.1 - [#142.1] ADDSEG+19, ADDSEG+26, UPDSEG+18, UPDSEG+24
    ^VAT(394.71 - [#394.71] ADDSEG+34, ADDSEG+35, ADDSEG+36, UPDSEG+33, UPDSEG+34, UPDSEG+35, UPDSEG+36, UPDSEG+38, UPDSEG+39, UPDSEG+43
    , UPDSEG+44, UPDSEG+46, UPDSEG+47
    ^VAT(394.81 - [#394.81] LIMITS+6, LIMITS+7

    Label References

    Name Line Occurrences
    $$FIRSTUP ADDSEG+32, UPDSEG+30
    LIMITS ADDSEG+37, UPDSEG+45

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ABB ADDSEG+23~, ADDSEG+29*, ADDSEG+30, ADDSEG+36, ADDSEG+41
    DA ADDSEG+24~
    DIC ADDSEG+24~
    DIE ADDSEG+24~
    DINUM ADDSEG+24~
    DR ADDSEG+24~
    HSPTR ADDSEG~, ADDSEG+17*, ADDSEG+18, ADDSEG+19, ADDSEG+26, ADDSEG+37, ADDSEG+43
    LEN FIRSTUP+8~, FIRSTUP+17*, FIRSTUP+21
    MAXOCCUR ADDSEG~, ADDSEG+21*, ADDSEG+37, ADDSEG+45
    MAXTIME ADDSEG~, ADDSEG+20*, ADDSEG+37, ADDSEG+44
    NAME ADDSEG+23~, ADDSEG+27*, ADDSEG+28, ADDSEG+32*, ADDSEG+34, ADDSEG+35, ADDSEG+40
    OUTTEXT FIRSTUP+8~, FIRSTUP+10*, FIRSTUP+12, FIRSTUP+14*, FIRSTUP+17, FIRSTUP+18, FIRSTUP+19, FIRSTUP+21*, FIRSTUP+22
    SPOT FIRSTUP+8~, FIRSTUP+16*, FIRSTUP+18*, FIRSTUP+19, FIRSTUP+21
    TEXT FIRSTUP~, FIRSTUP+6, FIRSTUP+10
    TMP ADDSEG+23~, ADDSEG+26*, ADDSEG+27, ADDSEG+29
    U ADDSEG+27, ADDSEG+29, ADDSEG+49, LIMITS+8, LIMITS+10, LIMITS+14, UPDSEG+25, UPDSEG+27, UPDSEG+36, UPDSEG+39
    , UPDSEG+43, UPDSEG+44, UPDSEG+46, UPDSEG+47, UPDSEG+48
    UPCHAR FIRSTUP+8~
    VAQABB UPDSEG+21~, UPDSEG+27*, UPDSEG+28, UPDSEG+35, UPDSEG+44
    VAQDEFOCCUR LIMITS+5~, LIMITS+10*, LIMITS+11*, LIMITS+18
    VAQDEFTIME LIMITS+5~, LIMITS+8*, LIMITS+9*, LIMITS+16
    VAQERROR ADDSEG+39~, ADDSEG+49, ADDSEG+53*, UPDSEG+21~, UPDSEG+48, UPDSEG+51, UPDSEG+54*
    VAQFDA ADDSEG+39~, UPDSEG+21~, UPDSEG+48
    VAQFDA( ADDSEG+40*, ADDSEG+41*, ADDSEG+42*, ADDSEG+43*, ADDSEG+44*, ADDSEG+45*, ADDSEG+46*, ADDSEG+47*, UPDSEG+43*, UPDSEG+44*
    , UPDSEG+46*, UPDSEG+47*
    VAQGMTSN0 UPDSEG+21~, UPDSEG+24*, UPDSEG+25, UPDSEG+27
    VAQHSPTR LIMITS~, LIMITS+13, UPDSEG~, UPDSEG+16*, UPDSEG+17, UPDSEG+18, UPDSEG+24, UPDSEG+36, UPDSEG+39, UPDSEG+45
    VAQIEN LIMITS+5~, LIMITS+6*, LIMITS+7, UPDSEG+21~, UPDSEG+33*, UPDSEG+34*, UPDSEG+35*, UPDSEG+36*, UPDSEG+37, UPDSEG+38
    , UPDSEG+39*, UPDSEG+40, UPDSEG+42*, UPDSEG+43, UPDSEG+44, UPDSEG+46, UPDSEG+47
    VAQLIMIT LIMITS+5~, LIMITS+13*, LIMITS+14
    VAQLINE ADDSEG+51~, ADDSEG+52*, ADDSEG+53, UPDSEG+21~, UPDSEG+53*, UPDSEG+54
    VAQMAXOCCUR LIMITS~, LIMITS+18*, LIMITS+19*, UPDSEG~, UPDSEG+20*, UPDSEG+45, UPDSEG+47
    VAQMAXTIME LIMITS~, LIMITS+16*, LIMITS+17*, UPDSEG~, UPDSEG+19*, UPDSEG+45, UPDSEG+46
    VAQMESSAGE ADDSEG+39~, ADDSEG+49, ADDSEG+50, ADDSEG+52, UPDSEG+21~, UPDSEG+52, UPDSEG+53
    VAQMESSAGE( ADDSEG+53, UPDSEG+54
    VAQNAME UPDSEG+21~, UPDSEG+25*, UPDSEG+26, UPDSEG+30*, UPDSEG+33, UPDSEG+34, UPDSEG+40, UPDSEG+43
    VAQNLIMIT LIMITS+5~, LIMITS+7*, LIMITS+8, LIMITS+10
    VAQOCCUR LIMITS+5~, LIMITS+14*, LIMITS+18, LIMITS+19
    VAQREC UPDSEG+21~, UPDSEG+38*, UPDSEG+39
    VAQTIME LIMITS+5~, LIMITS+14*, LIMITS+16, LIMITS+17
    X ADDSEG+24~, FIRSTUP+8~, FIRSTUP+12*, FIRSTUP+19*
    Y ADDSEG+24~, FIRSTUP+8~, FIRSTUP+14, FIRSTUP+21
    Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All