PSA48P20 ;VMP/PDW-BUILD MCKESSON XTMP( ;9/19/2004
;;3.0;DRUG ACCOUNTABILITY/INVENTORY INTERFACE;**48**;10/24/97
;;1621945~100^1621960~118^1621986~10^1622026~1^1622042~1^1622059~20^1622075~100^1622117~100^1622174~60^1622208~100^
;;1622232~500^1622307~100^1622315~120^1622422~150^1622430~50^1622448~5^1622513~10^1622521~65^1622943~5^1622968~500^
;;1623024~1^1623040~5^1623057~50^1623354~1000^1623537~120^1623545~10^1623735~480^1623842~25^1623859~120^1623891~1000^
;;1623933~100^1623982~118^1624105~100^1624139~1000^1624188~100^1624246~100^1624394~100^1624444~118^1624469~100^1624527~100^
;;1624576~118^1624584~100^1624659~100^1624741~100^1624774~1^1624782~60^1624873~90^1624899~5^1624964~100^1625003~100^
;;1625318~100^1625359~500^1625425~100^1625490~100^1625557~240^1625581~480^1625599~240^1625664~1^1625698~60^1625714~120^
;;1625748~250^1625839~60^1625862~100^1626050~100^1626134~15^1626258~85^1626340~100^1626449~1^1626639~1^1626662~60^
;;1626878~16.5^1626969~42.5^1626977~113^1626985~454^1627041~50^1627058~100^1627074~30^1627181~100^1627314~50^1627678~30^
;;1627686~60^1627744~15^1627751~23^1627769~15^1627827~250^1628007~60^1628601~500^1628668~8^1628759~60^1628866~250^
;;1629153~500^1629328~8^1629344~473^1629401~100^1629781~24^1629815~50^1629971~100^1630029~1000^1630037~100^1630102~100^
;;1630169~16^1630201~100^1630342~250^1630441~473^1630458~24^1630805~100^1631100~20^1631233~100^1631340~30^1631431~100^
;;1631449~1000^1631498~500^1631514~100^1631696~100^1631779~1000^1631886~10^1632306~20^1632348~62.5^1632462~100^1632488~100^
;;1632801~100^1632868~1000^1633023~100^1633106~50^1633171~150^1633361~100^1633387~15^1633395~500^1633445~100^1633924~8^
;;1633940~1000^1634070~100^1634088~100^1634310~30^1634443~473^1634666~30^1634849~250^1634856~480^1634898~100^1635010~50^
;;1635127~30^1635135~50^1635143~30^1635150~50^1635168~20^1635176~500^1635200~300^1635226~100^1635242~473^1635259~100^
;;1635275~500^1635291~100^1635366~300^1635523~60^1635531~50^1635549~118^1635697~150^1635788~50^1635820~5^1635945~1^
;;1635952~500^1635960~453.6^1636000~4^1636026~100^1636075~100^1636083~100^1636190~100^1636216~500^1636232~28^1636307~163^
;;1636372~6^1636422~100^1636430~500^1636455~30^1636539~100^1636562~15^1636604~15^1636620~15^1636638~15^1636653~100^
;;1636661~3^1636703~5^1636760~15^1636778~5^1636844~24^1636943~1000^1636976~50^1636984~480^1637040~3840^1637107~59.1^
;;1637131~148^1637149~473^1637156~3840^1637248~100^1637313~59^1637321~30^1637339~118^1637388~100^1637412~100^1637446~5^
;;1637461~480^1637503~100^1637545~100^1637644~100^1637701~10^1637735~20^1637776~454^1637800~15^1637834~118^1637974~236^
;;1637982~3840^1638105~1000^1638220~118^1638238~100^1638261~60^1638311~250^1638402~1000^1638527~30^1638980~946^1639251~60^
;;1639269~20^1639400~30^1639459~100^1639541~30^1639574~75^1639731~100^1639830~100^1639848~118^1639988~24^1639996~1^
;;1640010~1000^1640101~30^1640226~100^1640234~1000^1640275~100^1640366~1^1640663~236^1640689~500^1641273~30^1641380~100^
;;1641422~30^1641554~1^1641612~100^1641646~100^1641687~100^1641703~12^1641711~12^1641729~100^1642008~1000^1642032~20^
;;1642156~100^1642214~28^1642263~85^1642354~45^1642503~100^1642545~10^1642552~100^1642560~100^1642578~100^1642586~100^
;;1642594~30^1642602~500^1642693~50^1642750~1^1642834~1000^1642842~100^1642867~100^1643071~250^1643337~100^1643501~100^
;;1643659~10^1643675~50^1643691~20^1644269~100^1644350~100^1644368~75^1644525~1000^1644574~100^1644954~500^1645100~500^
;;1645720~100^1645746~300^1646041~100^1646272~100^1646397~100^1646405~100^1646413~100^1646546~100^1647437~2^1647445~100^
;;1647494~120^1647502~118^1647668~100^1647684~24^1647924~100^1648070~1^1648237~1^1648369~100^1648377~100^1648385~397^
;;1648468~100^1648476~595^1648559~100^1648583~397^1648633~0.5^1648716~24^1648880~240^1648898~10^1648930~100^1649102~5^
;;1649110~24^1649185~133^1649219~24^1649235~4000^1649359~100^1649607~90^1649623~100^1649680~100^1649755~100^1649797~60^
;;1649912~1^1650100~118^1650266~100^1650324~30^1650407~100^1650449~100^1650472~15^1650480~360^1650563~120^1650829~240^
;;1651314~3840^1651553~500^1651702~240^1651785~480^1651967~3840^1651975~0.3^1652155~100^1652254~1^1652379~1000^1652403~100^
;;1652411~118^1652866~236^1652890~120^1653161~4000^1653187~340^1653203~250^1653351~100^1654110~15^1654193~100^1654219~56^
;;1654318~30^1654326~500^1654474~30^1654524~141^1654581~1^1654649~500^1654680~1^1654706~100^1654888~1^1654920~56^
;;1654979~480^1655364~100^1655398~30^1655430~226^1655562~15^1655836~6^1655851~6^1655935~118^1656396~28.35^1656511~85.05^
;;1656529~50^1656552~110^1656586~100^1656644~240^1656651~946^1656669~3840^1656958~100^1657014~240^1657063~25^1657121~25^
;;1657295~15^1657485~1000^1657733~198.6^1657741~60^1657774~240^1658327~60^1658566~480^1658749~454^1658814~236.6^1659143~1^
;;1659655~60^1659705~500^1659754~150^1659978~250^1660034~1^1660109~85^1660133~100^1660323~100^1660703~1000^1661016~1^
;;1661040~15^1661156~28^1661313~100^1661396~100^1661511~1000^1661529~3^1661610~100^1661743~500^1661792~50^1661859~10^
;;1662006~5^1662576~30^1662840~100^1663194~454^1663228~100^1663293~100^1663301~0.4^1663335~10^1663376~6^1663400~30^
;;1663426~100^1663434~3.5^1663442~500^1663467~5^1663541~30^1663665~3^1663673~100^1663681~15^1663707~50^1663772~20^
;;1664085~100^1664119~240^1664242~60^1664309~250^1664317~28^1664705~250^1664796~500^1664895~100^1664945~127.5^1665025~100^
;;1665116~60^1665371~10^1665496~100^1665504~1000^1665652~100^1665850~30^1665884~0.85^1665967~100^1665991~60^1666163~30^
;;1666320~500^1666346~100^1666429~100^1666460~90^1666551~30^1666601~180^1666718~500^1666742~118^1666890~120^1667252~473^
;;1667468~10^1667534~473^1667583~10^1667609~473^1667716~100^1667971~100^1668052~100^1668292~60^1668342~1000^1668383~100^
;;1668516~4^1668631~397^1668672~50^1668987~5^1669159~120^1669241~30^1669258~1^1669357~100^1669407~30^1669480~453.6^
;;1669514~12^1669571~10^1669589~1000^1669662~10^1669696~40^1669746~250^1669753~1^1669795~5^1669829~10^1669852~28.35^
;;1669936~100^1669977~70^1670025~100^1670223~100^1670231~1^1670249~2^1670272~20^1670397~100^1670454~56^1670504~42^
;;END
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPSA48P20 6177 printed Oct 16, 2024@17:49:11 Page 2
PSA48P20 ;VMP/PDW-BUILD MCKESSON XTMP( ;9/19/2004
+1 ;;3.0;DRUG ACCOUNTABILITY/INVENTORY INTERFACE;**48**;10/24/97
+2 ;;1621945~100^1621960~118^1621986~10^1622026~1^1622042~1^1622059~20^1622075~100^1622117~100^1622174~60^1622208~100^
+3 ;;1622232~500^1622307~100^1622315~120^1622422~150^1622430~50^1622448~5^1622513~10^1622521~65^1622943~5^1622968~500^
+4 ;;1623024~1^1623040~5^1623057~50^1623354~1000^1623537~120^1623545~10^1623735~480^1623842~25^1623859~120^1623891~1000^
+5 ;;1623933~100^1623982~118^1624105~100^1624139~1000^1624188~100^1624246~100^1624394~100^1624444~118^1624469~100^1624527~100^
+6 ;;1624576~118^1624584~100^1624659~100^1624741~100^1624774~1^1624782~60^1624873~90^1624899~5^1624964~100^1625003~100^
+7 ;;1625318~100^1625359~500^1625425~100^1625490~100^1625557~240^1625581~480^1625599~240^1625664~1^1625698~60^1625714~120^
+8 ;;1625748~250^1625839~60^1625862~100^1626050~100^1626134~15^1626258~85^1626340~100^1626449~1^1626639~1^1626662~60^
+9 ;;1626878~16.5^1626969~42.5^1626977~113^1626985~454^1627041~50^1627058~100^1627074~30^1627181~100^1627314~50^1627678~30^
+10 ;;1627686~60^1627744~15^1627751~23^1627769~15^1627827~250^1628007~60^1628601~500^1628668~8^1628759~60^1628866~250^
+11 ;;1629153~500^1629328~8^1629344~473^1629401~100^1629781~24^1629815~50^1629971~100^1630029~1000^1630037~100^1630102~100^
+12 ;;1630169~16^1630201~100^1630342~250^1630441~473^1630458~24^1630805~100^1631100~20^1631233~100^1631340~30^1631431~100^
+13 ;;1631449~1000^1631498~500^1631514~100^1631696~100^1631779~1000^1631886~10^1632306~20^1632348~62.5^1632462~100^1632488~100^
+14 ;;1632801~100^1632868~1000^1633023~100^1633106~50^1633171~150^1633361~100^1633387~15^1633395~500^1633445~100^1633924~8^
+15 ;;1633940~1000^1634070~100^1634088~100^1634310~30^1634443~473^1634666~30^1634849~250^1634856~480^1634898~100^1635010~50^
+16 ;;1635127~30^1635135~50^1635143~30^1635150~50^1635168~20^1635176~500^1635200~300^1635226~100^1635242~473^1635259~100^
+17 ;;1635275~500^1635291~100^1635366~300^1635523~60^1635531~50^1635549~118^1635697~150^1635788~50^1635820~5^1635945~1^
+18 ;;1635952~500^1635960~453.6^1636000~4^1636026~100^1636075~100^1636083~100^1636190~100^1636216~500^1636232~28^1636307~163^
+19 ;;1636372~6^1636422~100^1636430~500^1636455~30^1636539~100^1636562~15^1636604~15^1636620~15^1636638~15^1636653~100^
+20 ;;1636661~3^1636703~5^1636760~15^1636778~5^1636844~24^1636943~1000^1636976~50^1636984~480^1637040~3840^1637107~59.1^
+21 ;;1637131~148^1637149~473^1637156~3840^1637248~100^1637313~59^1637321~30^1637339~118^1637388~100^1637412~100^1637446~5^
+22 ;;1637461~480^1637503~100^1637545~100^1637644~100^1637701~10^1637735~20^1637776~454^1637800~15^1637834~118^1637974~236^
+23 ;;1637982~3840^1638105~1000^1638220~118^1638238~100^1638261~60^1638311~250^1638402~1000^1638527~30^1638980~946^1639251~60^
+24 ;;1639269~20^1639400~30^1639459~100^1639541~30^1639574~75^1639731~100^1639830~100^1639848~118^1639988~24^1639996~1^
+25 ;;1640010~1000^1640101~30^1640226~100^1640234~1000^1640275~100^1640366~1^1640663~236^1640689~500^1641273~30^1641380~100^
+26 ;;1641422~30^1641554~1^1641612~100^1641646~100^1641687~100^1641703~12^1641711~12^1641729~100^1642008~1000^1642032~20^
+27 ;;1642156~100^1642214~28^1642263~85^1642354~45^1642503~100^1642545~10^1642552~100^1642560~100^1642578~100^1642586~100^
+28 ;;1642594~30^1642602~500^1642693~50^1642750~1^1642834~1000^1642842~100^1642867~100^1643071~250^1643337~100^1643501~100^
+29 ;;1643659~10^1643675~50^1643691~20^1644269~100^1644350~100^1644368~75^1644525~1000^1644574~100^1644954~500^1645100~500^
+30 ;;1645720~100^1645746~300^1646041~100^1646272~100^1646397~100^1646405~100^1646413~100^1646546~100^1647437~2^1647445~100^
+31 ;;1647494~120^1647502~118^1647668~100^1647684~24^1647924~100^1648070~1^1648237~1^1648369~100^1648377~100^1648385~397^
+32 ;;1648468~100^1648476~595^1648559~100^1648583~397^1648633~0.5^1648716~24^1648880~240^1648898~10^1648930~100^1649102~5^
+33 ;;1649110~24^1649185~133^1649219~24^1649235~4000^1649359~100^1649607~90^1649623~100^1649680~100^1649755~100^1649797~60^
+34 ;;1649912~1^1650100~118^1650266~100^1650324~30^1650407~100^1650449~100^1650472~15^1650480~360^1650563~120^1650829~240^
+35 ;;1651314~3840^1651553~500^1651702~240^1651785~480^1651967~3840^1651975~0.3^1652155~100^1652254~1^1652379~1000^1652403~100^
+36 ;;1652411~118^1652866~236^1652890~120^1653161~4000^1653187~340^1653203~250^1653351~100^1654110~15^1654193~100^1654219~56^
+37 ;;1654318~30^1654326~500^1654474~30^1654524~141^1654581~1^1654649~500^1654680~1^1654706~100^1654888~1^1654920~56^
+38 ;;1654979~480^1655364~100^1655398~30^1655430~226^1655562~15^1655836~6^1655851~6^1655935~118^1656396~28.35^1656511~85.05^
+39 ;;1656529~50^1656552~110^1656586~100^1656644~240^1656651~946^1656669~3840^1656958~100^1657014~240^1657063~25^1657121~25^
+40 ;;1657295~15^1657485~1000^1657733~198.6^1657741~60^1657774~240^1658327~60^1658566~480^1658749~454^1658814~236.6^1659143~1^
+41 ;;1659655~60^1659705~500^1659754~150^1659978~250^1660034~1^1660109~85^1660133~100^1660323~100^1660703~1000^1661016~1^
+42 ;;1661040~15^1661156~28^1661313~100^1661396~100^1661511~1000^1661529~3^1661610~100^1661743~500^1661792~50^1661859~10^
+43 ;;1662006~5^1662576~30^1662840~100^1663194~454^1663228~100^1663293~100^1663301~0.4^1663335~10^1663376~6^1663400~30^
+44 ;;1663426~100^1663434~3.5^1663442~500^1663467~5^1663541~30^1663665~3^1663673~100^1663681~15^1663707~50^1663772~20^
+45 ;;1664085~100^1664119~240^1664242~60^1664309~250^1664317~28^1664705~250^1664796~500^1664895~100^1664945~127.5^1665025~100^
+46 ;;1665116~60^1665371~10^1665496~100^1665504~1000^1665652~100^1665850~30^1665884~0.85^1665967~100^1665991~60^1666163~30^
+47 ;;1666320~500^1666346~100^1666429~100^1666460~90^1666551~30^1666601~180^1666718~500^1666742~118^1666890~120^1667252~473^
+48 ;;1667468~10^1667534~473^1667583~10^1667609~473^1667716~100^1667971~100^1668052~100^1668292~60^1668342~1000^1668383~100^
+49 ;;1668516~4^1668631~397^1668672~50^1668987~5^1669159~120^1669241~30^1669258~1^1669357~100^1669407~30^1669480~453.6^
+50 ;;1669514~12^1669571~10^1669589~1000^1669662~10^1669696~40^1669746~250^1669753~1^1669795~5^1669829~10^1669852~28.35^
+51 ;;1669936~100^1669977~70^1670025~100^1670223~100^1670231~1^1670249~2^1670272~20^1670397~100^1670454~56^1670504~42^
+52 ;;END
