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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABSPOSEV

Package: Pharmacy Point of Sale

Routine: ABSPOSEV


Information

ABSPOSEV ; IHS/SD/lwj - Point of Sale environment checker [ 05/28/2002 10:03 AM ]

Source Information

Source file <ABSPOSEV.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 $$CJ^XLFSTR  ($$PATCH,$$VERSION)^XPDUTL  
IHS VA Utilities 1 $$DIR^XBDIR  

Entry Points

Name Comments DBIA/ICR reference
SORRY(ABSPMSG,ABSPQUIT)
VCHK(ABSPPRE,ABSPVER)
VPCHK(ABSPPRE,ABSPVER,ABSPPTCH) ; Check version and patch
LAST(PKG,VER) ;returns last patch applied for a Package, PATCH^DATE
; Patch includes Seq # if Released
SVPCHK(ABSPPRE,ABSPVER,ABSPPTCH) ;Special version and patch check for PSO
CHECK ;EP - called from Kids install routine
; First let's make sure they have DUZ(0) defined, and greet the user

External References

Name Field # of Occurrence
$$DIR^XBDIR SORRY+8
$$CJ^XLFSTR CHECK+10, CHECK+26, SORRY+5, SORRY+6
$$PATCH^XPDUTL VPCHK+4, SVPCHK+4
$$VERSION^XPDUTL CHECK+50, VCHK+3, VPCHK+3, SVPCHK+3, LAST+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(ABSPERS,",",2)_" "_$P(ABSPERS,","),IOM)
  • Line Location: CHECK+10
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" Ver: "_$P($T(+2),";",3)_" Patch: **44**.",IOM),!
  • Line Location: CHECK+26
Function Call: WRITE
  • Prompt: !!
  • Line Location: CHECK+56
Function Call: WRITE
  • Prompt: !,"Required ",ABSPPRE," V",ABSPVER,?29
  • Line Location: VCHK+4
Function Call: WRITE
  • Prompt: "... Present ",ABSPPRE," V",ABSPV
  • Line Location: VCHK+5
Function Call: WRITE
  • Prompt: ?65,"*** ERROR ***"
  • Line Location: VCHK+8
Function Call: WRITE
  • Prompt: ?65,"OK"
  • Line Location: VCHK+9
Function Call: WRITE
  • Prompt: !,"Required ",ABSPPRE," V",ABSPVER," Patch ",ABSPPTCH,?29
  • Line Location: VPCHK+8
Function Call: WRITE
  • Prompt: "... Present ",ABSPPRE," V",ABSPV," Patch ",ABSPLAST
  • Line Location: VPCHK+9
Function Call: WRITE
  • Prompt: ?65,"*** ERROR ***"
  • Line Location: VPCHK+12
Function Call: WRITE
  • Prompt: ?65,"OK"
  • Line Location: VPCHK+13
Function Call: WRITE
  • Prompt: !,"Required ",ABSPPRE," V",ABSPVER," Patch ",ABSPPTCH,?29
  • Line Location: SVPCHK+11
Function Call: WRITE
  • Prompt: "... Present ",ABSPPRE," V",ABSPV," Patch ",ABSPLAST
  • Line Location: SVPCHK+12
Function Call: WRITE
  • Prompt: ?65,"*** ERROR ***"
  • Line Location: SVPCHK+17
Function Call: WRITE
  • Prompt: ?65,"OK"
  • Line Location: SVPCHK+18
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR($G(ABSPMSG),IOM)
  • Line Location: SORRY+5
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry.....",IOM)
  • Line Location: SORRY+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" SVPCHK+6
^DIC(9.4 - [#9.4] VPCHK+5, VPCHK+6, SVPCHK+8, SVPCHK+9, LAST+4, LAST+5, LAST+7, LAST+8, LAST+9
^VA(200 - [#200] CHECK+9

Label References

Name Line Occurrences
$$LAST VPCHK+7, SVPCHK+10
SORRY CHECK+5, CHECK+6, CHECK+59
VCHK CHECK+35, CHECK+37, CHECK+41
VPCHK CHECK+36, CHECK+39, CHECK+44, CHECK+45, CHECK+46, CHECK+52

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABSPERS CHECK+8~, CHECK+9*, CHECK+10
ABSPIEN VPCHK+2~, VPCHK+5*, VPCHK+6, SVPCHK+2~, SVPCHK+8*, SVPCHK+9
ABSPLAST VPCHK+2~, VPCHK+7*, VPCHK+9, SVPCHK+2~, SVPCHK+10*, SVPCHK+12, SVPCHK+15
ABSPMSG CHECK+3~, CHECK+4*, CHECK+5*, CHECK+6*, CHECK+58*, CHECK+59, SORRY~, SORRY+5
ABSPP VPCHK+2~, VPCHK+4*, VPCHK+10, SVPCHK+2~, SVPCHK+4*, SVPCHK+7*, SVPCHK+15
ABSPPKG VPCHK+2~, VPCHK+6*, VPCHK+7, SVPCHK+2~, SVPCHK+9*, SVPCHK+10
ABSPPRE VCHK~, VCHK+3, VCHK+4, VCHK+5, VPCHK~, VPCHK+3, VPCHK+4, VPCHK+5, VPCHK+8, VPCHK+9
, SVPCHK~, SVPCHK+3, SVPCHK+4, SVPCHK+8, SVPCHK+11, SVPCHK+12
ABSPPTCH VPCHK~, VPCHK+4, VPCHK+8, SVPCHK~, SVPCHK+4, SVPCHK+5, SVPCHK+11, SVPCHK+15
ABSPQUIT SORRY~, SORRY+4
ABSPSTOP CHECK+33~, CHECK+34*, CHECK+57, VCHK+7*, VPCHK+11*, SVPCHK+16*
ABSPV VCHK+2~, VCHK+3*, VCHK+5, VCHK+6, VPCHK+2~, VPCHK+3*, VPCHK+9, VPCHK+10, SVPCHK+2~, SVPCHK+3*
, SVPCHK+12, SVPCHK+15, SORRY+2~, SORRY+8*
ABSPVER VCHK~, VCHK+4, VCHK+6, VPCHK~, VPCHK+4, VPCHK+8, VPCHK+10, SVPCHK~, SVPCHK+4, SVPCHK+5
, SVPCHK+11, SVPCHK+15
DIFQ SORRY+3!
DUZ CHECK+5, CHECK+9
DUZ(0 CHECK+6
IOM CHECK+10, CHECK+26, SORRY+5, SORRY+6
LATEST LAST+2~, LAST+6*, LAST+10, LAST+11*, LAST+12, LAST+13*, LAST+14
PATCH LAST+2~, LAST+6*, LAST+10, LAST+11*, LAST+13*, LAST+14
PATCHDT LAST+2~, LAST+8*, LAST+10, LAST+11, LAST+12, LAST+13
>> PATCHNO LAST+9*, LAST+10, LAST+11, LAST+13
PKG LAST~, LAST+3, LAST+4
PKGIEN LAST+2~, LAST+4*, LAST+5, LAST+7, LAST+8, LAST+9
SUBIEN LAST+2~, LAST+6*, LAST+7*, LAST+8, LAST+9
U CHECK+9, VPCHK+6, VPCHK+7, SVPCHK+9, SVPCHK+10, LAST+8, LAST+9, LAST+14
VER LAST~, LAST+3*, LAST+5
VERIEN LAST+2~, LAST+5*, LAST+7, LAST+8, LAST+9
>> X SVPCHK+6*
>> XPDDIQ("XPZ1" CHECK+29*
>> XPDDIQ("XPZ2" CHECK+29*
>> XPDQUIT SORRY+4*
>> ZTQUEUED SORRY+7

Marked Items

Name Field # of Occurrence
$T( CHECK+26
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All