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

Package: PCE Patient Care Encounter

Routine: PXBGPRV


Information

PXBGPRV ;ISL/JVS,ESW - GATHER PROVIDERS ; 12/5/02 11:35am

Source Information

Source file <PXBGPRV.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 1 ($$GET,$$IEN2CODE)^XUA4A72  
PCE Patient Care Encounter 1 GETPRV^PXAPIOE  
VA Fileman 1 EN^DIQ1  

Caller Graph

Caller Graph Total: 20

Package Total Caller Graph
PCE Patient Care Encounter 20 PXAIPOV  PXAIPRV  PXBGPRV2  PXBGPRV3  PXBGPRV4  PXBMCPT  PXBMCPT2  PXBMPOV  
PXBMPRV  PXBPCPT1  PXBPL  PXBUTL  PXCEPRV  PXRRECSE  PXRRFDSE  PXRRPECU  
PXRRPRDP  PXRRPRSP  PXRRWLS2  PXRRWLSE  

Entry Points

Name Comments DBIA/ICR reference
A ;--Set array with PROVIDERS
AND
B ;--Add line numbers
SUB ;--SUBSPECIALITY
OCC ;---OCCUPATION
PRV(VISIT,PXBSKY,PXBKY,PXBSAM,PXBCNT,PRVDR,FPRI) ;--Gather the entries in the V PROVIDER file
FINISH ;--Finish up some variables
EXIT ;--set a providers count
OCCUP(IEN,DATE,CODE,RETURN,CLASSIEN) ;--FORMAT PERSON CLASS TO DISPLAY
; IEN = Provider pointer to file# 200
; DATE = Date of occurrence of service
; CODE = Person class Code (if already known)
; **(Required step) If you use code leave IEN and DATE Blank
; RETURN = (Required) Flag to decide what format you want the
; return value.
; CLASSIEN = Ien of entry in the PERSON CLASS file#8932.1 If the Ien
; was saved this parameter could be sent in instead of CODE.
;
; 1 = IEN^OCCUPATION^SPECIALITY^SUBSPECIALITY^STATUS^DATE INACTIVATED^VA CODE
; 2 = Short Description
; 3 = Short Description^VA CODE
; *** If only CODE and RETURN = 1 There is no value or other
; value in the STATUS and DATE INACTIVATED fields.
SPE ;--SPECIALITY

External References

Name Field # of Occurrence
EN^DIQ1 A+6
GETPRV^PXAPIOE PRV+29
$$GET^XUA4A72 A+12, OCCUP+33
$$IEN2CODE^XUA4A72 OCCUP+37

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVPRV("AD" PRV+28
^AUPNVSIT - [#9000010] A+11, A+12
^DD("DD" A+11
^TMP("PXBU" PRV+23!, A+2, A+3, A+20!
^USC(8932.1 - [#8932.1] OCCUP+39, OCCUP+40
^VA(200 - [#200] OCCUP+31

Label References

Name Line Occurrences
$$OCCUP A+9
AND AND+2

Naked Globals

Name Field # of Occurrence
^( A+4, A+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS OCCUP+23~, OCCUP+39*
CLASSIEN OCCUP~, OCCUP+26, OCCUP+27, OCCUP+37
CODE OCCUP~, OCCUP+26, OCCUP+27, OCCUP+37*, OCCUP+39
DA PRV+21~, A+6*, A+7
DATE A+10~, A+11*, A+13, OCCUP~, OCCUP+26, OCCUP+27, OCCUP+30, OCCUP+32, OCCUP+33, OCCUP+34
, OCCUP+39
DIC PRV+21~, A+6*
>> DIC1 A+6*, A+7
DIQ PRV+21~, A+6*
DIS OCCUP+23~, SUB+25*, SUB+26*, SUB+27*, SUB+28*, AND, AND+1*, AND+2, AND+9, AND+10
>> DISL SUB+24*
DR PRV+21~, A+6*, A+7
ENTRY OCCUP+23~, OCCUP+40*, OCC+1, OCC+2, SPE+1, SPE+2, SUB+1, SUB+2
FPRI PRV~, PRV+23!, PRV+25*, A+8*, FINISH+1*
GROUP PRV+20~, A+17*, A+19
I AND+1~*
IEN PRV+20~, A+3*, A+4, A+5, A+18, A+19, B+4*, B+5, B+6, B+7
, OCCUP~, OCCUP+25, OCCUP+26, OCCUP+27, OCCUP+31, OCCUP+32, OCCUP+33, OCCUP+34, OCCUP+39
OCC OCCUP+23~, OCC+2*, OCC+3*, OCC+4*, OCC+5*, OCC+6*, OCC+7*, OCC+8*, OCC+9*, SPE+15
, SUB+25, SUB+26, SUB+27, SUB+28
OCCL OCCUP+23~, OCC+1*, OCC+3, OCC+4, OCC+5, OCC+6, OCC+7, OCC+8, OCC+9, SUB+24
PRIMARY PRV+20~, A+4*, A+8, A+17, A+18
PROVIDER PRV+20~
PRV PRV+20~, PRV+23!, A+7*, A+17, A+18, A+19, B+2, B+3*, B+4, B+5
, B+6, B+7
PRV( A+19*, B+3, B+4, B+5, B+6, B+7!
PRVDR PRV~, PRV+24!
PRVDR("PRIMARY" A+18*
PRVI PRV+21~, A+5*, A+6, A+12, A+17, A+18
>> PRVN( A+7
PXBC PRV+20~, B+3*, B+4*, B+5, B+6, EXIT+1
PXBCNT PRV~, PRV+23!, EXIT+1*
PXBKY PRV~, PRV+23!
PXBKY( B+5*
PXBPRV PRV+23!
PXBSAM PRV~, PRV+23!
PXBSAM( B+5*
PXBSKY PRV~, PRV+23!
PXBSKY( B+6*
QUANTITY PRV+20~
RETURN OCCUP~, OCCUP+26, OCCUP+27, OCCUP+28, OCCUP+29, OCCUP+32, OCCUP+39, AND+9, AND+10
SPE OCCUP+23~, SPE+2*, SPE+3*, SPE+4*, SPE+5*, SPE+6*, SPE+7*, SPE+8*, SPE+9*, SPE+10*
, SPE+11*, SPE+12*, SPE+13*, SPE+14*, SPE+15*, SUB+3*, SUB+4*, SUB+5*, SUB+6*, SUB+7*
, SUB+8*, SUB+21*, SUB+25, SUB+26, SUB+27, SUB+28
>> SPEL SPE+1*, SPE+3, SPE+4, SPE+5, SPE+6, SPE+7, SPE+8, SPE+9, SPE+10, SPE+11
, SPE+12, SPE+13, SPE+14, SUB+21, SUB+24
SUB OCCUP+23~, SUB+2*, SUB+3, SUB+4, SUB+5, SUB+6, SUB+7, SUB+8, SUB+9*, SUB+10*
, SUB+11*, SUB+12*, SUB+13*, SUB+14*, SUB+15*, SUB+16*, SUB+17*, SUB+18*, SUB+19*, SUB+20*
, SUB+21, SUB+25, SUB+26, SUB+27, SUB+28
>> SUBL SUB+1*, SUB+24
TYPE PRV+21~, A+9*, A+12*, A+13*, A+14*, A+16*, A+17, OCCUP+23~, OCCUP+32, OCCUP+33*
, OCCUP+34, OCCUP+39*, OCCUP+40
>> TYPEI A+5*, A+9, A+12
U A+4, A+5, A+11, A+12, A+17, A+18, B+6, OCCUP+33, OCCUP+39, OCC+1
, OCC+2, SPE+1, SPE+2, SUB+1, SUB+2, AND+10
VACODE OCCUP+23~, OCCUP+33*, OCCUP+39*, AND+10
VAUGHN PRV+23!
VISIT PRV~, PRV+28, PRV+29, A+11, A+12
Y A+10~, A+11*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All