Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: VPRSDA

Package: Virtual Patient Record

Routine: VPRSDA


Information

VPRSDA ;SLC/MKB -- SDA utilities ;10/25/18 15:29

Source Information

Source file <VPRSDA.m>

Entry Points

Name Comments DBIA/ICR reference
INTDATE(X) ; -- Return internal form of date X
DATE(X,DTO) ; -- return FM date X as SDA Timestamp
VALID(X) ; -- returns 1 or 0, if valid FM date
NAMECOMP(NAME) ; -- return name as string of component pieces
; NAME -> FAMILY^GIVEN^MIDDLE^SUFFIX
CODED ; -- ck Code Table ID for internal^external format
; called from DDEG for entity VPR CODE TABLE using variables:
; FILE, FIELD, ID (read only, do NOT kill)
CODE(IEN,FILE,CSYS,CDT) ; -- find CSYS code for IEN in FILE
; CSYS can be string of abbreviations to look for, in order
DESC(CODE) ; -- called from CODE, to return coding system text
; Expects all the variables used in CODE()
NULL(N) ; -- return null string(s) to delete property
CPT(IEN,DATE,LONG) ; -- return code^description^CPT-4 for #81 IEN
HLOC(X) ; -- return Hosp Loc #44 ien from location name X
COUNTY(ST,CTY) ; -- return ien^name for a STate and CounTY
FAC(HLOC) ; -- return facility #4 ien for HospLOC #44 ien
FACQ
CKFAC(IEN) ; -- validate #4 ien, return Parent if no stn#
SITE() ; -- return current site#
DEL1 ; -- ID Action for Delete entities, returns VPR0=data
NOQ ; -- no query

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SC - [#44] GET1^DIQ
5.01 GET1^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call