PSOTALK ;BIR/EJW - SCRIPTALK INTERFACE FROM VISTA ;12/20/17 19:09
Source file <PSOTALK.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ||
CLEAN | ||
BARE | ||
BAREO | ||
BARI | ||
BARIO | ||
GATHER | ;
|
|
TRANS | ;If printer mapping defined use it; otherwise print by division 01/19/07
|
|
TRANSQ | ;
|
|
PCHK | ;Check for printers that are mapped to a ScripTalk printer
|
|
GO | ||
OVERLAY | ||
DEFLINE(XCORD,YCORD,PRTOUT,FIELDNO,OFFSET) | ;
|
|
PICOTAG | ||
XMITP | ||
ID() | ||
AUTO | ;;v1.2c - LABEL REPRINTING FUNCTIONS 3-12-02
|
|
PAT55() | ||
PHONE() | ;changes below 1.2c*1 to swap to site signed-on vs. site from Rx
|
|
CITY() | ||
STATE() | ||
ZIP() | ||
SITE() | ||
ACODE() | ||
EPHON() | ||
CLERK() | ||
PSOEXP | ;
|
|
VRPH() | ||
RXNUM() | ||
RXALPHA() | ;RETURN RENEWAL LETTER OR SPACE CHARACTER
|
|
DATE() | ;CHANGED 7-30-01 TO USE EDATE FORMAT ALSO WHEN SPEAKING
|
|
EDATE() | ||
FILLS() | ||
TFILLS() | ||
RFILLS() | ;NEW REFILLS REMAINING METHOD 9-21-00, BASED ON PTST+5^PSORXVW
|
|
FILNO() | ||
EPAT() | ||
LAST4() | ||
SIG() | ;THIS SUBROUTINE WILL BE ABANDONED IF SIGPOE WORKS v1.2c 3-13-02
|
|
SIGPOE() | ;v1.2c - NEW SUBROUTINE TO GIVE MESSAGE FOR LONG SIGS FOR THE HUMAN READABLE PORTION
|
|
SIGPOEE | ||
SIGPOEX() | ;v1.2c - NEW SUBROUTINE TO GIVE MESSAGE FOR LONG SIGS FOR THE READ ALOUD PORTION
|
|
SIGPOEEX | ||
PROV() | ;PROVIDER NAME
|
|
EPROV() | ;
|
|
QTY() | ||
DF() | ||
DRUG() | ||
WARN() | ||
SET10 | ;Set readable data for 10K printers, 1280 max characters
|
|
WNALL() | ;Message when unable to print any warnings
|
|
WNREM() | ;Message when only able to print some warnings
|
|
SIGALL() | ;Sig plus all other information besides warnings is too long
|
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 |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | Classic Fileman Calls |
^PSRX - [#52] | Classic Fileman Calls |