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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSUCS3

Package: Pharmacy Benefits Management

Routine: PSUCS3


Information

PSUCS3 ;BIR/DJE,DJM - GENERATE PSU CS RECORDS (TYPE 17) ;25 AUG 1998

;;4.0;PHARMACY BENEFITS MANAGEMENT;;MARCH, 2005

Source Information

Source file <PSUCS3.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Pharmacy Benefits Management 2 (FORMIND,GNAME,LOCTYP,NDC,NFIND,VDC,VPNAME)^PSUCS4  $$VALI^PSUTL  
Registration 1 PID^VADPT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Benefits Management 1 PSUCS1  

Entry Points

Name Comments DBIA/ICR reference
MULTCHK ;
; store in array (quit if already administered)
DUNIT ;Dispense Unit
UNITC ;Unit Cost
QTY17 ;For transactions with a dispensing type =17, total the number of doses
FACILTY ;
TYP17 ; Processing the transaction for dispensing type 17
SSN ;Field # 58.81,73 [PATIENT] Points to File # 2

External References

Name Field # of Occurrence
FORMIND^PSUCS4 TYP17+19
GNAME^PSUCS4 TYP17+11
LOCTYP^PSUCS4 TYP17+11
NDC^PSUCS4 TYP17+19
NFIND^PSUCS4 TYP17+19
VDC^PSUCS4 TYP17+26
VPNAME^PSUCS4 TYP17+26
$$VALI^PSUTL MULTCHK+3, FACILTY+2, FACILTY+8, FACILTY+13, FACILTY+16, DUNIT+2, UNITC+2, QTY17+8
PID^VADPT SSN+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] FACILTY+4
^XTMP( MULTCHK+5, MULTCHK+6, MULTCHK+11*, MULTCHK+12*, QTY17+9, QTY17+10*

Label References

Name Line Occurrences
DUNIT TYP17+23
FACILTY TYP17+4
MULTCHK TYP17+16
QTY17 TYP17+23
SSN TYP17+8
UNITC TYP17+23

Naked Globals

Name Field # of Occurrence
^("QT" MULTCHK+7*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN SSN+3*
>> OLDXTMP QTY17+9*, QTY17+10
>> PSUCSJB MULTCHK+5, MULTCHK+6, MULTCHK+11, MULTCHK+12, QTY17+9, QTY17+10
>> PSUDIV( FACILTY+13*, FACILTY+16
>> PSUDRG(4 MULTCHK+5, MULTCHK+6, MULTCHK+11, MULTCHK+12, DUNIT+2, UNITC+2, QTY17+9, QTY17+10
>> PSUDUN( DUNIT+2*, DUNIT+3
>> PSUFCN(1 FACILTY+16*, FACILTY+17
>> PSUIENDA MULTCHK+3, MULTCHK+11, QTY17+8
>> PSULOC MULTCHK+5, MULTCHK+6, MULTCHK+11, MULTCHK+12, QTY17+9, QTY17+10
>> PSULTP(1 TYP17+13
>> PSUMCHK MULTCHK+2*
>> PSUPDU(16 UNITC+2*
>> PSUPIEN(73 MULTCHK+5, MULTCHK+6, MULTCHK+11, MULTCHK+12, FACILTY+2, SSN+2, SSN+3, QTY17+9, QTY17+10
>> PSUQT(5 MULTCHK+3*, MULTCHK+7, MULTCHK+12
>> PSURI FACILTY+18*
>> PSUSSN( SSN+4*
>> PSUTQ(5 QTY17+8*, QTY17+10
>> PSUWARD(1 FACILTY+8*, FACILTY+13
>> PSUWLC( FACILTY+2*, FACILTY+3, FACILTY+4*, FACILTY+5, FACILTY+8
>> SENDER FACILTY+17*
>> UNIT DUNIT+3*
>> VA("PID" SSN+4
>> X MULTCHK+6*, MULTCHK+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All