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

Package: Surgery

Routine: SR81UTL


Information

SR81UTL ;BIR/ADM-SR*3*81 Retransmissions of FY98 data ; [ 10/06/98 1:04 PM ]

Source Information

Source file <SR81UTL.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 4 (C,NOW)^%DTC  ^DIE  $$GET1^DIQ  EN^DIQ1  
Kernel 1 ^%ZTLOAD  
MailMan 1 ^XMD  
Registration 1 (DEM,IN5)^VADPT  
Surgery 1 $$SITE^SROVAR  

Entry Points

Name Comments DBIA/ICR reference
END
NA
SPEC
EN1
POST ; post-install action for SR*3*81
; task retransmission message
RAMG ; send list of assessments changed to incomplete
OBS ; check for admission for observation following surgery
INC ; make completed/transmitted assessment incomplete

External References

Name Field # of Occurrence
C^%DTC OBS+2
NOW^%DTC POST+2
^%ZTLOAD POST+2
^DIE INC+1, INC+2
$$GET1^DIQ EN1+6
EN^DIQ1 SPEC
$$SITE^SROVAR EN1
DEM^VADPT EN1+3
IN5^VADPT OBS+1, OBS+2
^XMD EN1+16, RAMG+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM("APTT1" OBS+2
^SRF - [#130] EN1+1, EN1+3, EN1+4, EN1+6, EN1+7, EN1+8, EN1+9, EN1+10, OBS+2, NA*
, INC+2
^SRF("AC" EN1+1
^TMP("SRA" EN1!, EN1+12*, END!
^TMP("SRAINC" EN1!, RAMG+2*, RAMG+3*, END!, INC+4*
^XMB("NETNAME" EN1+13

Label References

Name Line Occurrences
END RAMG+1
INC EN1+4
NA EN1+4
OBS EN1+4
RAMG EN1+13
SPEC OBS+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % POST+2
DA SPEC!*, INC+1!*, INC+2*!
>> DFN EN1+3*, OBS+2
DIC SPEC!*
DIE INC+1!*, INC+2*!
DIQ SPEC!*
DIQ(0 SPEC*
DR SPEC!*, INC+1!*, INC+2*!
DUZ EN1+14, RAMG+4
I EN1+2*, EN1+7*, EN1+9*, EN1+11*, EN1+16~, RAMG+6~, NA*
>> J EN1+9*
>> SITE EN1*, EN1+3, EN1+14
>> SR235 EN1+1*, EN1+5, INC+1, INC+2
>> SR24 OBS+2*
>> SRA EN1+1*, EN1+3*, EN1+7*, EN1+8*, EN1+9*
>> SRADT INC+3*, INC+4
>> SRAINC EN1*, RAMG+1, INC+4*
SRD EN1+13~*
>> SRDT OBS+2*
>> SRI EN1*, EN1+12*
>> SROPD EN1*, EN1+1*
SRP EN1+2!
SRP( EN1+2*, EN1+7*, EN1+9*, EN1+11
SRP(1 EN1+3*, EN1+11
SRP(10 EN1+8*
SRP(11 EN1+8*
SRP(12 EN1+9*
SRP(16 EN1+10*
SRP(2 EN1+3*
SRP(3 EN1+6*
SRP(4 EN1+3*
SRP(5 EN1+3*, OBS+1, OBS+2, INC+3
>> SRSDATE OBS+1*
>> SRSOUT EN1+4, OBS+1*, OBS+3*
>> SRSP OBS+3, SPEC*
>> SRTMP EN1+11*, EN1+12
>> SRTN EN1+1*, EN1+3, EN1+4, EN1+6, EN1+7, EN1+8, EN1+9, EN1+10, OBS+2, NA
, INC+1, INC+2, INC+4
>> SRX OBS+3*, SPEC
SRY SPEC!
SRY( SPEC
>> VA("PID" EN1+3
>> VADM(1 INC+4
>> VAIP("D" OBS+1*, OBS+2*
>> VAIP(13 OBS+1, OBS+2, OBS+3
>> X OBS+2, INC+3*
>> X1 OBS+2*
>> X2 OBS+2*
XMDUZ EN1+14*, RAMG+1!, RAMG+4*
XMSUB EN1+14*, RAMG+1!, RAMG+4*
XMTEXT EN1+16*, RAMG+1!, RAMG+6*
>> XMY("G.RISK A SSESSMENT" , RAMG+5*
>> XMY("G.SRCOSERV@ISC-CHICAGO.VA.GOV" EN1+15*
>> Y OBS+3*
>> ZTDESC POST+2*
>> ZTDTH POST+2*
>> ZTIO POST+2*
>> ZTREQ END*
>> ZTRTN POST+2*
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All