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 |  Marked Items  | All
Print Page as PDF
Routine: DGBTVUP

Package: Beneficiary Travel

Routine: DGBTVUP


Information

DGBTVUP ;ALB/MRY-UPDATE LOCAL VENDOR FILE W/ COREFLS VENDORS ;7/15/2003

Source Information

Source file <DGBTVUP.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 ^%DT  FILE^DIE  CLEAN^DILF  $$GET1^DIQ  
Communications Service Library 1 UPDATE^CSLVQ  
Lab Service 1 DD^LRX  
MailMan 1 ^XMD  
Registration 1 $$SITE^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Beneficiary Travel 1 DGBT LOCAL VENDOR UPDATE  

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point for Update Vendor REcords option
; build temporary global containing CoreFLS vendor ids
UPD(DGBTARRY) ;
; DGBTARRY is an input and is the name of the global or local arry
; containing the vendor record(s) retrieved from the CoreFLS
; vendor tables via a request from DGBT software
FILE ; file into existing entry
GETERRM ; pull any exceptions from FM output array and assign to ^TMP
SMSG ; necessary assignment of variables for MAILMAN processing

External References

Name Field # of Occurrence
^%DT SMSG+5
UPDATE^CSLVQ EN+21
FILE^DIE FILE+35
CLEAN^DILF GETERRM+9
$$GET1^DIQ EN+7, EN+8, EN+9
DD^LRX SMSG+5
$$SITE^VASITE SMSG+2
^XMD SMSG+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," ** COREFLS Package CSL V1.0 not installed. **"
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,$C(7),"There are no CoreFLS Vendor IDs stored in the CoreFLS Local Vendor File (392.31)",!,"Vendor File Update cannot occur."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !?5,"Update of the CoreFLS Local Vendor file (#392.31) will begin."
  • Line Location: EN+4
Routine Call
  • DIE
  • Line Location:
    • FILE+35

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGBT(392.31 - [#392.31] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("RSUM" SMSG+3
^%ZOSF("TEST" EN+2
^DGBT(392.31 - [#392.31] EN+3, EN+6, UPD+8, FILE+1, FILE+36
^TMP("DGBTUPDERR" UPD+9*, FILE+2*, GETERRM+7*, SMSG+3*, SMSG+9!
^TMP("DGBTVUP" EN+11*, EN+21
^TMP("DIERR" GETERRM+4, GETERRM+5, GETERRM+6

Label References

Name Line Occurrences
FILE UPD+10
GETERRM UPD+11
SMSG UPD+11

Naked Globals

Name Field # of Occurrence
^( GETERRM+5, GETERRM+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT SMSG+5*
DGBTARRY UPD~, UPD+7, UPD+8, UPD+9, FILE+3, FILE+4, FILE+5, FILE+6, FILE+7, FILE+8
, FILE+9, FILE+10, FILE+11, FILE+12, FILE+13, FILE+14, FILE+15, FILE+16, FILE+17, FILE+18
, FILE+19, FILE+20, FILE+21, FILE+22, FILE+23, FILE+24, FILE+25, FILE+26, FILE+27, FILE+28
, FILE+29, FILE+30, FILE+31, FILE+32, FILE+33, FILE+34
DGBTCNT UPD+6*, UPD+9*, FILE+2*, GETERRM+2~, GETERRM+3*, GETERRM+7*
DGBTDA EN+5~, EN+6*, EN+7, EN+8, EN+9, EN+11
DGBTDATE EN+5~, EN+9*, EN+11
DGBTERRC GETERRM+2~, GETERRM+3*, GETERRM+4*
DGBTERRM GETERRM+2~, GETERRM+7*
DGBTERRN GETERRM+2~, GETERRM+3*, GETERRM+4*, GETERRM+5, GETERRM+6
DGBTERRP GETERRM+2~, GETERRM+5*
DGBTERRT GETERRM+2~, GETERRM+6*
DGBTFDA UPD+5~
DGBTFDA(1 FILE+4*, FILE+6*, FILE+8*, FILE+10*, FILE+12*, FILE+14*, FILE+16*, FILE+18*, FILE+20*, FILE+22*
, FILE+24*, FILE+26*, FILE+28*, FILE+30*, FILE+32*, FILE+34*
DGBTIDX UPD+5~, UPD+6*, UPD+7*, UPD+8, UPD+9, FILE+3, FILE+4, FILE+5, FILE+6, FILE+7
, FILE+8, FILE+9, FILE+10, FILE+11, FILE+12, FILE+13, FILE+14, FILE+15, FILE+16, FILE+17
, FILE+18, FILE+19, FILE+20, FILE+21, FILE+22, FILE+23, FILE+24, FILE+25, FILE+26, FILE+27
, FILE+28, FILE+29, FILE+30, FILE+31, FILE+32, FILE+33, FILE+34
>> DGBTNOW SMSG+5*, SMSG+6
DGBTNUM EN+5~, EN+7*, EN+10, EN+11
DGBTSITE EN+5~, EN+8*, EN+10, EN+11, SMSG+1~, SMSG+2*, SMSG+3, SMSG+6
DGBTVDA UPD+5~, UPD+6*, UPD+8*, UPD+9, FILE+1, FILE+2, FILE+4, FILE+6, FILE+8, FILE+10
, FILE+12, FILE+14, FILE+16, FILE+18, FILE+20, FILE+22, FILE+24, FILE+26, FILE+28, FILE+30
, FILE+32, FILE+34, FILE+36
>> DIERR GETERRM+1
MSGARRY GETERRM+2~
MSGARRY( GETERRM+7
MSGARRY("PARAM" GETERRM+5*
MSGARRY("TEXT" GETERRM+6*
X EN+2~*, SMSG+3*, SMSG+5*
XMDUZ SMSG+1~, SMSG+6*
XMSUB SMSG+1~, SMSG+6*
XMTEXT SMSG+1~, SMSG+7*
XMY SMSG+1~
XMY("YORTY.M@MNTVBB.FO-ALBANY.DOMAIN.EXT" SMSG+4*
>> Y SMSG+3, SMSG+5

Marked Items

Name Field # of Occurrence
$T( SMSG+3
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 |  Marked Items  | All