ABSPOSCC ; IHS/FCS/DRS - Set up ABSP() ; [ 05/09/2003 9:37 AM ]
Source file <ABSPOSCC.m>
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 |
Package | Total | Caller Graph |
---|---|---|
Pharmacy Point of Sale | 2 | ABSPOSC4 ABSPOSCB |
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
|
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 |
FileNo | Call Tags |
---|---|
^AUPNPAT - [#9000001] | GET1^DIQ |
^ABSPEI - [#9002313.4] | GETS^DIQ |
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 |
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 |
>> | 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 |
Name | Field # of Occurrence |
---|---|
$T( | INSIEN+7, AUTTRLSH+2, INSDNAME+10, INSPOL+6, SWTYPE+6 |