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

Package: Surgery

Routine: SROCDX2


Information

SROCDX2 ;BIR/ADM - ASSOCIATED DIAGNOSIS CODING UTILITIES ;07/27/05

Source Information

Source file <SROCDX2.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 4 EN^DDIOL  FILE^DIE  ^DIK  ^DIR  
Surgery 1 (FILE,UPDATE)^SROCDX1  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Surgery 3 SROCD0  SROCDX  SROCDX1  

Entry Points

Name Comments DBIA/ICR reference
SADXP ; ADXP x-ref set logic
PRLOOP(SRCHK)
KOADX(SRCN,SRREC,SRPDA) ; kill other cpt associated diagnosis codes
KPADX(SRCN,SRPDA) ; kill all the principal cpt associated diagnosis codes
PRINASOD
KADXP ; ADXP x-ref kill logic
OTLOOP(SRCHK)
DELASOC
AT2 ; delete principal associated diagnoses
KADXO ; ADXO x-ref kill logic
SCOND(X1,X2) ; set condition for ADXP x-ref
DELWRN
SADXO ; ADXO x-ref set logic
KCOND(X1,X2) ; kill condition for ADXP x-ref

External References

Name Field # of Occurrence
EN^DDIOL DELWRN+3
FILE^DIE AT2+3, KADXO+3
^DIK KPADX+4, KPADX+6, KOADX+4, KOADX+6
^DIR SADXP+4, SADXO+4
FILE^SROCDX1 KADXP+3
UPDATE^SROCDX1 KADXP+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRO(136 - [#136] PRLOOP+1, PRLOOP+2, PRLOOP+4*, OTLOOP+1, OTLOOP+2, OTLOOP+3, OTLOOP+5*, SADXP+2, KADXP+2, KADXP+3
, AT2+2, SADXO+2, KADXO+2, KPADX+3, KOADX+3

Label References

Name Line Occurrences
$$OTLOOP DELASOC+3, DELASOC+5
$$PRLOOP DELASOC+3, DELASOC+5
AT2 KADXP+2
DELASOC PRINASOD+1
KADXO SADXO+5
KADXP SADXP+5
KOADX OTLOOP+4
KPADX PRLOOP+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D0 PRINASOD+1~*
DA DELASOC+2, SADXP+2, KADXP+2, AT2+2, SADXO+2, KADXO+2, KPADX+1~, KPADX+4*, KPADX+6*, KOADX+1~
, KOADX+4*, KOADX+6*
DA(1 DELASOC+2, SADXO+2, KADXO+2, KPADX+2*, KPADX+3, KPADX+4*, KPADX+6*, KOADX+4*, KOADX+6*
DA(2 KOADX+2*, KOADX+3, KOADX+4*, KOADX+6*
DIK KPADX+1~, KPADX+4*, KPADX+6*, KOADX+1~, KOADX+4*, KOADX+6*
DIR DELASOC~, SADXP+1~, SADXO+1~
DIR("A" SADXP+3*, SADXO+3*
DIR("B" SADXP+4*, SADXO+4*
DIR(0 SADXP+4*, SADXO+4*
>> DTOUT SADXP+4, SADXO+4
>> DUOUT SADXP+4, SADXO+4
OTH OTLOOP~*, OTLOOP+1*, OTLOOP+2, OTLOOP+3, OTLOOP+4, OTLOOP+5
SRASSD KADXP+1~, KADXP+3*
SRC DELWRN~, DELWRN+3
SRC(1 DELWRN+1*
SRC(2 DELWRN+2*
SRCHK PRLOOP~, PRLOOP+3, OTLOOP~, OTLOOP+4
SRCN KPADX~, KPADX+2, KPADX+4, KPADX+6, KOADX~, KOADX+2, KOADX+4, KOADX+6
SRDA OTLOOP~, OTLOOP+2*, OTLOOP+3, OTLOOP+4, OTLOOP+5, AT2+1~, AT2+2*, AT2+3, KADXO+1~, KADXO+2*
, KADXO+3
SRDA(1 KADXO+2*, KADXO+3
SRDO SCOND+1~*, SCOND+2*, SCOND+3, KCOND+1~*, KCOND+2*, KCOND+3
SRDX PRLOOP~*, PRLOOP+1*, PRLOOP+2, PRLOOP+3, PRLOOP+4
SRFDA KADXP+1~, KADXP+3*
>> SRI PRLOOP+1*
SRIENF KADXP+1~, KADXP+3*
SRIENU KADXP+1~, KADXP+3*
SRJ AT2+1~, AT2+2*, AT2+3, KADXO+1~, KADXO+2*, KADXO+3
SRMATCH PRLOOP~*, PRLOOP+5*, PRLOOP+6, OTLOOP~*, OTLOOP+6*, OTLOOP+7
>> SRNEW PRLOOP+4, OTLOOP+5
SROT DELASOC~, DELASOC+3*, DELASOC+4, DELASOC+5*
SRPDA KPADX~, KPADX+3, KPADX+5, KPADX+6, KOADX~, KOADX+3, KOADX+5, KOADX+6
SRPR DELASOC~, DELASOC+3*, DELASOC+4, DELASOC+5*
SRREC KOADX~, KOADX+3, KOADX+4, KOADX+6
SRTN PRLOOP+1, PRLOOP+2, PRLOOP+3, PRLOOP+4, OTLOOP+1, OTLOOP+2, OTLOOP+3, OTLOOP+4, OTLOOP+5, DELASOC+2*
, PRINASOD, KADXP+1~, KADXP+2*, KADXP+3
SRX1 KPADX+1~, KPADX+2*, KPADX+3*, KPADX+4, KOADX+1~, KOADX+2*, KOADX+3*, KOADX+4
SRXBAK DELASOC~, DELASOC+1*, DELASOC+5
SRXX PRLOOP~*, PRLOOP+3, OTLOOP~*, OTLOOP+4
SRY AT2+1~, KADXO+1~
SRY( AT2+3*, KADXO+3*
U KADXP+2, KADXP+3
>> X PRLOOP, PRLOOP+2, PRLOOP+3*, OTLOOP, OTLOOP+3, OTLOOP+4*, DELASOC+1, DELASOC+5*, PRINASOD
X1 SCOND~, KCOND~
X1(1 SCOND+2
X2 SCOND~, KCOND~
X2(1 SCOND+2, KCOND+2
Y DELASOC~, SADXP+1~, SADXP+4, SADXP+5, SADXO+1~, SADXO+4, SADXO+5, KPADX+1~, KOADX+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All