DGREGDD ;ALB/REW,TMK - REGISTRATION PATIENT FILE MUMPS X-REFS ; 28-MAR-06
Source file <DGREGDD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SET(DFN,X) | ; XREF SET STATEMENT FOR PATIENT, CLAIM FOLDER LOCATION (#2,.314)
; TRIGGERS THE FREE TEXT VALUE OF FLD .312 TO STATION#_STATION NAME |
|
| KILL(DFN) | ; XREF KILL STATEMENT FOR PATIENT, CLAIM FOLDER LOCATION (#2,.314)
; TRIGGERS THE FREE TEXT VALUE OF FIELD .312 TO NULL (deletes it) |
|
| CFLTF(DGI) | ;CLAIM FOLDER LOCATION screen of INSTITUTIONS with specific types
; DGI = facility (pointer to file 4) ; Returns 1 if valid facility type for facility ien DGI ; Returns 0 if invalid facility type for facility ien DGI |
|
| CFLTFQ | ||
| PFTF(DGI) | ;PREFERRED FACILITY screens of INSTITUTIONS for valid facility types
; DGI = facility (pointer to file 4) ; Returns 1 if valid facility type for facility ; Returns 0 if invalid facility type for facility |
|
| PFTFQ |