Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSOTALK

Package: Outpatient Pharmacy

Routine: PSOTALK


Information

PSOTALK ;BIR/EJW - SCRIPTALK INTERFACE FROM VISTA ;12/20/17 19:09

Source Information

Source file <PSOTALK.m>

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: BARE+2
Function Call: WRITE
  • Prompt: !,"Patient not enrolled in ScripTalk program."
  • Line Location: BARE+4
Function Call: WRITE
  • Prompt: !,"Prescription not ACTIVE"
  • Line Location: BARE+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: BAREO+1
Function Call: WRITE
  • Prompt: !,"Prescription not on file"
  • Line Location: BARI+6
Function Call: WRITE
  • Prompt: !,"Patient not enrolled in ScripTalk program."
  • Line Location: BARI+7
Function Call: WRITE
  • Prompt: !,"Prescription not ACTIVE"
  • Line Location: BARI+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: BARIO+1
Function Call: WRITE
  • Prompt: !,"^XA",!,"^FO250,700^XGE:RX.GRF^FS"
  • Line Location: GO+0
Function Call: WRITE
  • Prompt: !,"^PQ1,0,1,Y",!,"^XZ"
  • Line Location: GO+2
Function Call: WRITE
  • Prompt: !,"^AFR,20,10^FO"_XCORD_","_YCORD_"^FR^CI0^FD"_PRTOUT_"^FS"
  • Line Location: DEFLINE+1
Function Call: WRITE
  • Prompt: !,"^RX"_$S(PSOCTP<10:"0",1:"")_PSOCTP_","_XMIT_"^FS"
  • Line Location: XMITP+0
Function Call: WRITE
  • Prompt: !,PSOTK11
  • Line Location: SET10+22
Function Call: WRITE
  • Prompt: !,PSOTK11
  • Line Location: SET10+28
Function Call: WRITE
  • Prompt: !,PSOTK11
  • Line Location: SET10+34
Function Call: WRITE
  • Prompt: !,PSOTK11
  • Line Location: SET10+44

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^PSRX - [#52] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call