DGBTVUP ;ALB/MRY-UPDATE LOCAL VENDOR FILE W/ COREFLS VENDORS ;7/15/2003
Source file <DGBTVUP.m>
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 |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Beneficiary Travel | 1 | DGBT LOCAL VENDOR UPDATE |
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
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DGBT(392.31 - [#392.31] | GET1^DIQ |
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 |
>> | 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 |
Name | Field # of Occurrence |
---|---|
$T( | SMSG+3 |