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

Package: DSS Extracts

Routine: ECXPRO1


Information

ECXPRO1 ;ALB/GTS - Prosthetics Extract for DSS (Continued) ;2/27/19 15:47

Source Information

Source file <ECXPRO1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
DSS Extracts 2 ECXMISLN^ECXPRO2  $$CPT^ECXUTL3  
VA FileMan 2 $$GET1^DIQ  EN^DIQ1  
Kernel 1 $$RJ^XLFSTR  

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

Package Total Caller Graph
DSS Extracts 3 ECXPRO  ECXPROCT  ECXUPRO1  

Entry Points

Name Comments DBIA/ICR reference
NTEG(ECXDFN,ECXLNE,ECXPIEN,ECXN0,ECXNLB,ECINST,ECXFORM) ;** Check for required fields
; Input
; ECXDFN - ien in file #2
; ECXLNE - line number variable (passed by reference)
; ECXPIEN - IEN for the Prosthetics record
; ECXN0 - zero node of the Prosthetics record
; ECXNLB - LB node of the Prosthetics record
; ECINST - station number being extracted
; ECXFORM - Form Requested On
; Output (to be KILLed by calling routine)
; ^TMP("ECX-PRO EXC",$J) - Array for the exception message
; ECXLNE - The number of the next line in the msg
; ECXSTAT2 - Patient Station Number
; ECXDATE - Delivery Date of Prosthesis
; ECXTYPE - Type of Transaction work performed
; ECXSRCE - Source of prosthesis
; ECXHCPCS - CPT/HCPCS code for prosthesis
; ECXRQST - Requesting Station
; ECXRCST - Receiving Station
; ECXPHCPC - PSAS HCPCS code; if 'unknown', then use CPT/HCPCS code
; ECXNPPDC - NPPD code for repairs or new issues
; Output (KILLed by NTEG)
; ECXMISS - 1 indicates missing information
; ECXGOOD - 0 indicates record should not be extracted
CHK ;*Check variables
; Input
; Variables set in and Output from NTEG^ECXPRO1
; Output
; ^TMP("ECX-PRO EXC",$J, - Global of records with integrity problems
PROSINFO(ECXDA,ECXLB,ECX0,ECXFORM) ;*Get Prosthetics Information

External References

Name Field # of Occurrence
$$GET1^DIQ NTEG+45, NTEG+46
EN^DIQ1 NTEG+30, NTEG+55, NTEG+66
ECXMISLN^ECXPRO2 CHK+32
$$CPT^ECXUTL3 NTEG+41
$$RJ^XLFSTR PROSINFO+26

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] Classic Fileman Calls
^RMPR(661.1 - [#661.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ICPT - [#81] NTEG+40
^RMPR(660 - [#660] NTEG+36, NTEG+43, PROSINFO+21, PROSINFO+27
^RMPR(661.1 - [#661.1] NTEG+47

Label References

Name Line Occurrences
CHK NTEG+70

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA NTEG+29*, NTEG+30!, NTEG+54*, NTEG+55!, NTEG+65*, NTEG+66!
DIC NTEG+29*, NTEG+30!, NTEG+54*, NTEG+55!, NTEG+65*, NTEG+66!
DIQ NTEG+29*, NTEG+30!, NTEG+54*, NTEG+55!, NTEG+65*, NTEG+66!
DIQ(0 NTEG+29*, NTEG+54*, NTEG+65*
DR NTEG+29*, NTEG+30!, NTEG+54*, NTEG+55!, NTEG+65*, NTEG+66!
ECINST NTEG~, NTEG+31
ECX0 PROSINFO~, PROSINFO+22, PROSINFO+27
>> ECXBILST PROSINFO+21*
>> ECXCMOD NTEG+40*, NTEG+41
>> ECXCTAMT PROSINFO+21*, PROSINFO+27*, PROSINFO+29*, PROSINFO+33*, PROSINFO+38*, PROSINFO+42
ECXDA PROSINFO~, PROSINFO+21, PROSINFO+27
>> ECXDATE NTEG+39*, CHK+15
ECXDFN NTEG~, CHK+9
ECXDIC NTEG+28!, NTEG+30!, NTEG+55!, NTEG+66!
ECXDIC(4 NTEG+30, NTEG+55, NTEG+66
ECXFORM NTEG~, NTEG+51, NTEG+56, NTEG+59, NTEG+62, NTEG+67, CHK+23, CHK+26, CHK+28, PROSINFO~
, PROSINFO+28
ECXGOOD NTEG+25~, NTEG+26*, NTEG+31*, NTEG+34*, NTEG+35*, NTEG+36*, NTEG+37*, NTEG+59*, NTEG+70, NTEG+71
CHK+21*, CHK+31*
>> ECXGRPR PROSINFO+27*
>> ECXHCPCS NTEG+40*, NTEG+41*, NTEG+48, CHK+21
ECXLB PROSINFO~, PROSINFO+29
>> ECXLLC PROSINFO+21*, PROSINFO+29*, PROSINFO+34*, PROSINFO+39*, PROSINFO+42
>> ECXLMC PROSINFO+21*, PROSINFO+29*, PROSINFO+35*, PROSINFO+40*, PROSINFO+42
ECXLNE NTEG~, CHK+32
>> ECXLOGIC PROSINFO+20, PROSINFO+42
ECXMISS NTEG+25~, CHK+6*, CHK+7*, CHK+8*, CHK+9*, CHK+10*, CHK+12*, CHK+14*, CHK+15*, CHK+16*
CHK+17*, CHK+18*, CHK+19*, CHK+20*, CHK+22*, CHK+24*, CHK+25*, CHK+26*, CHK+27*, CHK+29*
CHK+30, CHK+32
ECXN0 NTEG~, NTEG+26, NTEG+34, NTEG+35, NTEG+37, NTEG+39, NTEG+40
>> ECXNCOST PROSINFO+42*
ECXNLB NTEG~, NTEG+52, NTEG+63
>> ECXNLLC PROSINFO+42*
>> ECXNLMC PROSINFO+42*
>> ECXNPPDC NTEG+26*, NTEG+45*, NTEG+46*
>> ECXPHCPC NTEG+43*, NTEG+45, NTEG+46, NTEG+47*, NTEG+48*
ECXPIEN NTEG~, NTEG+36, NTEG+43, CHK+32
>> ECXQTY PROSINFO+22*, PROSINFO+23*, PROSINFO+26*
>> ECXRCST NTEG+26*, NTEG+63*, NTEG+64, NTEG+65, NTEG+66*, NTEG+67*, CHK+29
>> ECXRQST NTEG+26*, NTEG+52*, NTEG+53, NTEG+54, NTEG+55*, NTEG+56*, CHK+24
>> ECXSRCE NTEG+39*, CHK+19
>> ECXSTAT2 NTEG+26*, NTEG+27, NTEG+29, NTEG+30*, NTEG+31, CHK+7
>> ECXTYPE NTEG+39*, NTEG+45, NTEG+46, CHK+17
MAXAMT PROSINFO+19~, PROSINFO+20*, PROSINFO+33, PROSINFO+34, PROSINFO+35
U NTEG+26, NTEG+34, NTEG+35, NTEG+36, NTEG+37, NTEG+39, NTEG+40, NTEG+43, NTEG+47, NTEG+52
, NTEG+59, NTEG+63, CHK+8, CHK+10, CHK+12, CHK+14, CHK+16, CHK+18, CHK+20, CHK+22
CHK+25, CHK+27, PROSINFO+21, PROSINFO+22, PROSINFO+27, PROSINFO+29
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All