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

Package: Pharmacy Point of Sale

Routine: ABSPOS33


Information

ABSPOS33 ; IHS/FCS/DRS - survey divisions ;

Source Information

Source file <ABSPOS33.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 ^%ZIS  ^%ZISC  
Pharmacy Point of Sale 2 ($$DATE,$$NOWEXT)^ABSPOSU1  ($$EOPQ,ENDRPT)^ABSPOSU8  

Entry Points

Name Comments DBIA/ICR reference
SURVEY1 ; given RXI, RXR
MAIN ;EP - option ABSP DIVISIONS SURVEY
HEADING ;
SURVEY(START)
MAIN1(START)

External References

Name Field # of Occurrence
^%ZIS MAIN+7
^%ZISC MAIN+10
$$DATE^ABSPOSU1 MAIN+5
$$NOWEXT^ABSPOSU1 MAIN1+3
$$EOPQ^ABSPOSU8 MAIN1+14
ENDRPT^ABSPOSU8 MAIN1+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Survey DIVISION from recent prescriptions",!
  • Line Location: MAIN+1
Function Call: WRITE
  • Prompt: !,"...thinking...",!
  • Line Location: MAIN+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADING+1
Function Call: WRITE
  • Prompt: "Survey of Divisions (","ABSPOS33",") ",?60,RPTDATE,!
  • Line Location: HEADING+2
Function Call: WRITE
  • Prompt: "For "
  • Line Location: HEADING+3
Function Call: WRITE
  • Prompt: Y
  • Line Location: HEADING+3
Function Call: WRITE
  • Prompt: "-",Y,!
  • Line Location: HEADING+4
Function Call: WRITE
  • Prompt: ?3,"Count",?10,"Name",!
  • Line Location: HEADING+5
Function Call: WRITE
  • Prompt: !,"No prescriptions found?!",!
  • Line Location: MAIN1+5
Function Call: WRITE
  • Prompt: $J(COUNT,7),?10,$E($P(X,U,2)_"(`"_INS_")",1,40)
  • Line Location: MAIN1+11
Function Call: WRITE
  • Prompt: ?51,$P(X,U,3)
  • Line Location: MAIN1+12
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN1+13
Routine Call
  • %ZIS
  • Line Location:
    • MAIN+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HEADING+3, HEADING+4
^PS(59 - [#59] SURVEY1+6
^PSRX - [#52] SURVEY1+2, SURVEY1+3
^PSRX("AL" SURVEY+2, SURVEY+3, SURVEY+4
^TMP("ABSPOS33" MAIN1+5, MAIN1+8, MAIN1+9, MAIN1+10, SURVEY+1!, SURVEY+8, SURVEY+9, SURVEY+10*, SURVEY1+8, SURVEY1+11*

Label References

Name Line Occurrences
HEADING MAIN1+6
MAIN1 MAIN+9
SURVEY MAIN1+4
SURVEY1 SURVEY+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%H MAIN+2~
COUNT MAIN1+7~, MAIN1+8*, MAIN1+9, MAIN1+11, MAIN1+14*, SURVEY+9~*, SURVEY+10
DIV SURVEY1+1~, SURVEY1+2*, SURVEY1+3*, SURVEY1+4*, SURVEY1+6, SURVEY1+7, SURVEY1+8, SURVEY1+11
DOC SURVEY+1~, SURVEY+7*, SURVEY+8*, SURVEY+9, SURVEY+10
DT MAIN+3, MAIN+6
END MAIN+4~, MAIN+6*, HEADING+4
INS MAIN1+7~, MAIN1+9*, MAIN1+10, MAIN1+11, MAIN1+14*
IO MAIN1+6
IOF HEADING+1
NAME SURVEY1+1~, SURVEY1+4*, SURVEY1+6*, SURVEY1+7*, SURVEY1+9
NUMBERS MAIN1+7~
>> POP MAIN+7
RPTDATE HEADING+2, MAIN1+3~*
RXI SURVEY+1~, SURVEY+3*, SURVEY+4, SURVEY1+2, SURVEY1+3
RXR SURVEY+1~, SURVEY+4*, SURVEY1+2
START MAIN+4~, MAIN+5*, MAIN+6, MAIN+9, HEADING+3, HEADING+4, MAIN1~, MAIN1+4, SURVEY~, SURVEY+1
TIME SURVEY+1~*, SURVEY+2*, SURVEY+3, SURVEY+4
U MAIN1+11, MAIN1+12, SURVEY+9, SURVEY1+2, SURVEY1+3, SURVEY1+6, SURVEY1+9, SURVEY1+10
X MAIN+2~, MAIN+3*, MAIN+5, MAIN1+7~, MAIN1+10*, MAIN1+11, MAIN1+12, SURVEY+9~*, SURVEY1+8~*, SURVEY1+9*
, SURVEY1+10*, SURVEY1+11
X1 MAIN+2~
X2 MAIN+2~
Y HEADING+3~*, HEADING+4*

Marked Items

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