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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: PXBAPI1

Package: PCE Patient Care Encounter

Routine: PXBAPI1


Information

PXBAPI1 ;ISL/JVS,DEE - PCE's API - interview questions ;Aug 04, 2025@08:38:06

Source Information

Source file <PXBAPI1.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
PCE Patient Care Encounter 11 $$DELVFILE^PXAPIDEL  CHIKOUT^PXBAPI2  CLASS^PXBAPI21  CPT^PXBMCPT  POV^PXBMPOV  PRV^PXBMPRV  STP^PXBMSTP  ($$ASC,$$DISPLAY,$$GETEOC,VISIT)^PXCOMPACT  
EN1^PXKMAIN  ($$GETCODE,GETSAFORVISITDET,SETOLD800)^PXSPECAUTH  $$DISPOSIT^PXUTL1  
Scheduling 3 ($$DATE,DATE)^SCDXUTL  $$ELAP^SDPCE  $$CLNCK^SDUTL2  
Registration 1 $$ELIG^DGCOMPACTELIG  
VA FileMan 1 ^DIR  

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
PCE Patient Care Encounter 2 PXAPIEED  PXBAPI  

Entry Points

Name Comments DBIA/ICR reference
PROCESS(PXBEXIT) ;
1
3
2
ADDEDIT ;
ADDEDIT1 ;
ADDEDIT2 ;
ADDEDIT3 ;added PX*1.0*182
ADQ(PXBEXIT) ;Ask the Administration questions
ASKPAT() ;Ask user for a patient
ASKHL() ;Ask user for a Hospital Location
ASKHL2 ;DIC on file 44
ASKDT() ;Ask user for the encounter Date/Time
CODT(PXBEXIT) ;Ask the user the Check out Date/Time
SCC(PXBEXIT) ;Ask the user the Service connected conditions
VISIT(PXBEXIT) ;Create or edit the Visit
CPT(PXBEXIT) ;Ask the user Providers and CTPs
POV(PXBEXIT) ;Ask the user Diagnoses
PRV(PXBEXIT) ;Ask the user Providers
STP(PXBEXIT) ;Ask the user Stop Codes

External References

Name Field # of Occurrence
$$ELIG^DGCOMPACTELIG CODT+13
^DIR ADDEDIT2+8, ADDEDIT3+7, ASKPAT+5, ASKHL2+11, ASKDT+5, CODT+24
$$DELVFILE^PXAPIDEL ADDEDIT2+11, ADDEDIT3+9
CHIKOUT^PXBAPI2 CODT+2
CLASS^PXBAPI21 SCC+9
CPT^PXBMCPT CPT+1
POV^PXBMPOV POV+1
PRV^PXBMPRV PRV+1
STP^PXBMSTP STP+2
$$ASC^PXCOMPACT CODT+20
$$DISPLAY^PXCOMPACT CODT+16
$$GETEOC^PXCOMPACT 2+35
VISIT^PXCOMPACT 2+35
EN1^PXKMAIN VISIT+34
$$GETCODE^PXSPECAUTH VISIT+29
GETSAFORVISITDET^PXSPECAUTH VISIT+8
SETOLD800^PXSPECAUTH VISIT+31
$$DISPOSIT^PXUTL1 2+2, CODT+11
$$DATE^SCDXUTL STP+1
DATE^SCDXUTL STP+1
$$ELAP^SDPCE ADQ+8
$$CLNCK^SDUTL2 ASKHL2+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Procedure ""INTV^PXAPI"" was called incorrectly, contact IRM."
  • Line Location: 2+32
Function Call: WRITE
  • Prompt: !!
  • Line Location: ADDEDIT2+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: ADDEDIT3+2
Function Call: WRITE
  • Prompt: !,$C(7)
  • Line Location: ASKHL2+13
Function Call: WRITE
  • Prompt: !!,"COMPACT Act Administrative Eligibility: ",ELIG
  • Line Location: CODT+14
Function Call: WRITE
  • Prompt: !,$P(DATA,"^",1),": ",$P(DATA,"^",2)," ",$P(DATA,"^",3),": ",$P(DATA,"^",4)
  • Line Location: CODT+17
Function Call: WRITE
  • Prompt: !
  • Line Location: CODT+24
Routine Call
  • DIR
  • Line Location:
    • ADDEDIT2+8
    • ADDEDIT3+7
    • ASKPAT+5
    • ASKHL2+11
    • ASKDT+5
    • CODT+24

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVCPT("AD" ADDEDIT1+12, ADDEDIT2+1
^AUPNVSIT - [#9000010] 2+1, 2+2, ADDEDIT2+12, CODT+11, VISIT+5, STP+1
^AUPNVSIT("AD" ADDEDIT2+1
^DPT - [#2] ADQ+6
^SC - [#44] VISIT+14
^TMP("PXCOMPACT" 2+35, 2+36!, CODT+18!, CODT+25*
^TMP("PXK" VISIT+2!, VISIT+6*, VISIT+9*, VISIT+10*, VISIT+25*, VISIT+26*, VISIT+31*, VISIT+32*, VISIT+33*, VISIT+35

Label References

Name Line Occurrences
$$ASKDT ADQ+5
$$ASKHL ADQ+4, ADQ+9
$$ASKPAT ADQ+3
ADDEDIT 2+4
ADDEDIT1 ADDEDIT2+1
ADDEDIT2 ADDEDIT1+2, ADDEDIT1+4, ADDEDIT1+6, ADDEDIT1+11
ADDEDIT3 ADDEDIT1+12
ADQ PROCESS+4, 2+7, ADDEDIT1+1
ASKHL2 ASKHL2+15
CODT 2+10, ADQ+10
CPT 2, 2+25, ADDEDIT1+10
POV 3, 2+28, ADDEDIT1+5
PRV 1, 2+22, ADDEDIT1+3
SCC 2+16, ADQ+11
STP 2+2, 2+31
VISIT 2+12, 2+18, ADQ+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CODE VISIT+3~, VISIT+29*, VISIT+30
DA ASKPAT+2~, ASKHL2+1~, ASKDT+1~
DATA CODT+1~, CODT+16*, CODT+17
DIC ASKPAT+2~, ASKHL2+1~
DIR ADDEDIT2+2~, ADDEDIT3+1~, ASKPAT+2~, ASKHL2+1~, ASKDT+1~, CODT+21~
DIR("?" ASKDT+4*, CODT+23*
DIR("A" ADDEDIT2+5*, ADDEDIT2+6*, ADDEDIT3+4*, ADDEDIT3+5*, ASKPAT+4*, ASKHL2+3*, ASKDT+3*, CODT+22*
DIR("B" ADDEDIT2+7*, ADDEDIT3+6*
DIR("S" ASKHL2+7*, ASKHL2+10*
DIR(0 ADDEDIT2+4*, ADDEDIT3+3*, ASKPAT+3*, ASKHL2+2*, ASKDT+2*, CODT+22*
DIRUT CODT+21~, CODT+24
DT ASKDT+2
ELIG CODT+13~*, CODT+14, CODT+15
IDX VISIT+3~, VISIT+27*, VISIT+28
NODE VISIT+3~, VISIT+28*, VISIT+29, VISIT+30
OLD800 VISIT+3~, VISIT+8, VISIT+10
OLD900 VISIT+3~, VISIT+8, VISIT+9
PIECE VISIT+3~
PRVDR CPT+1!, POV+1!, PRV+1!, STP+2!
>> PXALHLOC ASKHL2+7
PXANS ADDEDIT+1~, ADDEDIT2+1, ADDEDIT2+9*, ADDEDIT2+10
>> PXB900 SCC+10*, VISIT+21
PXBAFTER VISIT+3~
PXBAFTER( VISIT+5*, VISIT+6, VISIT+25
PXBAFTER(0 VISIT+12*, VISIT+13*, VISIT+14*, VISIT+15*, VISIT+19*, VISIT+20*, VISIT+23*
PXBAFTER(150 VISIT+16*
PXBAFTER(812 VISIT+17*, VISIT+18*
PXBAFTER(900 VISIT+21*, VISIT+26, VISIT+27, VISIT+28
>> PXBAPPT ADQ+5, ADQ+6, VISIT+15
PXBCLASS SCC+1~
>> PXBCODT CODT+3*, CODT+4*, VISIT+19
PXBDATA SCC+1~, SCC+10
PXBEXIT PROCESS~, PROCESS+4, 1, 3, 2, 2+1*, 2+2, 2+7, 2+10, 2+11
, 2+12, 2+13*, 2+16, 2+17, 2+18, 2+19*, 2+22, 2+25, 2+28, 2+31
, 2+32*, ADDEDIT1+1, ADDEDIT1+2, ADDEDIT1+3, ADDEDIT1+4, ADDEDIT1+5, ADDEDIT1+6, ADDEDIT1+10, ADDEDIT1+11, ADDEDIT2+1*
, ADDEDIT2+11*, ADQ~, ADQ+3*, ADQ+4*, ADQ+5*, ADQ+9*, ADQ+10, ADQ+11, ADQ+12, ADQ+13
, ADQ+14*, CODT~, CODT+10*, CODT+11*, SCC~, VISIT~, CPT~, POV~, PRV~, STP~
>> PXBHLOC ADQ+4*, ADQ+6, ADQ+8, ADQ+9*, CODT+2, SCC+9, VISIT+14, VISIT+20
PXBNODE VISIT+3~, VISIT+4*, VISIT+5, VISIT+6, VISIT+24*, VISIT+25
PXBOUTEN SCC+1~, SCC+2*, SCC+9
>> PXBPAT 2+2, 2+35, ADQ+3*, ADQ+6, ADQ+8, CODT+2, CODT+11, CODT+13, CODT+16, CODT+20
, SCC+9, VISIT+13
>> PXBPKG VISIT+17
PXBREQ PROCESS+1~
>> PXBSOURC VISIT+18, VISIT+33
>> PXBVST 2+1, 2+2, 2+13, 2+19, 2+35, ADDEDIT1+12, ADDEDIT2+1, ADDEDIT2+11, ADDEDIT2+12*, ADDEDIT3+9*
, ADQ+1, ADQ+14, CODT+11, SCC+9, VISIT+5, VISIT+7, VISIT+8, VISIT+11, VISIT+32, VISIT+35*
, CPT+1, POV+1, PRV+1, STP+1, STP+2
>> PXBVSTDT ADQ+5*, ADQ+6, CODT+2, SCC+9, VISIT+12
PXCECAT 2+16*!, ADQ+11*!
PXCHKOUT CODT+1~, CODT+3, CODT+4, CODT+10
PXDOD SCC+1~, SCC+2*
>> PXELAP ADQ+8*, VISIT+22, VISIT+23
PXKERROR VISIT+3~
>> PXLIMDT ASKDT+2
PXRES ASKHL2+1~, ASKHL2+15*
SAS VISIT+3~, VISIT+31
SAS( VISIT+30*
TEMP VISIT+3~, VISIT+31*
U VISIT+29, VISIT+30
>> WHAT PROCESS+2, 2+3, 2+5, 2+8, 2+14, 2+20, 2+23, 2+26, 2+29, ADQ+11
, CODT+10
X ADDEDIT2+2~, ADDEDIT3+1~, ASKPAT+2~, ASKHL2+1~, ASKDT+1~
Y ADDEDIT2+2~, ADDEDIT2+9, ADDEDIT3+1~, ADDEDIT3+8, ASKPAT+2~, ASKPAT+6, ASKHL2+1~, ASKHL2+15, ASKHL2+17, ASKDT+1~
, ASKDT+6, CODT+21~, CODT+24*, CODT+25

Marked Items

Name Field # of Occurrence
$T(DATE^SCDXUTL STP+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All