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 |  All
Print Page as PDF
Routine: SROCD4

Package: Surgery

Routine: SROCD4


Information

SROCD4 ;BIR/ADM - MARK CASE CODING COMPLETE ;10/17/05

Source Information

Source file <SROCD4.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA Fileman 6 NOW^%DTC  ^DIC  FILE^DICN  ^DIE  ^DIK  ^DIR  
Surgery 3 (,$$CHNG)^SROCD1  NITE^SROPCE  (START,UTIL)^SROPCEP  
DRG Grouper 1 $$ICDDX^ICDCODE  
Kernel 1 MES^XPDUTL  
Scheduling 1 CL^SDCO21  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROCD2  

Entry Points

Name Comments DBIA/ICR reference
PRE ; pre-install entry
; delete APCE x-refs
OSCEI
CHF ; check diagnoses for CRIMEAN HEMORRHAGIC FEVER
SRSET
CONV ; convert coding data from file 130 to file 136
PSCEI
FILE
CHKIN ; check for items in file 130 required by PCE
C2
ASKCHF ; ask for confirmation of CRIMEAN HEMORRHAGIC FEVER diagnosis
MISS
PAGE

External References

Name Field # of Occurrence
NOW^%DTC FILE
^DIC CHF+2
FILE^DICN FILE+2
^DIE FILE+1
^DIK PRE+2, PRE+3, PRE+4, PRE+5, PRE+6, PRE+7, PRE+8, PRE+9
^DIR SROCD4+17, ASKCHF+7, PAGE
$$ICDDX^ICDCODE CHF+3
CL^SDCO21 SROCD4+10
^SROCD1 C2+8
$$CHNG^SROCD1 SROCD4+15
NITE^SROPCE CONV+2
START^SROPCEP FILE+7
UTIL^SROPCEP CHKIN+2
MES^XPDUTL CONV+1, C2+1, C2+8, C2+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Coding of this surgical case is not complete.",!,"The following items are missing:",!
  • Line Location: MISS+0
Function Call: WRITE
  • Prompt: ?5,SRDATA,!
  • Line Location: MISS+1
Function Call: WRITE
  • Prompt: !,"This case cannot be sent to PCE until all missing information is supplied.",!
  • Line Location: MISS+2
Routine Call
  • DIE
  • Line Location:
    • FILE+1
Routine Call
  • DIC
  • Line Location:
    • CHF+2
Routine Call
  • DIR
  • Line Location:
    • SROCD4+17
    • ASKCHF+7
    • PAGE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] SROCD4+10, SROCD4+16, CHF+3, C2+2, C2+3, C2+4, C2+5
^SRO(136 - [#136] SROCD4+7, SROCD4+11, SROCD4+12, SROCD4+13, SROCD4+15, SROCD4+17, CHF+4, CHF+5, CONV+1, C2+7

Label References

Name Line Occurrences
ASKCHF SROCD4+6
CHF SROCD4+6
CHKIN FILE+3
FILE SROCD4+16
MISS SROCD4+14
OSCEI SROCD4+13
PAGE FILE+6, FILE+8
PSCEI SROCD4+10
SRSET PSCEI+1, PSCEI+2, PSCEI+3, PSCEI+4, PSCEI+5, PSCEI+6, PSCEI+7, OSCEI+1, OSCEI+2, OSCEI+3
, OSCEI+4, OSCEI+5, OSCEI+6, OSCEI+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % FILE
DA FILE+1!*, FILE+2!, PRE+2!*, PRE+3!*, PRE+4!*, PRE+5!*, PRE+6!*, PRE+7!*, PRE+8!*, PRE+9!*
DA(1 PRE+2*, PRE+3*, PRE+4*, PRE+5*, PRE+6*, PRE+7*, PRE+8*, PRE+9*
DA(2 PRE+2*, PRE+3*, PRE+4*, PRE+5*, PRE+6*, PRE+7*, PRE+8*, PRE+9*
DD FILE+2!
>> DFN SROCD4+10*
DIC FILE+2*!, CHF+2!*
DIC("DR" FILE+2*
DIC(0 FILE+2*, CHF+2*
DIE FILE+1!*, PRE+2!
DIK PRE+2!*, PRE+3!*, PRE+4!*, PRE+5!*, PRE+6!*, PRE+7!*, PRE+8!*, PRE+9!*
DIR SROCD4+17!, SROCD4+18!, ASKCHF+1!, ASKCHF+7!, PAGE!
DIR("A" SROCD4+18*, ASKCHF+1*, ASKCHF+2*, ASKCHF+3*, ASKCHF+4*, ASKCHF+5*, ASKCHF+6*, PAGE*
DIR("B" SROCD4+18*, ASKCHF+6*
DIR(0 SROCD4+18*, ASKCHF+1*, PAGE*
DO FILE+2!
DR FILE+1!*, FILE+2!, PRE+2!
>> DTOUT SROCD4+17, ASKCHF+7
>> DUOUT SROCD4+17, ASKCHF+7
DUZ FILE+2
SR SROCD4+5~, CHKIN+1~
SR(0 SROCD4+7*, SROCD4+8, SROCD4+9, PSCEI+1, PSCEI+2, PSCEI+3, PSCEI+4, PSCEI+5, PSCEI+6, PSCEI+7
SRAO CHKIN+1~
SRATT CHKIN+1~
SRCHF SROCD4+5~, SROCD4+6, CHF+1*, CHF+4*, CHF+5*
>> SRCHFNO SROCD4+6, ASKCHF+1*, ASKCHF+7*
SRCHK CHKIN+1~
SRCL SROCD4+5~, SROCD4+10, SROCD4+13
SRCL(1 PSCEI+1, OSCEI+1
SRCL(2 PSCEI+2, OSCEI+2
SRCL(3 PSCEI+3, OSCEI+3
SRCL(4 PSCEI+4, OSCEI+4
SRCL(5 PSCEI+5, OSCEI+5
SRCL(6 PSCEI+6, OSCEI+6
SRCL(7 PSCEI+7, OSCEI+7
SRCPT CHKIN+1~
SRCT C2~, C2+2*, C2+8*, C2+9
SRCV CHKIN+1~
SRD C2~, C2+5*
SRDATA SROCD4+5~, MISS+1*
SRDATE CHKIN+1~
SRDEPC CHKIN+1~
SRDIAG CHKIN+1~
SRDX SROCD4+5~, SROCD4+13*, OSCEI+1, OSCEI+2, OSCEI+3, OSCEI+4, OSCEI+5, OSCEI+6, OSCEI+7
SRDXF CHKIN+1~
SREC CHKIN+1~
>> SREDIT SROCD4+7*
SRHNC CHKIN+1~
SRICD SROCD4+5~, CHF+4*, ASKCHF+2, ASKCHF+6
SRINOUT CHKIN+1~
SRIR CHKIN+1~
SRK SROCD4+5~, FILE+3!
SRLOC CHKIN+1~
SRMISS SROCD4+5~, SROCD4+14
SRMISS( MISS+1, SRSET*
SRMISS("OTHER ASSOCIATED DIAGNOSIS" , SROCD4+12*
SRMISS("PRINC IPAL ASSOCIATED DIAGNOSIS" , SROCD4+11*, IPAL POSTOP DIAGNOSIS CODE" , SROCD4+9*, IPAL PROCEDURE CODE" , SROCD4+8*
SRMST CHKIN+1~
SRNON CHKIN+1~
>> SRNOW FILE*, FILE+2
SRO CHKIN+1~
SRODIAG CHKIN+1~
SRODX C2~, C2+5*, C2+6
SROP C2~, C2+4*, C2+6
SROTH SROCD4+5~, SROCD4+12*, SROCD4+13*
SRP C2~, C2+4*
SRPDX C2~, C2+5*, C2+6
SRPP C2~, C2+4*, C2+6
SRPROV CHKIN+1~
SRRPROV CHKIN+1~
SRSC CHKIN+1~
SRSDATE SROCD4+5~, SROCD4+10*
>> SRSOUT SROCD4+7*
SRTN SROCD4+7, SROCD4+10, SROCD4+11, SROCD4+12, SROCD4+13, SROCD4+15, SROCD4+16, SROCD4+17, FILE+1, CHF+3
, CHF+4, CHF+5, C2~, C2+2*, C2+3, C2+4, C2+5, C2+7
SRTYPE SROCD4+5~, PSCEI*, OSCEI*, SRSET
SRUP CHKIN+1~
SRX CHKIN+1~
SRY CHF+1~*, CHF+2*, CHF+3, CHF+4, CHF+5
X FILE+2*, CHF+1~, CHF+2*, CHF+4*
Y SROCD4+17, CHF+1~, CHF+2, CHF+3*, CHF+4, CHF+5*, ASKCHF+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All