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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSSDSUTL

Package: Pharmacy Data Management

Routine: PSSDSUTL


Information

PSSDSUTL ;BIR/MV-Dose Check utility routine (continued) ;27 Oct 2009 12:22 PM

Source Information

Source file <PSSDSUTL.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 1 $$UP^XLFSTR  
National Drug File 1 $$PSJING^PSNAPIS  
Pharmacy Data Management 1 ($$UNIT,$$UNITD)^PSSDSAPI  

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: 6

Package Total Caller Graph
Pharmacy Data Management 6 PSSDSAPA  PSSDSAPD  PSSDSAPI  PSSDSAPM  PSSDSEXC  PSSHRQ23  

Entry Points

Name Comments DBIA/ICR reference
RANGE ;Evaluate free text dosages for range patterns
RANGEOK ;Retrieved all needed Dosing
MLTOK(PSSUTM1,PSSUTM3) ;If multi ingredient, and all ingredients in VA Product have a Unit and it matches the unit from the order
UPCPRS ;Update CPRS global
CFREQ ;Add customized Frequency
PEROR ;Per Orifice check
SADJ ;Parse out Adjusted Frequency message
PTH ;Local Dosage with parenthesis, extract data from before and within
RTEXT(PSSBAMRT,PSSBSPC) ;Set Reason Header
ORDFREQ(PSSDADF) ; -- in 2.1 get order frequency by converting FDB frequency patterns -- called from PSSHRQ23
ROUNDNUM(X) ; -- in 2.1 if number is < or = 1, round to 4 decimals otherwise no decimals -- called from PSSHRQ23
PRNSCHD(PSSSCHD) ;If 'PRN' appended to the schedule, return the schedule with 'PRN' remove
PRNMI(PSSMI) ;If 'PRN' appended to the Med instruction, return the MI with 'PRN' remove

External References

Name Field # of Occurrence
$$PSJING^PSNAPIS MLTOK+3
$$UNIT^PSSDSAPI RANGEOK+12, RANGEOK+13
$$UNITD^PSSDSAPI RANGEOK+4, RANGEOK+5, MLTOK+6
$$UP^XLFSTR RANGE+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(51 - [#51] PRNMI+3, PRNMI+7
^PS(51.1 - [#51.1] PRNSCHD+3, PRNSCHD+7, PRNSCHD+10
^TMP($J UPCPRS+1, UPCPRS+4!*, UPCPRS+9, UPCPRS+10, UPCPRS+11, UPCPRS+12, UPCPRS+13*, UPCPRS+14*, UPCPRS+16, UPCPRS+18*
UPCPRS+19, UPCPRS+20!, UPCPRS+21*, UPCPRS+23*, UPCPRS+27, UPCPRS+28, UPCPRS+29*, UPCPRS+30*, UPCPRS+42*, UPCPRS+43*
UPCPRS+45, UPCPRS+46, UPCPRS+48, UPCPRS+50*, UPCPRS+51*, UPCPRS+53, UPCPRS+54*, UPCPRS+55*, UPCPRS+57, UPCPRS+58*
UPCPRS+59, UPCPRS+60*, UPCPRS+62!, CFREQ+2*, CFREQ+3*

Label References

Name Line Occurrences
CFREQ UPCPRS+61
PEROR UPCPRS+46
RANGEOK RANGE+32, RANGE+33
SADJ UPCPRS+52

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA MLTOK+1~
N ROUNDNUM+4~, ROUNDNUM+10*, ROUNDNUM+12, ROUNDNUM+13*, ROUNDNUM+14
ND ROUNDNUM+4~, ROUNDNUM+8*, ROUNDNUM+13
PSSBAMRT RTEXT~, RTEXT+2
PSSBSPC RTEXT~, RTEXT+1
PSSBSPCS RTEXT+1~*, RTEXT+2
PSSCPBMR UPCPRS+2~, UPCPRS+39*, UPCPRS+40
PSSCPC5 UPCPRS+2~, UPCPRS+8*, UPCPRS+9, UPCPRS+10, UPCPRS+11, UPCPRS+12, UPCPRS+13, UPCPRS+14, UPCPRS+15, UPCPRS+16
UPCPRS+18, UPCPRS+19, UPCPRS+20, UPCPRS+21, UPCPRS+23, UPCPRS+26, UPCPRS+27, UPCPRS+28, UPCPRS+29, UPCPRS+30
UPCPRS+32, UPCPRS+34, UPCPRS+35, UPCPRS+36, UPCPRS+37, UPCPRS+38, UPCPRS+39, UPCPRS+40, UPCPRS+42, UPCPRS+43
UPCPRS+45, UPCPRS+46, UPCPRS+47, UPCPRS+48, UPCPRS+50, UPCPRS+51, UPCPRS+52, UPCPRS+53, UPCPRS+54, UPCPRS+55
UPCPRS+57, UPCPRS+58, UPCPRS+59, UPCPRS+60, UPCPRS+61, CFREQ+1, CFREQ+2, CFREQ+3, PEROR+2, SADJ+3
SADJ+4
PSSCPC6 UPCPRS+2~, UPCPRS+9*, UPCPRS+10, UPCPRS+11, UPCPRS+12, UPCPRS+27*, UPCPRS+28, UPCPRS+45*, UPCPRS+46, UPCPRS+48
UPCPRS+53, UPCPRS+57, UPCPRS+59
PSSCPC7 UPCPRS+2~, UPCPRS+46*, UPCPRS+47, UPCPRS+48, UPCPRS+50, UPCPRS+52, UPCPRS+53, UPCPRS+54, UPCPRS+57, UPCPRS+59
PSSCPC8 UPCPRS+2~, UPCPRS+48*, UPCPRS+53, UPCPRS+57, UPCPRS+59
PSSCPC9 UPCPRS+2~, UPCPRS+57*, UPCPRS+59
>> PSSCPCAA UPCPRS+56*, UPCPRS+60*
PSSCPCAC UPCPRS+2~, UPCPRS+45*, UPCPRS+53, SADJ+2*
PSSCPCAJ UPCPRS+2~, UPCPRS+45!
PSSCPCAJ( UPCPRS+52, UPCPRS+53, SADJ+3*, SADJ+4*
PSSCPCAR UPCPRS+2~
PSSCPCAR( UPCPRS+26*, UPCPRS+29, UPCPRS+30*, UPCPRS+42, UPCPRS+43*, UPCPRS+50, UPCPRS+51, UPCPRS+54, UPCPRS+55*, UPCPRS+58
UPCPRS+60*, CFREQ+2, CFREQ+3
PSSCPCE1 UPCPRS+2~, UPCPRS+10*, UPCPRS+14, UPCPRS+18, UPCPRS+21
PSSCPCE2 UPCPRS+2~, UPCPRS+11*, UPCPRS+14, UPCPRS+18, UPCPRS+21
PSSCPCG1 UPCPRS+2~, UPCPRS+35*, UPCPRS+36, UPCPRS+37!, UPCPRS+38*, UPCPRS+40
>> PSSCPCGL UPCPRS+5*, UPCPRS+9, UPCPRS+10, UPCPRS+11, UPCPRS+12, UPCPRS+16, UPCPRS+18, UPCPRS+19, UPCPRS+20, UPCPRS+21
UPCPRS+23, UPCPRS+27, UPCPRS+28, UPCPRS+45, UPCPRS+46, UPCPRS+48, UPCPRS+53, UPCPRS+57, UPCPRS+59, UPCPRS+62
PSSCPCGN UPCPRS+2~, UPCPRS+40*, UPCPRS+41*, UPCPRS+43
PSSCPCND UPCPRS+2~, UPCPRS+28*, UPCPRS+30, UPCPRS+53*, UPCPRS+55, UPCPRS+59*, UPCPRS+60
PSSCPCNM UPCPRS+2~, UPCPRS+9*, UPCPRS+13, UPCPRS+14, UPCPRS+26*, UPCPRS+29, UPCPRS+30, UPCPRS+42, UPCPRS+43, UPCPRS+46*
UPCPRS+50, UPCPRS+51, UPCPRS+54, UPCPRS+55, UPCPRS+58, UPCPRS+60, CFREQ+2, CFREQ+3
PSSCPCNN UPCPRS+2~, UPCPRS+52*, UPCPRS+54, UPCPRS+55, UPCPRS+56*, UPCPRS+58
PSSCPCNX UPCPRS+2~
PSSCPCO1 UPCPRS+2~
PSSCPCO2 UPCPRS+2~, UPCPRS+45*, UPCPRS+49, UPCPRS+51, PEROR+3*
PSSCPCO3 UPCPRS+2~, UPCPRS+45*, UPCPRS+52, UPCPRS+56, PEROR+3*
PSSCPCO9 PEROR+1~, PEROR+2*, PEROR+3
PSSCPCR1 UPCPRS+2~, UPCPRS+9*, UPCPRS+16, UPCPRS+17*
PSSCPCR2 UPCPRS+2~, UPCPRS+9*, UPCPRS+18*
PSSCPCR3 UPCPRS+3~, UPCPRS+19!
PSSCPCR3( UPCPRS+20*, UPCPRS+22, UPCPRS+23
PSSCPCR3("" UPCPRS+22
PSSCPCR4 UPCPRS+3~, UPCPRS+19*, UPCPRS+20
PSSCPCR5 UPCPRS+3~, UPCPRS+9*, UPCPRS+19, UPCPRS+21*, UPCPRS+23*
PSSCPCR6 UPCPRS+3~, UPCPRS+22*, UPCPRS+23
PSSCPCWA UPCPRS+2~, UPCPRS+8*, UPCPRS+12*, UPCPRS+25
PSSCPGL UPCPRS+2~
PSSDADF ORDFREQ~, ORDFREQ+7, ORDFREQ+9, ORDFREQ+11, ORDFREQ+13, ORDFREQ+15, ORDFREQ+19, ORDFREQ+23
PSSDADL ORDFREQ+5~, ORDFREQ+13*, ORDFREQ+23
PSSDADN ORDFREQ+5~, ORDFREQ+19*, ORDFREQ+21, ORDFREQ+25, ORDFREQ+27, ORDFREQ+29, ORDFREQ+31, ORDFREQ+33, ORDFREQ+35, ORDFREQ+37
PSSDADS ORDFREQ+5~, ORDFREQ+15*, ORDFREQ+17, ORDFREQ+25, ORDFREQ+27, ORDFREQ+29, ORDFREQ+31, ORDFREQ+33, ORDFREQ+35, ORDFREQ+37
PSSDADTM ORDFREQ+5~, ORDFREQ+23*, ORDFREQ+25, ORDFREQ+27, ORDFREQ+29, ORDFREQ+31, ORDFREQ+33, ORDFREQ+35, ORDFREQ+37
>> PSSDBADJ( UPCPRS+52, SADJ+3, SADJ+4
>> PSSDBAR("AMN" RANGEOK+7*, RANGEOK+9*, RANGEOK+11*, RANGEOK+15*, RANGEOK+17*, RANGEOK+19*
>> PSSDBAR("UNIT" RANGEOK+7*, RANGEOK+9*, RANGEOK+11*, RANGEOK+15*, RANGEOK+17*, RANGEOK+19*, MLTOK+7
>> PSSDBASE CFREQ+3
>> PSSDBASF UPCPRS+1, UPCPRS+4, UPCPRS+13, UPCPRS+14, UPCPRS+29, UPCPRS+30, UPCPRS+42, UPCPRS+43, UPCPRS+50, UPCPRS+51
UPCPRS+54, UPCPRS+55, UPCPRS+58, UPCPRS+60, CFREQ+2, CFREQ+3
>> PSSDBCAR( UPCPRS+8, UPCPRS+12*, UPCPRS+15, UPCPRS+26, UPCPRS+32, UPCPRS+34, UPCPRS+35, UPCPRS+36, UPCPRS+37, UPCPRS+38
UPCPRS+39, UPCPRS+40, UPCPRS+47, UPCPRS+61, CFREQ+1, CFREQ+3, PEROR+2, RTEXT+2
>> PSSDBFAL RANGEOK+7*, RANGEOK+9*, RANGEOK+11*, RANGEOK+15*, RANGEOK+17*, RANGEOK+19*
>> PSSDBIFL RANGEOK+3
>> PSSDSDPL( UPCPRS+34, UPCPRS+39
PSSDSLC1 PTH+2!
PSSDSLC1(1 PTH+18*, PTH+19*
PSSDSLC1(2 PTH+11*, PTH+18!
>> PSSDSLCL RANGE+2, PTH+2
>> PSSDSLCT PTH+11*, PTH+17, PTH+18*, PTH+19*
>> PSSDWRSN RTEXT+2*
>> PSSENHK( UPCPRS+32
>> PSSENHKZ( UPCPRS+32
PSSMI PRNMI~, PRNMI+2, PRNMI+3, PRNMI+4, PRNMI+5, PRNMI+6, PRNMI+7*, PRNMI+8
PSSPTH1 PTH+1~, PTH+2*, PTH+6*, PTH+10, PTH+11, PTH+12, PTH+17, PTH+19
PSSPTH2 PTH+1~, PTH+2*, PTH+7*, PTH+10, PTH+17, PTH+19
PSSPTH3 PTH+1~, PTH+2*, PTH+6*, PTH+9
PSSPTH4 PTH+1~, PTH+2*, PTH+7*, PTH+9
PSSPTHA PTH+1~, PTH+4*, PTH+6, PTH+7
PSSPTHC PTH+1~, PTH+4*, PTH+5, PTH+6
PSSPTHD PTH+1~, PTH+2*, PTH+3, PTH+4, PTH+12, PTH+19
PSSPTHF PTH+1~, PTH+2*, PTH+4, PTH+6*, PTH+7*, PTH+8
PSSPTHL PTH+1~, PTH+3*, PTH+4
PSSPTHS1 PTH+1~, PTH+11*, PTH+12*, PTH+13, PTH+15*, PTH+16*
PSSPTHS2 PTH+1~, PTH+12*, PTH+13, PTH+14
PSSPTHS3 PTH+1~, PTH+13*
PSSPTHS4 PTH+1~, PTH+12*, PTH+13*, PTH+14, PTH+15, PTH+16
PSSRG1 RANGE+1~, RANGE+5*, RANGE+31*, RANGE+32
PSSRG2 RANGE+1~, RANGE+2*, RANGE+5*, RANGE+6, RANGE+11*, RANGE+12, RANGE+13, RANGE+15*, RANGE+16, RANGE+18*
RANGE+21, RANGE+22, RANGE+26*, RANGE+27, RANGE+33*
PSSRG3 RANGE+1~, RANGE+11*, RANGE+15*, RANGE+18*, RANGE+19, RANGE+26*
PSSRG4 RANGE+1~, RANGE+11*, RANGE+18*, RANGE+19
PSSRG5 RANGE+1~, RANGE+15*, RANGE+18*, RANGE+19*, RANGE+20, RANGE+21, RANGE+22, RANGE+26*
PSSRG6 RANGE+1~, RANGE+19*, RANGE+29, RANGE+30*, RANGE+31, RANGE+32, RANGE+33
PSSRGAR RANGE+1~, RANGE+14*, RANGE+25*
PSSRGDOS RANGE+1~, RANGE+2*, RANGE+3*, RANGE+4, RANGE+5, RANGE+7*, RANGE+9, RANGE+10, RANGE+11, RANGE+13*
RANGE+18, RANGE+21, RANGE+22, RANGE+29*, RANGE+30, RANGE+31, RANGE+32, RANGE+33
PSSRGLT RANGE+1~, RANGE+4*, RANGE+5
PSSRGNM1 RANGE+1~, RANGE+13*, RANGE+14, RANGE+15, RANGE+17*, RANGEOK+2
PSSRGNM2 RANGE+1~, RANGE+21*, RANGE+22*, RANGE+23, RANGE+24, RANGE+25, RANGE+26, RANGE+28*, RANGEOK+2, RANGEOK+7
RANGEOK+9, RANGEOK+11, RANGEOK+15, RANGEOK+17, RANGEOK+19
PSSRGUN1 RANGE+1~, RANGE+32*, RANGE+33*, RANGEOK+4, RANGEOK+6, RANGEOK+8, RANGEOK+12, RANGEOK+14, RANGEOK+16
PSSRGUN2 RANGE+1~, RANGE+21*, RANGEOK+5, RANGEOK+6, RANGEOK+10, RANGEOK+13, RANGEOK+14, RANGEOK+18
PSSRGUNA RANGEOK+1~, RANGEOK+4*, RANGEOK+7, RANGEOK+11, RANGEOK+12*, RANGEOK+15, RANGEOK+19
PSSRGUNB RANGEOK+1~, RANGEOK+5*, RANGEOK+7, RANGEOK+9, RANGEOK+13*, RANGEOK+15, RANGEOK+17
PSSSCHD PRNSCHD~, PRNSCHD+2, PRNSCHD+3, PRNSCHD+4, PRNSCHD+5, PRNSCHD+6, PRNSCHD+7*, PRNSCHD+8, PRNSCHD+9, PRNSCHD+10*
, PRNSCHD+11
PSSSDADJ SADJ+1~, SADJ+3*, SADJ+4
PSSUTM1 MLTOK~, MLTOK+3
PSSUTM3 MLTOK~, MLTOK+3
PSSUTMAR MLTOK+1~, MLTOK+3
PSSUTMAR( MLTOK+4, MLTOK+5
PSSUTMCT MLTOK+1~, MLTOK+3*
PSSUTMLP MLTOK+1~, MLTOK+4*, MLTOK+5
PSSUTMQT MLTOK+1~, MLTOK+2*, MLTOK+4, MLTOK+5*, MLTOK+6*, MLTOK+7*, MLTOK+8
PSSUTMUX MLTOK+1~, MLTOK+5*, MLTOK+6
PSSUTMUZ MLTOK+1~, MLTOK+6*, MLTOK+7
PSSXL PRNSCHD+1~, PRNSCHD+4*, PRNSCHD+5, PRNSCHD+6, PRNSCHD+8, PRNSCHD+9, PRNMI+1~, PRNMI+4*, PRNMI+5, PRNMI+6
PSSXMI PRNMI+1~, PRNMI+6*, PRNMI+7
PSSXSCHD PRNSCHD+1~, PRNSCHD+6*, PRNSCHD+7, PRNSCHD+9*, PRNSCHD+10
PSSXSCHN PRNSCHD+1~, PRNSCHD+10*
U PRNSCHD+10
X ROUNDNUM~, ROUNDNUM+6, ROUNDNUM+8, ROUNDNUM+10, ROUNDNUM+12, ROUNDNUM+13, ROUNDNUM+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All