DGRRUTL ;alb/aas - DG Replacement and Rehosting RPC for VADPT ;10/21/05 13:19
Source file <DGRRUTL.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 1 | $$PARAM^HLCS2 |
Kernel | 1 | $$KSP^XUPARAM |
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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ADD(STR) | ; -- add string to array
|
|
CHARCHK(STR) | ; -- replace xml character limits with entities
|
|
SITENO() | ; institution number, including suffix, from vasite.
|
|
SITENAM() | ; - Institution name, from vasite
|
|
PRODST1() | ; Production account status check 1
; -- Returns 1 if production, 0 if not |
|
PRODST2() | ; Production account status check 2
; -- returns 1 if Default Processing Id from HL COMMUNICATION SERVER PARAMETERS file is Production, 0 if not |
|
DOMAIN() | ; -- get the default domain
|
|
XMLHDR() | ; -- provides current XML standard header
|
|
CHKSUM(ARRAY) | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^XMB("NETNAME" | PRODST1+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | CHARCHK+1~, CHARCHK+12*, CHARCHK+13 |
ARRAY | CHKSUM~ |
ARRAY( | CHKSUM+4 |
CHAR | CHKSUM+1~, CHKSUM+5* |
DATA | CHKSUM+1~, CHKSUM+4*, CHKSUM+5 |
>> DGRRESLT | ADD+2 |
>> DGRRLINE | ADD+1*, ADD+2 |
I | CHARCHK+1~, CHARCHK+10*, CHARCHK+11 |
ITEM | CHKSUM+1~, CHKSUM+3*, CHKSUM+4*, CHKSUM+5 |
NEWSTR | CHARCHK+1~, CHARCHK+3*, CHARCHK+4 |
STR | ADD~, ADD+2, CHARCHK~, CHARCHK+3*, CHARCHK+4, CHARCHK+5*, CHARCHK+6*, CHARCHK+7*, CHARCHK+8*, CHARCHK+10 , CHARCHK+11, CHARCHK+13*, CHARCHK+14 |
VAL | CHKSUM+1~, CHKSUM+2*, CHKSUM+5*, CHKSUM+6 |
X | CHARCHK+1~, CHARCHK+4*, CHARCHK+11*, CHARCHK+12, CHARCHK+13, PRODST1+2~*, PRODST1+3 |
Y | CHARCHK+1~, CHARCHK+2*, CHARCHK+3, CHARCHK+4* |
Z | CHARCHK+1~, CHARCHK+2*, CHARCHK+3, CHARCHK+4* |