PSUOPMD ;BIR/CFL,DAM - PSU PBM Multidose Outpatient Pharmacy create mailman messages ;17 NOV 2004
Source file <PSUOPMD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;
|
|
| MSG | ;Set up the number of lines and messages for mailman
|
|
| XMD | ;
|
|
| OLD | ; THIS SUBROUTINE STOPS MULTI-LINED MESSAGES FORM SPANNING MAILMAN MSG
|
|
| OLD5 | ; * IF A RECORD EXCEEDS THE 10,000 CHARACTER 5 TIMES
|
|
| OLD4 | ; * IF A RECORD EXCEEDS THE 10,000 CHARACTER 4 TIMES
|
|
| OLD3 | ;
|
|
| OLD2 | ;
|
|
| OLD1 | ;
|
|
| VARS | ; Setup variables for contents
|
|
| NODATA | ;Send "No data to report" message
|
|
| SETCNT | ;Set message count and line count
|
