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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABSPOSCC

Package: Pharmacy Point of Sale

Routine: ABSPOSCC


Information

ABSPOSCC ; IHS/FCS/DRS - Set up ABSP() ; [ 05/09/2003 9:37 AM ]

Source Information

Source file <ABSPOSCC.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Pharmacy Point of Sale 3 ($$GETMDPOL,$$GETRRDPL,$$MDFLG,$$RRDFLG,$$RRDOB,$$RRNAME)^ABSPOSCG  ($$CAIDDOB,$$CAIDELDT,$$CAIDNAME,$$CAREDOB,$$CARENAME,GETAINFO)^ABSPOSCH  IMPOSS^ABSPOSUE  
Kernel 1 $$NPI^XUSNPI  
VA Fileman 1 ($$GET1,GETS)^DIQ  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Pharmacy Point of Sale 2 ABSPOSC4  ABSPOSCB  

Entry Points

Name Comments DBIA/ICR reference
INSGRP() ; Insurer Grp #
INSPOL()
SWTYPE(D)
PERSON() ; Person Code
; Check the new location just recently mispatched into registration.
; Something's goofy, FILEMAN, P^DI, 8, 1, GLOBAL doesn't show this
; field, but it is in ^DD(9000006.11,.12,...)
INSREL() ; a single digit, 1, 2, 3, 4 = self,spouse,child,other
INSMBRNM()
INSDNAME(N) ; Insured's name
INSIEN() ; get pointer to ^AUTNINS
; (But shouldn't we directly get this from the IEN59?)
INS3PPH()
ELGCLAR()
AUTTRLSH()
GETINFO(DIALOUT,PATIEN,VSTIEN,PINS,INSIEN) ;EP

External References

Name Field # of Occurrence
$$GETMDPOL^ABSPOSCG INSPOL+2
$$GETRRDPL^ABSPOSCG INSPOL+4
$$MDFLG^ABSPOSCG GETINFO+13
$$RRDFLG^ABSPOSCG GETINFO+20
$$RRDOB^ABSPOSCG GETINFO+92
$$RRNAME^ABSPOSCG GETINFO+62, INSDNAME+4
$$CAIDDOB^ABSPOSCH GETINFO+85
$$CAIDELDT^ABSPOSCH GETINFO+141
$$CAIDNAME^ABSPOSCH GETINFO+58, INSDNAME+2
$$CAREDOB^ABSPOSCH GETINFO+88
$$CARENAME^ABSPOSCH GETINFO+60, INSDNAME+3
GETAINFO^ABSPOSCH GETINFO+82
IMPOSS^ABSPOSUE INSIEN+7, AUTTRLSH+2, INSDNAME+10, INSPOL+6, SWTYPE+6
$$GET1^DIQ GETINFO+76
GETS^DIQ GETINFO+180
$$NPI^XUSNPI GETINFO+48

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] GET1^DIQ
^ABSPEI - [#9002313.4] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABSP(9002313.55 - [#9002313.55] SWTYPE+2
^ABSP(9002313.56 - [#9002313.56] GETINFO+30, GETINFO+34, GETINFO+37, GETINFO+148, GETINFO+149, GETINFO+150, GETINFO+152, GETINFO+154
^ABSP(9002313.99 - [#9002313.99] GETINFO+51, GETINFO+177
^ABSPEI - [#9002313.4] GETINFO+104, GETINFO+178, GETINFO+189
^ABSPF(9002313.81 - [#9002313.81] INSREL+4, INSREL+5
^ABSPF(9002313.92 - [#9002313.92] GETINFO+192
^ABSPT - [#9002313.59] GETINFO+29, GETINFO+40
^AUPN3PPH - [#9000003.1] INSGRP+14, INSDNAME+9, INSPOL+8
^AUPNMCD - [#9000004] INSIEN+2, INSGRP+10, INSPOL
^AUPNMCR - [#9000003] INSIEN+4, PERSON+9, INSGRP+5
^AUPNPAT - [#9000001] GETINFO+69
^AUPNPRVT - [#9000006] INSIEN+3, AUTTRLSH+1, PERSON+8, INS3PPH, INSPOL+9, INSMBRNM+4
^AUPNRRE - [#9000005] INSIEN+5, INSGRP+7
^AUTNEGRP - [#9999999.77] INSGRP+6, INSGRP+8, INSGRP+11, INSGRP+15, INSGRP+16
^AUTTPRES - [#9999999.361] GETINFO+77
^AUTTRLSH - [#9999999.36] INSREL+3
^AUTTRLSH("B" AUTTRLSH+2
^DPT - [#2] GETINFO+54
^PS(59 - [#59] GETINFO+43

Label References

Name Line Occurrences
$$AUTTRLSH INSREL+1
$$INS3PPH INSGRP+13, INSDNAME+7, INSPOL+7
$$INSDNAME GETINFO+122, GETINFO+123
$$INSGRP GETINFO+128
$$INSMBRNM GETINFO+134
$$INSPOL GETINFO+131, GETINFO+138
$$INSREL GETINFO+125, PERSON+12
$$PERSON GETINFO+126
$$SWTYPE GETINFO+25

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% GETINFO+57~, GETINFO+58*, GETINFO+60*, GETINFO+62*, GETINFO+63*, GETINFO+64*, GETINFO+65
ABSBRXI GETINFO+28~*, GETINFO+29, GETINFO+40
>> ABSP("Cardholder" GETINFO+122*, GETINFO+123*
>> ABSP("Envoy T erminal ID" , GETINFO+33*
>> ABSP("Global NPI Flag" , GETINFO+51*, GETINFO+113
>> ABSP("Header" GETINFO+165*, GETINFO+168*
>> ABSP("Institution" GETINFO+41*, GETINFO+43*, GETINFO+47, GETINFO+48
>> ABSP("Insurer NPI Flag" , GETINFO+104*, GETINFO+113, GETINFO+116, GETINFO+118
>> ABSP("Insurer" GETINFO+101*, GETINFO+125*, GETINFO+126*, GETINFO+128*, GETINFO+131*, GETINFO+134*, GETINFO+138*, GETINFO+141*, GETINFO+142*, GETINFO+143*
>> ABSP("NCPDP" GETINFO+181*, GETINFO+182*, GETINFO+183*, GETINFO+184*, GETINFO+185*, GETINFO+186*, GETINFO+190*, GETINFO+193*, GETINFO+194*, GETINFO+195*
, GETINFO+196*, GETINFO+198*
>> ABSP("Outpati ent Site" , GETINFO+40*, GETINFO+42, GETINFO+43
>> ABSP("Patient" GETINFO+55*, GETINFO+65*, GETINFO+66*, GETINFO+67*, GETINFO+68*, GETINFO+69*, GETINFO+70*, GETINFO+77*, GETINFO+78*, GETINFO+85*
, GETINFO+87*, GETINFO+88*, GETINFO+90*, GETINFO+92*, INSDNAME+5, INSDNAME+11
>> ABSP("Send Ph armacy NPI" , GETINFO+111*, GETINFO+114*, GETINFO+117*, GETINFO+167
>> ABSP("Send Pr escriber NPI" , GETINFO+112*, GETINFO+115*, GETINFO+119*
>> ABSP("Site" GETINFO+24*, GETINFO+25*, GETINFO+31*, GETINFO+32*, GETINFO+35*, GETINFO+36*, GETINFO+38*, GETINFO+46*, GETINFO+48*, GETINFO+147*
, GETINFO+150*, GETINFO+152*, GETINFO+154*, GETINFO+159, GETINFO+160*, GETINFO+161, GETINFO+162*, GETINFO+167, GETINFO+169*
>> ABSP("VisitIEN" GETINFO+7*
ABSPMNUM INSMBRNM+2~, INSMBRNM+3*, INSMBRNM+4*, INSMBRNM+5
D SWTYPE~, SWTYPE+2, SWTYPE+6
DIALOUT GETINFO~, GETINFO+24, GETINFO+25
GRPIEN INSGRP+1~, INSGRP+2*, INSGRP+5*, INSGRP+6, INSGRP+7*, INSGRP+8, INSGRP+10*, INSGRP+11
I GETINFO+2~, GETINFO+76*, GETINFO+77
I2 GETINFO+2~
INSARRAY GETINFO+179~
INSARRAY( GETINFO+181, GETINFO+182, GETINFO+183, GETINFO+184
INSIEN GETINFO~, GETINFO+101*, GETINFO+104, GETINFO+148, GETINFO+149, GETINFO+178, GETINFO+180, GETINFO+181, GETINFO+182, GETINFO+183
, GETINFO+184, GETINFO+189
MDFLG GETINFO+10~, GETINFO+11*, GETINFO+13*, GETINFO+14, PERSON+9, INSGRP+5
MDIEN GETINFO+10~, GETINFO+11*, GETINFO+14*, PERSON+9, INSGRP+5
N INSDNAME~, INSDNAME+12, INSDNAME+13
NRECIEN GETINFO+2~, GETINFO+189*, GETINFO+190, GETINFO+191, GETINFO+192
PATIEN GETINFO~, GETINFO+54, GETINFO+55, GETINFO+69, GETINFO+76
PHARMACY GETINFO+26~, GETINFO+29*, GETINFO+30, GETINFO+34, GETINFO+37, GETINFO+148, GETINFO+149, GETINFO+150, GETINFO+152, GETINFO+154
PINS GETINFO~, GETINFO+5, GETINFO+6, GETINFO+14, GETINFO+21
PINSDA GETINFO+5~*, INSIEN+2, INSIEN+3, INSIEN+4, INSIEN+5, AUTTRLSH+1, PERSON+8, PERSON+9, INSGRP+5, INSGRP+7
, INSGRP+10, INS3PPH, INSPOL, INSPOL+9, INSMBRNM+4
PINSDA1 GETINFO+5~, GETINFO+6*, INSIEN+3, AUTTRLSH+1, PERSON+8, INS3PPH, INSPOL+9, INSMBRNM+4
PINSTYPE GETINFO+5~*, GETINFO+6, GETINFO+12, GETINFO+19, GETINFO+57, GETINFO+59, GETINFO+61, GETINFO+88, GETINFO+92, GETINFO+158
, INSIEN+2, INSIEN+3, INSIEN+4, INSIEN+5, INSIEN+6, INSIEN+7, AUTTRLSH+1, PERSON+8, PERSON+9, INSGRP+5
, INSGRP+7, INSGRP+10, INSGRP+12, INSDNAME+2, INSDNAME+3, INSDNAME+4, INSDNAME+5, INSDNAME+6, INSDNAME+10, INSPOL
, INSPOL+2, INSPOL+4, INSPOL+5, INSPOL+6, INSMBRNM+4
RRDFLG GETINFO+17~, GETINFO+18*, GETINFO+20*, GETINFO+21, INSGRP+7
RRDIEN GETINFO+17~, GETINFO+18*, GETINFO+21*, INSGRP+7
>> RXILIST("" GETINFO+28
T INSDNAME+7~*, INSDNAME+8, INSDNAME+9
U GETINFO+29, GETINFO+31, GETINFO+32, GETINFO+33, GETINFO+35, GETINFO+36, GETINFO+38, GETINFO+40, GETINFO+43, GETINFO+48
, GETINFO+51, GETINFO+64, GETINFO+66, GETINFO+67, GETINFO+68, GETINFO+69, GETINFO+104, GETINFO+142, GETINFO+143, GETINFO+150
, GETINFO+152, GETINFO+154, GETINFO+189, GETINFO+193, GETINFO+194, GETINFO+195, GETINFO+196, GETINFO+197, GETINFO+198, INSIEN+2
, INSIEN+3, INSIEN+4, INSIEN+5, INSREL+3, INSREL+5, AUTTRLSH+1, PERSON+8, PERSON+9, INSGRP+5, INSGRP+6
, INSGRP+7, INSGRP+8, INSGRP+10, INSGRP+11, INSGRP+14, INSGRP+15, INSGRP+16, INSDNAME+9, INS3PPH, INSPOL
, INSPOL+8, INSPOL+9, SWTYPE+3, SWTYPE+4, SWTYPE+5
VSTIEN GETINFO~, GETINFO+7
X GETINFO+149~*, GETINFO+150, GETINFO+152, GETINFO+154, INSREL+1~*, INSREL+3*, INSREL+4*, INSREL+5*, INSREL+6, AUTTRLSH+2~*
, AUTTRLSH+3, PERSON+4~, PERSON+7*, PERSON+8*, PERSON+9*, PERSON+12*, PERSON+13, INSGRP+13~*, INSGRP+14, INSDNAME+1~
, INSDNAME+2*, INSDNAME+3*, INSDNAME+4*, INSDNAME+5*, INSDNAME+8*, INSDNAME+9*, INSDNAME+11*, INSDNAME+12, INSDNAME+13, INSDNAME+14
, INSPOL+7~*, INSPOL+8, SWTYPE+2~*, SWTYPE+3, SWTYPE+4, SWTYPE+5
XDATA GETINFO+2~, GETINFO+30*, GETINFO+31, GETINFO+32, GETINFO+33, GETINFO+34*, GETINFO+35, GETINFO+36, GETINFO+37*, GETINFO+38
, GETINFO+54*, GETINFO+64, GETINFO+66, GETINFO+67, GETINFO+68, GETINFO+192*, GETINFO+193, GETINFO+194, GETINFO+195, GETINFO+196
, GETINFO+197*, GETINFO+198
Y INSGRP+14~*, INSGRP+15, INSGRP+16, INSPOL+8~*
Z INSGRP+15~*, INSGRP+16*, INSGRP+17

Marked Items

Name Field # of Occurrence
$T( INSIEN+7, AUTTRLSH+2, INSDNAME+10, INSPOL+6, SWTYPE+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All