source: WorldVistAEHR/trunk/r/AUTOMATED_MED_INFO_EXCHANGE-DVBA-DVBC/DVBCTRNN.m@ 1710

Last change on this file since 1710 was 613, checked in by George Lilly, 15 years ago

initial load of WorldVistAEHR

File size: 641 bytes
RevLine 
[613]1DVBCTRNN ;ALB ISC/THM-NOTIFY DOC OF REQUIRED TRANSFER DICTATION ; 5/23/91 11:04 AM
2 ;;2.7;AMIE;;Apr 10, 1995
3 ;
4EXIT D GO1 K DVBCCOPY,DVBCX Q
5 ;
6GO1 W:(IOST?1"C-".E) @IOF K ^UTILITY($J,"W") D X3^DVBCLTR W !!!!!!!
7 F ZZI=0:1 S LY=$T(TXT+ZZI) Q:LY["END" S X=$P(LY,";;",2),DIWF="R",DIWR=75,DIWL=5 D ^DIWP
8 D ^DIWW
9 K LY,TXT W @IOF Q
10 ;
11TXT ;;Notice to the physician: |BLANK(1)|
12 ;;The attached examination(s) have been transferred to this medical center
13 ;;from another center. It will be required, therefore, that all laboratory
14 ;;and X-Ray results be dictated for transcription and return to the
15 ;;originating medical center.
16 ;;
17 ;;END
Note: See TracBrowser for help on using the repository browser.