HBHCR15A ;LR VAMC(IRMS)/MJT-HBHC rpt using file 634.6, user selects date/forms from last 12 transmit batchs, fields: form#, pat name, last 4, form date, + action on form 3, prov #, & prov name on visits, & Adm or D/C on form 6 ;2/5/98
Source file <HBHCR15A.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DQ | ; De-queue
|
|
LOOP | ; Loop thru HBHC(634.6,"C" (transmit date) cross-ref to build report
|
|
EXIT | ; Exit module
|
|
PROCESS | ; Process records
|
|
FORM3 | ; Process Form 3 (Admission) records
|
|
FORM4 | ; Process Form 4 (Visit) records
|
|
NAME | ; Form 4 Name
|
|
FORM5 | ; Process Form 5 (Discharge) records
|
|
FORM6 | ; Process Form 6 (Correction) records
|
|
FORM7 | ; Process Form 7 Medical Foster Home (MFH) records
|
|
SET | ; Set TMP node
; By design, records are processed/printed in the following order by form number: 6, 3 (A), 5 (D), 4 (V), & 7 (Z) |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|