PSS51P2 ;BIR/LDT - API FOR INFORMATION FROM FILE 51.2 ; 5 Sep 03
Source file <PSS51P2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ALL(PSSIEN,PSSFT,PSSFL,PSSPK,LIST) | ;
|
|
| COUNTBG | ;CHECKS PSSBGCNT AND FILLS COUNT IN ON 0 NODE OF ^TMP($J,LIST)
|
|
| LOOPDI | ;LOOPS ON "DILIST" FROM FILEMAN CALL (USED FOR RETURNING MULTIPLE DRUGS FROM PSSFT)
|
|
| LOOPDIR | ;LOOP FOR A DIRECT READ. READS ALL IENs FOR ^PSDRUG(
|
|
| DIRALL | ;TEST FOR PSSFL, PSSPK, BAILS IF CONDITIONS MEET TRUE
|
|
| DIRREAD | ;MAIN DIRECT READ FOR ENTIRE ROUTINE
|
|
| SETSCRN | ;Set Screen for inactive Medication Routes
|
|
| NAME(PSSFT,PSSPK,LIST) | ;
|
|
| IEN(PSSABBR,LIST) | ;
|
|
| SETZRO | ;
|
|
| SETZRO2 | ;
|
|
| LOOP(PSS) | ;
|
|
| 1 | ;
|
|
| 2 | ;
|
| FileNo | Call Tags |
|---|---|
| ^PS(51.2 - [#51.2] | FIND1^DIC, FIND^DIC, GETS^DIQ |
