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 |