PSUCSR1 ;BIR/DJM - Drug breakdown ;25 AUG 1998
Source file <PSUCSR1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ;EP -- DRUG BREAKDOWN REPORT
 | 
|
| GENREP(PSUMSG) | ;EP - Generate the report based on the collected information
 | 
|
| COMBO(PSUMSG) | ;EP - Generate the report based on the collected information
 | 
|
| PGHDR1 | ;AMIS PAGE HEADER
 | 
|
| PGHDR2 | ;COMBO AMIS PAGE HEADER
 | 
|
| PG | ;EP  Page controller
 | 
|
| PGHDR | ;EP write header & page number
 | 
|
| SUMMRY(PSUMSG,PSUMFL) | ; Mail the drug summary report (by division)
 | 
|
| EXIT1 | ||
| PAD(S,P,L) | ; Pad string S with P to length L
 | 
|
| CTR(S,P,L) | ; Center string S left and right P in size L
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  |