WVUTL1A ;HCIOFO/JR,FT - Continuation of ^WVUTL1 (Utilities) ;07/20/2015 11:12
Source file <WVUTL1A.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRIOR() | ;EP
|
|
| PRIOR1() | ;EP
|
|
| NTPROC() | ;EP
|
|
| PROC() | ;EP
|
|
| PROC1() | ;EP
|
|
| PROVI(DFN) | ;
|
|
| SCR(X) | ;
|
|
| QUAD(X) | ;
|
|
| REF | ;
|
|
| FAC | ||
| RAXS(DA) | ;
|
|
| FACIL(DFN,TYP) | ;Gets Treatment Facility, if typ="C" for Cervix, "B" for Breast
|
|
| MST(WVDFN) | ;Gets Military Sexual Trauma
|
|
| SC(WVJ,WVFN) | ;Screen called from File 790.02 to elim. inactive from selectable
|
|
| LOOK(WVJ) | ;Display select fields with lookup on 790, not file#2 Identif.
|
|
| LOOKL(WVJ) | ;
|
|
| RUNDT(WVY) | ;Get and format run date for various reports
; Center when WVY="C" |
|
| LINE | ; Called from the WV LINE FOR MENUS option. That option is merely a
; place holder in the menu and used for visual purposes. This is ; entry point does nothing. |
|
| VET(DFN) | ; Check if patient is a veteran.
|
|
| CST(WVDFN) | ; Return Civilian Sexual Trauma value
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^WV(790 - [#790] | Classic Fileman Calls, GET1^DIQ |
| ^WV(790.404 - [#790.404] | EXTERNAL^DILFD, VFIELD^DILFD |
