Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: PSXMISC1

Package: CMOP

Routine: PSXMISC1


Information

PSXMISC1 ;BIR/WPB,BAB-Transmission Data Validation; Apr 01, 2026@15:04

Source Information

Source file <PSXMISC1.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
CMOP 3 ER7^PSXERR  (ACTLOG,DELETE)^PSXRPPL  UNMARK^PSXUTL  
Registration 2 $$BADADR^DGUTL3  (ADD,DEM)^VADPT  
VA FileMan 2 NOW^%DTC  $$GET1^DIQ  
National Drug File 1 $$PROD2^PSNAPIS  
Outpatient Pharmacy 1 ($$CHKRX,CHKRX)^PSOBAI  
Pharmacy Data Management 1 PSOL^PSSLOCK  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
CMOP 2 PSXBPSUT  PSXRPPL  

Entry Points

Name Comments DBIA/ICR reference
CHKDATA ;checks the data elements in PSRX before putting the rx in 550.2
NOGO ;any rx that does not pass the following checks will not be transmitted
NG1
PSOMSG
STOP
TSTSIG ; include testing for BAD characters in SIG
TSTCHAR ; test each character of SIG for certain characters
MAILOK(TRX) ; return 1 if patient still in mail status & ok to CMOP
ADDROK(TRX) ; return 1 if not foreign and not bad address indicator
CHKACT(RXN) ; SEE IF FILL IS ALREADY ON ACTIVITY LOG FOR FOREIGN OR BAD ADDRESS

External References

Name Field # of Occurrence
NOW^%DTC NG1+34, NG1+42
$$BADADR^DGUTL3 NG1+7
$$GET1^DIQ MAILOK+3
$$PROD2^PSNAPIS CHKDATA+10
$$CHKRX^PSOBAI ADDROK+11
CHKRX^PSOBAI ADDROK+8
PSOL^PSSLOCK CHKDATA+4
ER7^PSXERR PSOMSG+1
ACTLOG^PSXRPPL NG1+34, NG1+42
DELETE^PSXRPPL NG1+35
UNMARK^PSXUTL CHKDATA+15
ADD^VADPT NG1+7, ADDROK+5
DEM^VADPT NG1+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.5 - [#52.5] CHKDATA+1, CHKDATA+3, CHKDATA+5, CHKDATA+25, NG1+15
^PS(55 - [#55] MAILOK+2
^PS(59.7 - [#59.7] NG1+27, NG1+28
^PSDRUG - [#50] CHKDATA+8, CHKDATA+9, CHKDATA+15, CHKDATA+31, NG1+25
^PSDRUG("AQ" CHKDATA+13
^PSRX - [#52] CHKDATA+5, CHKDATA+6, CHKDATA+7, CHKDATA+16, CHKDATA+19, CHKDATA+22, CHKDATA+23, CHKDATA+24, CHKDATA+26, NOGO+5
, NG1, NG1+1, NG1+2, NG1+3, NG1+7, NG1+18, NG1+20, NG1+21, NG1+22, TSTSIG+1
, TSTSIG+2, MAILOK+2, ADDROK+2, CHKACT+4, CHKACT+5
^PSRX("B" NG1+12
^TMP($J NG1+38, TSTCHAR+2, TSTCHAR+3*, TSTCHAR+4*, TSTCHAR+5, ADDROK+4, ADDROK+7*, ADDROK+8*, ADDROK+12*, ADDROK+13*
, ADDROK+14*

Label References

Name Line Occurrences
$$MAILOK NG1+33
CHKACT NG1+40
NG1 NOGO+5
STOP CHKDATA+43
TSTCHAR TSTSIG+1, TSTSIG+2
TSTSIG NG1+6

Naked Globals

Name Field # of Occurrence
^(0 NG1+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% NG1+34!, NG1+42!
C TSTCHAR+1~, TSTCHAR+5*
CNTR NG1+12*, NG1+13, NG1+17!
COM NG1+34*, NG1+42*, CHKACT+1~, CHKACT+3*, CHKACT+5
DAYS NG1+1*, STOP!
DFN NG1+7*, NG1+38, MAILOK+1~, MAILOK+2*, ADDROK+1~, ADDROK+2*, ADDROK+4, ADDROK+7, ADDROK+8, ADDROK+12
, ADDROK+13, ADDROK+14
DRUG NG1+3*, NG1+24, NG1+25, STOP!
DRUGCHK CHKDATA+2!, CHKDATA+10*, CHKDATA+11, CHKDATA+12*, CHKDATA+14, STOP!
DT MAILOK+4
>> DTTM NG1+34*, NG1+42*
DUPFLG NG1+12*, NG1+15*, NG1+16, NG1+17!
DUPRX NG1+12*, NG1+14, NG1+15, NG1+17!
FDATE NG1+3*, NG1+32, STOP!
>> FILNUM CHKDATA+19*, CHKDATA+21, CHKDATA+23, CHKDATA+24, CHKDATA+26
I TSTCHAR+1~, TSTCHAR+3*, TSTCHAR+4*, TSTCHAR+5*
I1 NG1+15*, NG1+17!
I2 NG1+15*, NG1+17!
JJ CHKACT+1~, CHKACT+5*
L TSTSIG+2~*
PHARCLK NG1+2*, STOP!
PHARCLK1 STOP!
PHY NG1*, STOP!
PSOBADR ADDROK+9~, ADDROK+11*, ADDROK+12, ADDROK+13
PSOFORGN ADDROK+1~, ADDROK+6*, ADDROK+7
PSOMC MAILOK+1~, MAILOK+2*, MAILOK+3*, MAILOK+4
PSOMDT MAILOK+1~, MAILOK+2*, MAILOK+3*, MAILOK+4
>> PSOMSG CHKDATA+4*, PSOMSG
PSORX ADDROK+9~, ADDROK+10*, ADDROK+11
>> PSOSITE CHKDATA+28
PSREC NG1+15*, NG1+17!
>> PSSWSITE NG1+27*, NG1+28
PSTAT NG1+3*, NG1+31, STOP!
>> PSXCK CHKDATA+15*
>> PSXCS CHKDATA+37, CHKDATA+39
PSXCSC CHKDATA+30~, CHKDATA+31*, CHKDATA+33, CHKDATA+35
PSXCSD CHKDATA+30~, CHKDATA+35*
>> PSXCSRX CHKDATA+30*, CHKDATA+35*, CHKDATA+37, CHKDATA+39
PSXDGST CHKDATA+2!, CHKDATA+11*
>> PSXDIV CHKDATA+26*, CHKDATA+28
>> PSXDTRG NG1+15
>> PSXFIRST NG1+41, CHKACT+2*, CHKACT+5*
>> PSXOK CHKDATA+3*, CHKDATA+5*, CHKDATA+6*, CHKDATA+13*, CHKDATA+14*, CHKDATA+15*, CHKDATA+16*, CHKDATA+22*, CHKDATA+23*, CHKDATA+24*
, CHKDATA+25*, CHKDATA+28*, CHKDATA+33*, CHKDATA+37*, CHKDATA+39*, CHKDATA+43, NG1+35*, NG1+39*, PSOMSG+1*
>> PSXPTR CHKDATA+3*, CHKDATA+5, CHKDATA+6, CHKDATA+7, CHKDATA+16, CHKDATA+19, CHKDATA+23, CHKDATA+24, CHKDATA+26, NG1+18
, NG1+20, NG1+21, NG1+22, NG1+40
PSXRXERR CHKDATA+2!, NOGO+3*, NOGO+4*, NOGO+5*, NG1*, NG1+1*, NG1+2*, NG1+7*, NG1+9*, NG1+11*
, NG1+16*, NG1+23*, NG1+24*, NG1+29*, NG1+30*, NG1+31*, NG1+32*, NG1+41!, NG1+43*, PSOMSG*
, PSOMSG+1
PTRA CHKDATA+9*, CHKDATA+10, STOP!
PTRB CHKDATA+9*, CHKDATA+10, STOP!
QTY NOGO+5*, STOP!
>> REC CHKDATA+1, CHKDATA+3, CHKDATA+5, CHKDATA+25
>> REF CHKDATA+19*
REL CHKDATA+22*, STOP!
>> RF CHKACT+4*
RFCNT CHKACT+1~, CHKACT+4*, CHKACT+5
RXERR NOGO+3*, NOGO+4*, NOGO+5*, NG1*, NG1+1*, NG1+2*, NG1+7*, NG1+9*, NG1+11*, NG1+19*
, NG1+21*, NG1+22*, NG1+23, NG1+24*, NG1+29*, NG1+30*, NG1+31*, NG1+32*, NG1+43*, PSOMSG*
, STOP!
RXEX CHKDATA+7*, NOGO+3, NOGO+4, NG1+12, STOP!
>> RXF CHKDATA+21*, CHKDATA+22, NOGO+3, NOGO+5, NG1, NG1+1, NG1+2, NG1+21, NG1+22
RXN CHKDATA+3*, CHKDATA+4, CHKDATA+22, NOGO+5, NG1, NG1+1, NG1+2, NG1+3, NG1+7, NG1+33
, TSTSIG+1, TSTSIG+2, CHKACT~, CHKACT+4, CHKACT+5
RXNUM CHKDATA+7*, CHKDATA+8, CHKDATA+9, CHKDATA+13, CHKDATA+15, CHKDATA+31, STOP!
SIG NG1+5~*, NG1+30, STOP!, TSTSIG+1*, TSTSIG+2*, TSTCHAR+5*
TRX MAILOK~, MAILOK+2, MAILOK+3, ADDROK~, ADDROK+2, ADDROK+10
U CHKDATA+5, CHKDATA+9, CHKDATA+16, CHKDATA+22, CHKDATA+26, NOGO+5, NG1, NG1+1, NG1+2, NG1+3
, NG1+7
>> VA("PID" NG1+11
>> VADM(1 NG1+9
>> VAPA(1 NG1+7, STOP!
>> VAPA(11 NG1+7
>> VAPA(25 ADDROK+6
>> VAPA(4 NG1+7, STOP!
>> VAPA(5 NG1+7, STOP!
>> VAPA(6 NG1+7, STOP!
WARNS CHKDATA+2!, NG1+25*, NG1+29
XC NG1+12*, NG1+17!
>> XDFN CHKDATA+5
XX CHKACT+1~, CHKACT+5*
ZX CHKDATA+10*, CHKDATA+11, NG1+20*, NG1+21, NG1+22, STOP!

Marked Items

Name Field # of Occurrence
$T(CHKRX^PSOBAI ADDROK+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All