IBDFN2 ;ALB/CJM - ENCOUNTER FORM - INTERFACE ROUTINES ;NOV 16,1992
Source file <IBDFN2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| APPT | ;returns appt date@time^date^time
|
|
| NOW | ;returns date and time
|
|
| SPSEMPLR | ;returns spouse's employer,address, telephone
|
|
| EMPLOYER | ;returns employer,address, telephone
|
|
| MT | ;returns means test data
|
|
| ENROLL | ;returns enrollment priority code and copay information
|
|
| ALLERGY | ;outputs a list of the patient's allergies
|
|
| PRMT | ; -- print a 1010f if required or will expire in 357.09;.1 days
; called from print manger ; requires dfn, ibappt=appointment date |
|
| PRMTQ | ||
| GETMT | ;Since status is required find last valid means test
|
|
| MSTSTAT | ;-- Get patient's MST status for EF display block
; Input: ; DFN |
|
| ASKMST | ;-- Ask if patient's treatment is related to SC and MST (if applicable)
|
