MHV1P5 ;WAS/GPM - My HealtheVet Install Utility Routine ; [4/29/08 11:49pm]
Source file <MHV1P5.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ENV | ;
|
|
PRE | ; Pre-init routine
; Turn on MHV Application Logging, add a log entry for the start ; of the patch install. |
|
POST | ; Post-init routine
|
|
LOGON | ; Turn on MHV application logging
|
|
LOGOFF | ; Turn off MHV application logging
|
|
CLINIC(ERR) | ; Set up HOSPITAL LOCATION entry (file #44)
|
|
QRYSETUP | ; Setup for demographics query
; Setup MHV REQUEST TYPE and MHV RESPONSE MAP |
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | CLINIC+6, CLINIC+16 |
UPDATE^DIE | CLINIC+32 |
TOGGLE^MHVU2 | QRYSETUP+38 |
UPDMAP^MHVU2 | QRYSETUP+29 |
UPDREQ^MHVU2 | QRYSETUP+15 |
LOGOFF^MHVUL1 | LOGOFF+3 |
LOGSET^MHVUL1 | LOGON+6 |
LOG^MHVUL2 | PRE+4, POST+2, POST+18, CLINIC+2, CLINIC+9, CLINIC+13, CLINIC+20, CLINIC+35, CLINIC+38, QRYSETUP+14 , QRYSETUP+17, QRYSETUP+28, QRYSETUP+31, QRYSETUP+37, QRYSETUP+40 |
RESET^MHVUL2 | POST+20 |
$$SITE^VASITE | CLINIC+28 |
$$HTFM^XLFDT | LOGON+4 |
BMES^XPDUTL | POST+4, POST+7, POST+12, LOGON+2, LOGOFF+2, QRYSETUP+18, QRYSETUP+32, QRYSETUP+41 |
MES^XPDUTL | POST+8, POST+9, POST+10, POST+13, QRYSETUP+19, QRYSETUP+33, QRYSETUP+42 |
FileNo | Call Tags |
---|---|
^DIC(40.9 - [#40.9] | FIND1^DIC |
^SC - [#44] | FIND1^DIC |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CIEN | CLINIC+1~, CLINIC+6*, CLINIC+7 |
ERR | POST+1~, POST+5, POST+6, CLINIC~, CLINIC+3!, CLINIC+4*, CLINIC+8*, CLINIC+9, CLINIC+12*, CLINIC+13 , CLINIC+19*, CLINIC+20, CLINIC+34*, CLINIC+35, QRYSETUP+3~, QRYSETUP+4*, QRYSETUP+15, QRYSETUP+16, QRYSETUP+17, QRYSETUP+23* , QRYSETUP+29, QRYSETUP+30, QRYSETUP+31, QRYSETUP+36*, QRYSETUP+38, QRYSETUP+39, QRYSETUP+40 |
ERR("DIERR" | CLINIC+11, CLINIC+12, CLINIC+18*, CLINIC+19, CLINIC+33, CLINIC+34 |
FDA | CLINIC+1~ |
FDA(44 | CLINIC+24*, CLINIC+25*, CLINIC+26*, CLINIC+27*, CLINIC+28*, CLINIC+29*, CLINIC+30*, CLINIC+31* |
FIELDS | QRYSETUP+3~, QRYSETUP+14, QRYSETUP+15, QRYSETUP+22!, QRYSETUP+28, QRYSETUP+29 |
FIELDS("BLOCK" | QRYSETUP+7* |
FIELDS("BUILDER" | QRYSETUP+26* |
FIELDS("DATATYPE" | QRYSETUP+9* |
FIELDS("DESCRIPTION" | QRYSETUP+11*, QRYSETUP+12*, QRYSETUP+13* |
FIELDS("EXECUTE" | QRYSETUP+10* |
FIELDS("NUMBER" | QRYSETUP+6* |
FIELDS("PROTOCOL" | QRYSETUP+25* |
FIELDS("REALTIME" | QRYSETUP+8* |
FIELDS("REQUE | ST TYPE" , QRYSETUP+5* |
FIELDS("SEGMENT" | QRYSETUP+27* |
FIELDS("SUBSCRIBER" | QRYSETUP+24* |
IENS | CLINIC+1~, CLINIC+23*, CLINIC+24, CLINIC+25, CLINIC+26, CLINIC+27, CLINIC+28, CLINIC+29, CLINIC+30, CLINIC+31 |
SUCCESS | LOGON+1~, LOGON+6, LOGOFF+1~, LOGOFF+3 |
TIEN | CLINIC+1~, CLINIC+16*, CLINIC+17, CLINIC+27 |
UPDATE | LOGON+1~, LOGON+6 |
UPDATE("DELETE" | LOGON+4* |
UPDATE("LEVEL" | LOGON+5* |
UPDATE("STATE" | LOGON+3* |
>> XPDNM | PRE+4, POST+2, POST+18 |