GMRAUTL1 ;HIRMFO/WAA-ALLERGY UTILITIES ;12/04/92
Source file <GMRAUTL1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
STPCK() | ; This is to check to see if the user wanted to stop the print
|
|
BR | ; This is a online reference card entry point
|
|
PR | ; This is a print utility for the reference card for IRM
|
|
PR1 | ; Print out the card
|
|
LP1 | ; Main loop
|
|
PRDTST(GMRADFN) | ; GMRA*4*33 - Remove Test Patients from Live Reports
; This function will return 0 if the patient should not print on the report, and 1 if the patient ; should appear on the report. This function will allow all patients to print on the report if the ; report is run in a test environment. |
|
VAD(DFN,DAT,LOC,NAM,SEX,SSN,RB,PRO,PID) | ; Call to VADPT
; This call is a generic call to 1^VADPT ; Input: ; 1 DFN = Patient Internal entry number in the Patient File ; 2 DAT = Date for lookup |
|
DATE(DATE) | ; This Ex-Function will date the date from the DATE
; and convert it to the old DD("DD") style format ; it returns the answer in DATE |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^GMRD(120.87 - [#120.87] | WP^DDBR |