HBHCXMD ;LR VAMC(IRMS)/MJT - HBHC Discharge Transmissions; May 11, 2021@17:45
Source file <HBHCXMD.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
LOOP | ; Loop thru ^HBHC(631) "AF","N" cross-ref to create nodes in ^HBHC(634) => transmit or ^HBHC(634.3) => Discharge Error(s) file
|
|
EXIT | ; Exit module
|
|
SETNODE | ; Set node in ^HBHC(634) (Transmit) or ^HBHC(634.3) (Discharge Error(s))
|
|
TRANS | ; Set node in ^HBHC(634) transmit file & flag record as 'F" (filed for transmit) in ^HBHC(631)
|
|
ERROR | ; Set node in ^HBHC(634.3) if data is incomplete or proper fields invalid for 'Discharge Status'
|