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 ;MAR 1,2002@13:13:34

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+32, NG1+40
$$BADADR^DGUTL3 NG1+5
$$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+32, NG1+40
DELETE^PSXRPPL NG1+33
UNMARK^PSXUTL CHKDATA+15
ADD^VADPT NG1+5, ADDROK+5
DEM^VADPT NG1+6

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+13
^PS(55 - [#55] MAILOK+2
^PS(59.7 - [#59.7] NG1+25, NG1+26
^PSDRUG - [#50] CHKDATA+8, CHKDATA+9, CHKDATA+15, CHKDATA+31, NG1+23
^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+5, NG1+16, NG1+18, NG1+19, NG1+20, TSTSIG+1
, TSTSIG+2, MAILOK+2, ADDROK+2, CHKACT+4, CHKACT+5
^PSRX("B" NG1+10
^TMP($J NG1+36, 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+31
CHKACT NG1+38
NG1 NOGO+5
STOP CHKDATA+43
TSTCHAR TSTSIG+1, TSTSIG+2
TSTSIG NG1+4

Naked Globals

Name Field # of Occurrence
^(0 NG1+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% NG1+32!, NG1+40!
C TSTCHAR+1~, TSTCHAR+5*
CNTR NG1+10*, NG1+11, NG1+15!
COM NG1+32*, NG1+40*, CHKACT+1~, CHKACT+3*, CHKACT+5
DAYS NG1+1*, STOP!
DFN NG1+5*, NG1+36, MAILOK+1~, MAILOK+2*, ADDROK+1~, ADDROK+2*, ADDROK+4, ADDROK+7, ADDROK+8, ADDROK+12
, ADDROK+13, ADDROK+14
DRUG NG1+3*, NG1+22, NG1+23, STOP!
DRUGCHK CHKDATA+2!, CHKDATA+10*, CHKDATA+11, CHKDATA+12*, CHKDATA+14, STOP!
DT MAILOK+4
>> DTTM NG1+32*, NG1+40*
DUPFLG NG1+10*, NG1+13*, NG1+14, NG1+15!
DUPRX NG1+10*, NG1+12, NG1+13, NG1+15!
FDATE NG1+3*, NG1+30, STOP!
>> FILNUM CHKDATA+19*, CHKDATA+21, CHKDATA+23, CHKDATA+24, CHKDATA+26
I TSTCHAR+1~, TSTCHAR+3*, TSTCHAR+4*, TSTCHAR+5*
I1 NG1+13*, NG1+15!
I2 NG1+13*, NG1+15!
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+13*, NG1+15!
>> PSSWSITE NG1+25*, NG1+26
PSTAT NG1+3*, NG1+29, 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+13
>> PSXFIRST NG1+39, 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+33*, NG1+37*, PSOMSG+1*
>> PSXPTR CHKDATA+3*, CHKDATA+5, CHKDATA+6, CHKDATA+7, CHKDATA+16, CHKDATA+19, CHKDATA+23, CHKDATA+24, CHKDATA+26, NG1+16
, NG1+18, NG1+19, NG1+20, NG1+38
PSXRXERR CHKDATA+2!, NOGO+3*, NOGO+4*, NOGO+5*, NG1*, NG1+1*, NG1+2*, NG1+5*, NG1+7*, NG1+9*
, NG1+14*, NG1+21*, NG1+22*, NG1+27*, NG1+28*, NG1+29*, NG1+30*, NG1+39!, NG1+41*, 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+5*, NG1+7*, NG1+9*, NG1+17*
, NG1+19*, NG1+20*, NG1+21, NG1+22*, NG1+27*, NG1+28*, NG1+29*, NG1+30*, NG1+41*, PSOMSG*
, STOP!
RXEX CHKDATA+7*, NOGO+3, NOGO+4, NG1+10, STOP!
>> RXF CHKDATA+21*, CHKDATA+22, NOGO+3, NOGO+5, NG1, NG1+1, NG1+2, NG1+19, NG1+20
RXN CHKDATA+3*, CHKDATA+4, CHKDATA+22, NOGO+5, NG1, NG1+1, NG1+2, NG1+3, NG1+5, NG1+31
, 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+28, 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+5
>> VA("PID" NG1+9
>> VADM(1 NG1+7
>> VAPA(1 NG1+5, STOP!
>> VAPA(11 NG1+5
>> VAPA(25 ADDROK+6
>> VAPA(4 NG1+5, STOP!
>> VAPA(5 NG1+5, STOP!
>> VAPA(6 NG1+5, STOP!
WARNS CHKDATA+2!, NG1+23*, NG1+27
XC NG1+10*, NG1+15!
>> XDFN CHKDATA+5
XX CHKACT+1~, CHKACT+5*
ZX CHKDATA+10*, CHKDATA+11, NG1+18*, NG1+19, NG1+20, 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