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

Package: Contract Health Management Information System

Routine: ACHSPOSM


Information

ACHSPOSM ; IHS/ITSC/PMF - 2.1T2 INSTALLATION MAIL MESSAGE ANNOUNCEMENT ; [ 10/16/2001 8:16 AM ]

Source Information

Source file <ACHSPOSM.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 4 ^%DT  H^%DTC  DT^DICRW  ^DIR  
Kernel 2 HOME^%ZIS  ^%ZTLOAD  
MailMan 1 ^XMD  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Contract Health Management Information System 4 ACHSCONV  ACHSPOS5  ACHSPOS6  ACHSPOST  

Entry Points

Name Comments DBIA/ICR reference
GETRECIP ;
Q2 ;EP - From DIR
WRITEOOP ;
WRITEDD ;
INTRO ;
QUE ;
WRITDESC ;
BACKUP ;
START(ERROR) ;EP - From Taskman

External References

Name Field # of Occurrence
^%DT QUE+2
H^%DTC QUE+5
HOME^%ZIS ACHSPOSM+5, QUE+7
^%ZTLOAD QUE+7
DT^DICRW ACHSPOSM+5
^DIR ACHSPOSM+9
^XMD START+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR ZERO.",!
  • Line Location: ACHSPOSM+4
Function Call: WRITE
  • Prompt: !,"QUEUE INFORMATION MISSING - NOT QUEUED",!!,"Okay...",!
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !!,"QUEUED TO TASK ",ZTSK,!!,"A mail message with the results will be sent to your MailMan 'IN' basket.",!
  • Line Location: QUE+8
Function Call: WRITE
  • Prompt: !!,*7,"QUEUE UNSUCCESSFUL. RESTART UTILITY."
  • Line Location: QUE+9
Function Call: WRITE
  • Prompt: !
  • Line Location: INTRO+1
Function Call: WRITE
  • Prompt: ?5,$P($T(INTRO+%),";;",2),!
  • Line Location: INTRO+1
Function Call: WRITE
  • Prompt: !
  • Line Location: Q2+1
Function Call: WRITE
  • Prompt: ?5,$P($T(Q2+%),";;",2),!
  • Line Location: Q2+1
Routine Call
  • %ZIS
  • Line Location:
    • ACHSPOSM+5
    • QUE+7
Routine Call
  • DIR
  • Line Location:
    • ACHSPOSM+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J START+3!, START+13!, WRITDESC+1*, WRITEOOP+1*, BACKUP+1*, WRITEDD+2*
^XUSEC( GETRECIP+3, GETRECIP+5

Label References

Name Line Occurrences
BACKUP START+8
GETRECIP START+10
INTRO ACHSPOSM+5
Q2 ACHSPOSM+10, QUE+3
START ACHSPOSM+3, ACHSPOSM+10
WRITDESC START+5
WRITEDD START+7
WRITEOOP START+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % INTRO+1*, Q2+1*, WRITDESC+1*, WRITEOOP+1*, BACKUP+1*, WRITEDD+2*
>> %DT QUE+1*
>> %DT("A" QUE+1*
>> %DT("B" QUE+1*
>> %DT(0 QUE+1*
>> %H QUE+6
>> %T QUE+6
>> DIR("??" ACHSPOSM+8*
>> DIR("A" ACHSPOSM+7*
>> DIR("B" ACHSPOSM+6*
>> DIR(0 ACHSPOSM+6*
>> DIRUT ACHSPOSM+10
DUZ ACHSPOSM+4, START+11
ERROR START~, START+5, START+6, START+7, START+8
X QUE+4*, GETRECIP+1~, GETRECIP+2*, GETRECIP+3*, GETRECIP+5, WRITDESC+1*, WRITEOOP+1*, BACKUP+1*, WRITEDD+2*
XMDUZ START+2~, START+11*
XMSUB START+2~, START+11*
XMTEXT START+2~, START+11*
XMY START+2~
XMY( START+11*, GETRECIP+5*
XMY(1 START+11*
Y ACHSPOSM+10, QUE+3, QUE+4, GETRECIP+1~, GETRECIP+4*, GETRECIP+5*
>> ZTDESC QUE+6*
>> ZTDTH QUE+6*
>> ZTIO QUE+6*
>> ZTQUEUED ACHSPOSM+3
>> ZTRTN QUE+6*
>> ZTSK QUE+8

Marked Items

Name Field # of Occurrence
$T( QUE+6, START+11
$T(BACKUP+% BACKUP+1
$T(INTRO+% INTRO+1
$T(Q2+% Q2+1
$T(WRITDESC+% WRITDESC+1
$T(WRITEDD+% WRITEDD+2
$T(WRITEOOP+% WRITEOOP+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All