ECXPUTL ;ALB/GTS - Utilities for DSS Prosthetics Extract ;July 15, 1998
Source file <ECXPUTL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PDIV() | ; Prompt the user for a division and return its IEN
|
|
| PDIV2(DUZ) | ; prompt user for any prosthetics division
; input ; DUZ - ien in file #200 ; Output: ; ECXDIV ; successful - ien file #4^station number^station name ; unsuccessful - 0 |
|
| PDIV3(DUZ,PRIME,DIV) | ; user divisions in primary prosthetics division
; input ; DUZ - ien in file #200 (required) ; PRIME - primary division - ien file #4^station number^station name (required) ; DIV - array passed by reference (required) ; Output: ; DIV - array of 1 or more divisions associated with primary division ; successful - ien file #4^station number^station name ; unsuccessful - 0 |
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | Classic Fileman Calls |
