Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations SkipVought on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

AS0001 Resource ID Description 2

Status
Not open for further replies.

Boris10

IS-IT--Management
Jan 26, 2012
97
0
0
KE
Dear all,

I am currently looking for a list of RESOURCEID DESCRIPTIONS so that I can print out a user friendly list of Authorisation Groups.
After Searching the web, I found an answer from Jay Converse saying that such information is contained within the AS0001 view.

I have tried to extract the RESOURCEID DESCRIPTIONS from this view, however, no luck so far. In other words I can extract all the information from this view using a macro except for RESOURCEID DESCRIPTION.

Below code only provides me with ResourceID and other data. How can I get the RESOURCEID DEscription? I am looking in the wrong place?

Code:
Dim mDBLinkCmpRW As AccpacCOMAPI.AccpacDBLink
Set mDBLinkCmpRW = OpenDBLink(DBLINK_COMPANY, DBLINK_FLG_READWRITE)

Dim mDBLinkSysRW As AccpacCOMAPI.AccpacDBLink
Set mDBLinkSysRW = OpenDBLink(DBLINK_SYSTEM, DBLINK_FLG_READWRITE)

Dim temp As Boolean
Dim ASSEC2 As AccpacCOMAPI.AccpacView
Dim ASSEC2Fields As AccpacCOMAPI.AccpacViewFields
mDBLinkSysRW.OpenView "AS0001", ASSEC2
Set ASSEC2Fields = ASSEC2.Fields
    
    Dim i As Integer
    i = 0
    Do While ASSEC2.GoNext

        grid.TextMatrix(i, 1) = ASSEC2.Fields("RESOURCEID").Value
        grid.TextMatrix(i, 2) = ASSEC2Fields.FieldByID(1)
        grid.TextMatrix(i, 3) = ASSEC2Fields.FieldByID(2)
        grid.TextMatrix(i, 4) = ASSEC2Fields.FieldByID(3)
        grid.TextMatrix(i, 5) = ASSEC2Fields.FieldByID(4)
        grid.TextMatrix(i, 6) = ASSEC2Fields.FieldByID(5)
        grid.TextMatrix(i, 7) = ASSEC2Fields.Item(1).Description
        grid.TextMatrix(i, 8) = ASSEC2Fields.Item(2).Description
        grid.TextMatrix(i, 9) = ASSEC2Fields.Item(3).View.Fields(3).View.Fields(3).Value
        i = i + 1
    Loop

 
Hi Tuba, thank you for your input. I have seen u post this exact reply to this same question. I have tried and this is the result that RVspy produces:
Code:
[2b00.7ff.3e68] 0 <==[14:25:58.71;t=0;ovh=0] {buffer='\41\52\53\45\54\55\50\20\20\20' -> 'ARSETUP   '}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.71].Get(view=0x0198D564, field=3, size=60)
[2b00.7ff.3e68] 0 <==[14:25:58.71;t=0;ovh=0] {buffer='\53\65\74\75\70\20\4d\61\69\6e\74\65\6e\61\6e\63\65\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20' -> 'Setup Maintenance                                           '}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.72].Fetch(view=0x0198D564)
[2b00.7ff.3e68] 0 <==[14:25:58.72;t=0;ovh=0] {}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.72].Get(view=0x0198D564, field=0, size=2)
[2b00.7ff.3e68] 0 <==[14:25:58.72;t=0;ovh=0] {buffer='\41\52'}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.72].Get(view=0x0198D564, field=1, size=3)
[2b00.7ff.3e68] 0 <==[14:25:58.72;t=0;ovh=0] {buffer='\36\30\41' -> '60A'}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.72].Get(view=0x0198D564, field=2, size=10)
[2b00.7ff.3e68] 0 <==[14:25:58.72;t=0;ovh=0] {buffer='\41\52\49\54\45\4d\20\20\20\20' -> 'ARITEM    '}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.72].Get(view=0x0198D564, field=3, size=60)
[2b00.7ff.3e68] 0 <==[14:25:58.72;t=0;ovh=0] {buffer='\49\74\65\6d\20\4d\61\69\6e\74\65\6e\61\6e\63\65\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20' -> 'Item Maintenance                                            '}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.74].Fetch(view=0x0198D564)
[2b00.7ff.3e68] 0 <==[14:25:58.74;t=0;ovh=0] {}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.74].Get(view=0x0198D564, field=0, size=2)
[2b00.7ff.3e68] 0 <==[14:25:58.74;t=0;ovh=0] {buffer='\41\52'}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.74].Get(view=0x0198D564, field=1, size=3)
[2b00.7ff.3e68] 0 <==[14:25:58.74;t=0;ovh=0] {buffer='\36\30\41' -> '60A'}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.74].Get(view=0x0198D564, field=2, size=10)
[2b00.7ff.3e68] 0 <==[14:25:58.74;t=0;ovh=0] {buffer='\41\52\53\41\4c\45\20\20\20\20' -> 'ARSALE    '}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.74].Get(view=0x0198D564, field=3, size=60)
[2b00.7ff.3e68] 0 <==[14:25:58.76;t=0;ovh=0] {buffer='\53\61\6c\65\73\70\65\72\73\6f\6e\20\4d\61\69\6e\74\65\6e\61\6e\63\65\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20' -> 'Salesperson Maintenance                                     '}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.76].Fetch(view=0x0198D564)
[2b00.7ff.3e68] 0 <==[14:25:58.76;t=0;ovh=0] {}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.76].Get(view=0x0198D564, field=0, size=2)
[2b00.7ff.3e68] 0 <==[14:25:58.76;t=0;ovh=0] {buffer='\41\52'}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.76].Get(view=0x0198D564, field=1, size=3)
[2b00.7ff.3e68] 0 <==[14:25:58.76;t=0;ovh=0] {buffer='\36\30\41' -> '60A'}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.76].Get(view=0x0198D564, field=2, size=10)
[2b00.7ff.3e68] 0 <==[14:25:58.76;t=0;ovh=0] {buffer='\41\52\43\55\53\54\20\20\20\20' -> 'ARCUST    '}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.76].Get(view=0x0198D564, field=3, size=60)
[2b00.7ff.3e68] 0 <==[14:25:58.77;t=0;ovh=0] {buffer='\43\75\73\74\6f\6d\65\72\20\4d\61\69\6e\74\65\6e\61\6e\63\65\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20\20' -> 'Customer Maintenance                                        '}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.77].Fetch(view=0x0198D564)
[2b00.7ff.3e68] 0 <==[14:25:58.77;t=0;ovh=0] {}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.77].Get(view=0x0198D564, field=0, size=2)
[2b00.7ff.3e68] 0 <==[14:25:58.77;t=0;ovh=0] {buffer='\41\52'}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.77].Get(view=0x0198D564, field=1, size=3)
[2b00.7ff.3e68] 0 <==[14:25:58.77;t=0;ovh=0] {buffer='\36\30\41' -> '60A'}
[2b00.7ff.3e68] AS0022: ASSRSC   [14:25:58.77].Get(view=0x0198D564, field=2, size=10)
[2b00.7ff.3e68] 0 <==[14:25:58.77;t=0;ovh=0] {buffer='\41\52\49\4e\56\4f\49\43\45\49' -> 'ARINVOICEI'}

So it basically gives me the ResourceID which can be extracted from the view "AS0001". So you are saying that you manually change for example:
'ARSETUP -----> Set up Maintenance

So this implies that every module ResourceID Description must be manually assigned to a ResourceID?

Would you know of any other way?

Thank you for your time!
 
Thank you tuba, much appreciated. I guess I will manually load the description for each ResourceID into a Database so when required will use that as a reference.
 
For anyone out there still looking for ResourceID description:

Code:
RECID	RESOURCEID	MODULE	DESC
757	AMACQBTH	AM	ACQUISITION BATCH MAINTENANCE
758	AMACQBTHP	AM	ACQUISITION BATCH POSTING
759	AMADJBTH	AM	ADJUSTMENT BATCH MAINTENANCE
760	AMADJBTHP	AM	ADJUSTMENT BATCH POSTING
761	AMASSET	AM	ASSET REGISTER MAINTENANCE
762	AMASTINQ	AM	ASSET INQUIRY
763	AMAUTONO	AM	CHANGE AUTO. NUMBER
764	AMBARTRACK	AM	ASSET TRACKING
765	AMCLOSEMO	AM	CLOSE MO
766	AMCLRHIST	AM	CLEARING HISTORY
767	AMCRTPJC	AM	CREATE PJC EQUIPMENT USAGE
768	AMCVTDATA	AM	DATA CONVERSION
769	AMDELASST	AM	DELETE ASSETS
770	AMDISBTH	AM	DISPOSAL BATCH MAINTENANCE
771	AMDISBTHP	AM	DISPOSAL BATCH POSTING
772	AMDP	AM	DEPRECIATION PROCESSING
773	AMDPBTHP	AM	DEPRECIATION BATCH POSTING
774	AMDPINQ	AM	DEPRECIATION BATCH INQUIRY
775	AMDPPRJ	AM	DEPRECIATION PROJECTION
776	AMEPCMINQ	AM	EQUIPMENT INQUIRY
777	AMEPCMMNT	AM	EQUIPMENT MAINTENANCE
778	AMEQPMAP	AM	PJC EQUIPMENT MAPPINGS
779	AMIMTCHK	AM	DATA INTEGRITY CHECKS
780	AMLIBBTH	AM	LEASE-IN BILLING ENTRY MAINTENANCE
781	AMLICONT	AM	LEASE-IN CONTRACT MAINTENANCE
782	AMLIRATE	AM	LEASE-IN RATE MAINTENANCE
783	AMLORATE	AM	LEASE-OUT RATE MAINTENANCE
784	AMLSBBTH	AM	LEASE-OUT BILLING ENTRY MAINTENANCE
785	AMLSBBTHP	AM	LEASE BILLING BATCH POSTING
786	AMLSBILLP	AM	CREATE LEASE BILLING BATCH
787	AMLSCONT	AM	LEASE-OUT CONTRACT MAINTENANCE
788	AMLSRATE	AM	LEASE SETUP
789	AMMERBTH	AM	MERGE BATCH MAINTENANCE
790	AMMERBTHP	AM	MERGE BATCH POSTING
791	AMMNSETUP	AM	ASSET MAINTENANCE SETUP
792	AMMNTBTH	AM	MAINTENANCE BATCH MAINTENANCE
793	AMMNTBTHP	AM	MAINTENANCE BATCH POSTING
794	AMMNTCRTPO	AM	CREATE PRUCHASE REQUISITION
795	AMMNTORDER	AM	MAINTENANCE ORDER MAINTENANCE
796	AMMTRREAD	AM	METER READING PROCESSING
797	AMRDIBTH	AM	DISPOSAL REVERSAL BATCH MAINTENANCE
798	AMRDIBTHP	AM	DISPOSAL REVERSAL BATCH POSTING
799	AMRDP	AM	DEPRECIATION REVERSAL PROCESSING
800	AMRDPBTHP	AM	DEPRECIATION REVERSAL BATCH PROCESSING
801	AMRDPINQ	AM	DEPRECIATION REVERSAL BATCH INQUIRY
802	AMREPASST	AM	REPLACE ASSET ID
803	AMREPDB	AM	REPAIR DATABASE
804	AMRESET	AM	RESET BATCH NUMBER
805	AMREVAL	AM	REVALUATION
806	AMRPT	AM	REPORTS
807	AMRPTACCT	AM	ACCOUNTING REPORTS
808	AMRPTBAR	AM	ASSET TRACKING REPORTS
809	AMRPTLEASE	AM	LEASING REPORTS
810	AMRPTMNT	AM	MAINTENANCE REPORTS
811	AMSETRPT	AM	SETUP REPORTS
812	AMSETUP	AM	SETUP MAINTENANCE
813	AMSLAINQ	AM	SLA INQUIRY
814	AMSLASETUP	AM	SLA SETUP
815	AMSPLBTH	AM	SPLIT BATCH MAINTENANCE
816	AMSPLBTHP	AM	SPLIT BATCH POSTING
817	AMSSSCHED	AM	ASSET STATUS SNAPSHOT
818	AMTOGL	AM	CREATE G/L BATCH
819	AMTRACKAR	AM	ASSET ASSIGN/RETURN
820	AMTRACKSCH	AM	ASSET ASSIGNMENT SCHEDULE
821	AMVENINQ	AM	VENDOR INQUIRY
822	AMVENSETUP	AM	VENDOR MAINTENANCE
823	AMWIPTRANS	AM	WIP TRANSFER
824	AMWIZARD	AM	IMPORT ASSETS WIZARD
825	AMWORK	AM	PRODUCTION BATCH
826	AMYEND	AM	YEAR END PROCESSING
827	APADHOCQRY	AP	ACCPAC INQUIRY
828	APADJRTP	AP	SET ADJUSTMENT BATCH READY TO POST
829	APADJUST	AP	ADJUSTMENT BATCH POSTING
830	APADJUSTE	AP	ADJUSTMENT BATCH ENTRY
831	APADJUSTI	AP	ADJUSTMENT BATCH INQUIRY
832	APATBSP	AP	AGED PAYABLES SNAPSHOT
833	APCHKPRNT	AP	CHECK PRINTING
834	APCLEAR	AP	CLEAR HISTORY/RECORDS/STATS.
835	APCOMUI	AP	COMMON INQUIRY
836	APCONTROL	AP	CONTROL PAYMENTS
837	APDPOSP	AP	DAYS PAYABLES OUTSTANDING SNAPSHOT
838	APDSHBOARD	AP	DASHBOARD
839	APEXPORT	AP	EXPORT PROCESSING
840	APHIST	AP	VENDOR ANALYSIS
841	APHISTI	AP	TRANSACTION HISTORY INQUIRY
842	APIMPORT	AP	IMPORT PROCESSING
843	APINVOICE	AP	INVOICE BATCH POSTING
844	APINVOICEE	AP	INVOICE BATCH ENTRY
845	APINVOICEI	AP	INVOICE BATCH INQUIRY
846	APINVRTP	AP	SET INVOICE BATCH READY TO POST
847	APOFTRANS	AP	TRANSACTION OPTIONAL FIELDS
848	APPAYM	AP	PAYMENT BATCH POSTING
849	APPAYME	AP	PAYMENT BATCH ENTRY
850	APPAYMI	AP	PAYMENT BATCH INQUIRY
851	APPAYMRTP	AP	SET PAYMENT BATCH READY TO POST
852	APPERIOD	AP	PERIOD END MAINTENANCE
853	APSETUP	AP	SETUP MAINTENANCE
854	APVENDOR	AP	VENDOR MAINTENANCE
855	APVENDORI	AP	VENDOR DEVELOPER INQUIRY
856	APYEAR	AP	YEAR END MAINTENANCE
857	ARADHOCQRY	AR	ACCPAC INQUIRY
858	ARADJRTP	AR	SET ADJUSTMENT BATCH READY TO POST
859	ARADJUST	AR	ADJUSTMENT POSTING
860	ARADJUSTE	AR	ADJUSTMENT ENTRY
861	ARADJUSTI	AR	ADJUSTMENT INQUIRY
862	ARATBSP	AR	AGED RECEIVABLES SNAPSHOT
863	ARCASH	AR	RECEIPT POSTING
864	ARCASHE	AR	RECEIPT ENTRY
865	ARCASHI	AR	RECEIPT INQUIRY
866	ARCASHRTP	AR	SET RECEIPT BATCH READY TO POST
867	ARCHKPRNT	AR	CHECK PRINTING
868	ARCLEAR	AR	CLEAR HISTORY/RECORDS/STATS.
869	ARCOMUI	AR	COMMON INQUIRY
870	ARCREDIT	AR	EDIT CREDIT LIMIT
871	ARCUST	AR	CUSTOMER MAINTENANCE
872	ARCUSTI	AR	CUSTOMER DEVELOPER INQUIRY
873	ARDROSP	AR	DAYS RECEIVABLES OUTSTANDING SNAPSHOT
874	ARDSHBOARD	AR	DASHBOARD
875	AREXPORT	AR	EXPORT PROCESSING
876	ARHIST	AR	CUSTOMER ANALYSIS
877	ARHISTI	AR	TRANSACTION HISTORY INQUIRY
878	ARIMPORT	AR	IMPORT PROCESSING
879	ARINVOICE	AR	INVOICE POSTING
880	ARINVOICEE	AR	INVOICE ENTRY
881	ARINVOICEI	AR	INVOICE INQUIRY
882	ARINVRTP	AR	SET INVOICE BATCH READY TO POST
883	ARITEM	AR	ITEM MAINTENANCE
884	AROFTRANS	AR	TRANSACTION OPTIONAL FIELDS
885	ARPERIOD	AR	PERIOD END MAINTENANCE
886	ARREFRTP	AR	SET REFUND BATCH READY TO POST
887	ARREFUND	AR	REFUND POSTING
888	ARREFUNDE	AR	REFUND ENTRY
889	ARREFUNDI	AR	REFUND INQUIRY
890	ARSALE	AR	SALESPERSON MAINTENANCE
891	ARSETUP	AR	SETUP MAINTENANCE
892	ARYEAR	AR	YEAR END MAINTENANCE
893	ASCUR	AS	MAINTAIN CURRENCY INFORMATION
894	ASCUREXP	AS	EXPORT CURRENCY INFORMATION
895	ASCURIMP	AS	IMPORT CURRENCY INFORMATION
896	ASCURUI	AS	CURRENCY SCREENS
897	ASCUSTDIR	AS	CUSTOMISATION DIRECTORIES
898	ASDATAINT	AS	CHECK DATA INTEGRITY
899	ASDBDUMP	AS	DATABASE DUMP
900	ASDBLOAD	AS	DATABASE LOAD
901	ASDESKTOP	AS	CUSTOMIZE COMPANY DESKTOP
902	ASEXPORT	AS	EXPORT FROM FINDER
903	ASFNDALL	AS	ACCESS ALL FINDER SCREENS
904	ASGROUPS	AS	SECURITY GROUPS AND USER AUTHORISATIONS
905	ASMACRO	AS	MAINTAIN MACROS
906	ASPRTDEST	AS	CHANGE PRINT DESTINATION
907	ASUSERS	AS	MAINTAIN USERS
908	BKCLRHIST	BK	CLEAR HISTORY
909	BKDEPREG	BK	PRINT DEPOSIT REGISTER
910	BKENTRY	BK	BANK ENTRY
911	BKEXPORT	BK	EXPORT BANK SERVICES DATA
912	BKHISTINQ	BK	TRANSACTION HISTORY INQUIRY
913	BKIMPORT	BK	IMPORT BANK SERVICES DATA
914	BKINQ	BK	DISPLAY BANK INFORMATION
915	BKMAINT	BK	MAINTAIN BANK INFORMATION
916	BKPERIOD	BK	CREATE GL BATCH
917	BKPOST	BK	POST BANK RECONCILIATIONS
918	BKPOSTENT	BK	POST BANK ENTRIES
919	BKPYMREG	BK	PRINT CHECK/PAYMENT REGISTER
920	BKREC	BK	RECONCILE BANK STATEMENTS
921	BKRET	BK	REVERSE CUSTOMER RECEIPTS
922	BKREV	BK	REVERSE PAYMENTS
923	BKREVENT	BK	REVERSE BANK ENTRIES
924	BKSETUPMNT	BK	SETUP MAINTENANCE
925	BKTRANSFER	BK	TRANSFER FUNDS
926	CB1100	CB	BATCH LIST
927	CB1200	CB	BATCH ENTRY
928	CB1500	CB	POST BATCHES
929	CB2300	CB	PRINT CHEQUES/RECEIPTS/DEPOSIT FORMS
930	CB2400	CB	PRINT CHEQUES ONLINE
931	CB3100	CB	CLEAR RECONCILED ENTRIES
932	CB3300	CB	CREATE G/L BATCH
933	CB4912	CB	OPTIONAL FIELDS
934	CB5400	CB	PRINT G/L TRANSACTIONS
935	CB6100	CB	RECONCILE BANK FORM
936	CB6200	CB	RECXPRESS
937	CB6300	CB	BANK SUMMARY
938	CB6400	CB	RECXPRESS PRINT
939	CB6500	CB	TRANSACTION INQUIRY
940	CB7100	CB	PRINT CASHBOOK
941	CB7200	CB	PRINT HISTORY
942	CB7300	CB	PRINT SOURCE JOURNALS
943	CB7400	CB	PRINT CASHFLOW
944	CB8920	CB	LICENSE ACTIVATION
945	CBBANKSEC	CB	BANK SECURITY SETUP
946	CBBKRXAJ	CB	BANK RECONCILIATION - CREATE ADJUSTMENTS
947	CBBKRXDT	CB	BANK RECONCILIATION - EDIT DATE RANGE
948	CBBTCHES	CB	EDIT OTHER USERS BATCHES
949	CBCHKRUN	CB	CANCEL THE CHEQUE RUN
950	CBDASHBD	CB	DASHBOARD
951	CBEDITNO	CB	EDIT NEXT CHEQUE/RECEIPT NUMBER
952	CBEXPORT	CB	EXPORT PROCESSING
953	CBIMPORT	CB	IMPORT PROCESSING
954	CBPRBT	CB	PRINT BATCHES
955	CBPRPJ	CB	PRINT POSTING JOURNALS
956	CBPSTBL	CB	POST FROM BATCH LIST
957	CBRECON	CB	RECONCILE ENTRIES
958	CBREV	CB	REVERSE CHEQUES AND DEPOSITS
959	CBRXSETUP	CB	RECXPRESS SETUP
960	CBSETM	CB	SETUP MAINTENANCE
961	CBTOPOST	CB	SET BATCH READY TO POST
962	CSCAL	CS	MAINTAIN FISCAL CALENDAR
963	CSCOMP	CS	MAINTAIN COMPANY INFORMATION
964	CSCOMUI	CS	COMMON INQUIRY
965	CSEXPORT	CS	EXPORT COMMON SERVICES DATA
966	CSIMPORT	CS	IMPORT COMMON SERVICES DATA
967	CSOPT	CS	MAINTAIN OPTIONAL FIELDS
968	CSSCHEDULE	CS	MAINTAIN SCHEDULES
969	GLACCT	GL	ACCOUNT MAINTENANCE
970	GLADHOCQRY	GL	ACCPAC INQUIRY
971	GLADMIN	GL	SETUP MAINTENANCE
972	GLBALSHTSP	GL	BALANCE SHEET SNAPSHOT
973	GLCOMUI	GL	COMMON INQUIRY
974	GLDSHBOARD	GL	DASHBOARD
975	GLEXPORT	GL	EXPORT GENERAL LEDGER DATA
976	GLFINRPTS	GL	FINANCIAL REPORTER
977	GLFISC	GL	HISTORY/BUDGET MAINTENANCE
978	GLFISCI	GL	HISTORY/BUDGET INQUIRY
979	GLGSADMIN	GL	G/L SECURITY MAINTENANCE
980	GLHIST	GL	TRANSACTION MAINTENANCE
981	GLHISTI	GL	TRANSACTION INQUIRY
982	GLIMPORT	GL	IMPORT GENERAL LEDGER DATA
983	GLINCSTMSP	GL	INCOME STATEMENT SNAPSHOT
984	GLJOURNAL	GL	JOURNAL POSTING
985	GLJOURNALE	GL	JOURNAL ENTRY
986	GLJOURNALI	GL	JOURNAL ENTRY INQUIRY
987	GLOFTRANS	GL	TRANSACTION OPTIONAL FIELDS
988	GLPERIOD	GL	PERIOD END MAINTENANCE
989	GLRTP	GL	SET BATCH READY TO POST
990	GLYEAR	GL	CREATE NEW YEAR
991	ICADJUST	IC	ADJUSTMENT POSTING
992	ICADMIN	IC	SETUP MAINTENANCE
993	ICASSEMBLY	IC	ASSEMBLY POSTING
994	ICCLRHIST	IC	CLEAR HISTORY/INACTIVE RECORDS
995	ICCOST	IC	COST INQUIRY
996	ICDAYEND	IC	DAY END PROCESSING
997	ICDSHBOARD	IC	DASHBOARD
998	ICEXPORT	IC	EXPORT I/C DATA
999	ICICONSUMP	IC	INTERNAL USAGE POSTING
1000	ICIMPORT	IC	IMPORT I/C DATA
1001	ICINQRY	IC	COMMON INQUIRY
1002	ICITEM	IC	ITEM MAINTENANCE
1003	ICITEMI	IC	ITEM DEVELOPER INQUIRY
1004	ICLRECALL	IC	LOT RECALLS
1005	ICLSPLCOM	IC	LOT SPLITS/COMBINES
1006	ICOFTRANS	IC	TRANSACTION OPTIONAL FIELDS
1007	ICPHYSINV	IC	PHYSICAL INVENTORY MAINT.
1008	ICPRIC	IC	PRICE LIST MAINTENANCE
1009	ICQUARREL	IC	QUARANTINE RELEASE
1010	ICRECEIPT	IC	RECEIPT POSTING
1011	ICREGISTR	IC	SERIAL REGISTRATION
1012	ICSALESI	IC	PRICE/SALES ANALYSIS INQUIRY
1013	ICSHIPMENT	IC	SHIPMENT POSTING
1014	ICSLRECON	IC	SERIAL/LOT RECONCILIATION
1015	ICSTOCKI	IC	STOCK CONTROL INQUIRY
1016	ICTRANSFER	IC	TRANSFER POSTING
1017	ICTRANSI	IC	TRANSACTION INQUIRY
1018	ICWUPDATE	IC	WARRANTY UPDATE
1019	OEADMIN	OE	SETUP MAINTENANCE
1020	OECLRHST	OE	HISTORY CLEARING
1021	OECNCOST	OE	CREDIT/DEBIT NOTE COSTING
1022	OECONPRT	OE	ORDER CONFIRMATION PRINTING
1023	OECOSTIN	OE	ITEM COST INQUIRY
1024	OECRDNOT	OE	CREDIT/DEBIT NOTE ENTRY
1025	OECREDIT	OE	CREDIT APPROVAL
1026	OECRNPRT	OE	CREDIT/DEBIT NOTE PRINTING
1027	OEDEFPRC	OE	UNIT PRICE OVERRIDE
1028	OEDSHBOARD	OE	DASHBOARD
1029	OEEXPORT	OE	EXPORT PROCESSING
1030	OEIMPORT	OE	IMPORT PROCESSING
1031	OEINQRY	OE	COMMON INQUIRY
1032	OEINV	OE	INVOICE ENTRY
1033	OEINVPRT	OE	INVOICE PRINTING
1034	OELABPRT	OE	SHIPPING LABEL PRINTING
1035	OEOFTRANS	OE	TRANSACTION OPTIONAL FIELDS
1036	OEONHOLD	OE	CUSTOMER HOLD REMOVAL
1037	OEORD	OE	ORDER ENTRY
1038	OEORDER	OE	ORDER/SHIPMENT/INVOICE ENTRY
1039	OEPCKPRT	OE	PICKING SLIP PRINTING
1040	OEPRCAPP	OE	PRICE CHECK APPROVAL
1041	OEQUOPRT	OE	QUOTE PRINTING
1042	OESHI	OE	SHIPMENT ENTRY
1043	OETRANSI	OE	TRANSACTION INQUIRY
1044	PMADDCAT	PM	
1045	PMADJA	PM	
1046	PMADJE	PM	
1047	PMADJI	PM	
1048	PMADJP	PM	
1049	PMAIARPT	PM	
1050	PMARPT	PM	
1051	PMBUDACT	PM	
1052	PMBUDENT	PM	
1053	PMBUDREC	PM	
1054	PMBWC	PM	
1055	PMBWI	PM	
1056	PMBWM	PM	
1057	PMBWP	PM	
1058	PMCEA	PM	
1059	PMCEE	PM	
1060	PMCEI	PM	
1061	PMCEP	PM	
1062	PMCHARGA	PM	
1063	PMCHARGE	PM	
1064	PMCHARGI	PM	
1065	PMCHARGP	PM	
1066	PMCHIST	PM	
1067	PMCHNGA	PM	
1068	PMCHNGE	PM	
1069	PMCHNGI	PM	
1070	PMCHNGP	PM	
1071	PMCOMUI	PM	
1072	PMCONTA	PM	
1073	PMCONTC	PM	
1074	PMCONTH	PM	
1075	PMCONTI	PM	
1076	PMCONTO	PM	
1077	PMCONTSE	PM	
1078	PMCONTSI	PM	
1079	PMEQMTA	PM	
1080	PMEQMTE	PM	
1081	PMEQMTI	PM	
1082	PMEQMTP	PM	
1083	PMEXPORT	PM	
1084	PMGL	PM	
1085	PMIMPORT	PM	
1086	PMMATA	PM	
1087	PMMATE	PM	
1088	PMMATI	PM	
1089	PMMATP	PM	
1090	PMMATRA	PM	
1091	PMMATRE	PM	
1092	PMMATRI	PM	
1093	PMMATRP	PM	
1094	PMMTAA	PM	
1095	PMMTAE	PM	
1096	PMMTAI	PM	
1097	PMMTAP	PM	
1098	PMOBA	PM	
1099	PMOBE	PM	
1100	PMOBI	PM	
1101	PMOBP	PM	
1102	PMOPTFLD	PM	
1103	PMPAY	PM	
1104	PMROC	PM	
1105	PMROI	PM	
1106	PMROM	PM	
1107	PMROP	PM	
1108	PMRRC	PM	
1109	PMRRI	PM	
1110	PMRRM	PM	
1111	PMRRP	PM	
1112	PMSETUP	PM	
1113	PMSTAFFI	PM	
1114	PMSTAFFM	PM	
1115	PMTIMEA	PM	
1116	PMTIMEALL	PM	
1117	PMTIMEE	PM	
1118	PMTIMEI	PM	
1119	PMTIMEP	PM	
1120	PMTRPT	PM	
1121	PMURA	PM	
1122	PMURE	PM	
1123	PMURI	PM	
1124	PMURP	PM	
1125	POACRNC	PO	EDIT CREDIT NOTE COST
1126	POACRNQ	PO	EDIT CREDIT NOTE QUANTITY
1127	POADMIN	PO	SETUP MAINTENANCE
1128	POAINVC	PO	EDIT INVOICE COST
1129	POAINVQ	PO	EDIT INVOICE QUANTITY
1130	POAPORA	PO	EDIT BLANKET PO AMOUNT
1131	POCLRHST	PO	HISTORY CLEARING
1132	POCOST	PO	COST INQUIRY (W/O I/C)
1133	POCOSTON	PO	SHOW REQUISITION/RECEIPT COSTING INFORMATION
1134	POCREATE	PO	CREATE PURCHASE ORDERS
1135	POCRN	PO	CREDIT/DEBIT NOTE ENTRY
1136	PODAYEND	PO	DAY END PROCESSING (W/O I/C)
1137	PODSHBOARD	PO	DASHBOARD
1138	POEXPORT	PO	EXPORT PROCESSING
1139	POIMPORT	PO	IMPORT PROCESSING
1140	POINQRY	PO	COMMON INQUIRY
1141	POINV	PO	INVOICE ENTRY
1142	POITEM	PO	ITEM MAINTENANCE (W/O I/C)
1143	POITEMI	PO	ITEM DEVELOPER INQUIRY (W/O I/C)
1144	POLABPRT	PO	MAINTAIN LABEL PRINTING
1145	POOFTRANS	PO	TRANSACTION OPTIONAL FIELDS
1146	POPOR	PO	PRUCHASE ORDER ENTRY
1147	POPORPRT	PO	PURCHASE ORDER PRINTING
1148	PORCP	PO	RECEIPT ENTRY
1149	PORCPPRT	PO	RECEIVING SLIP PRINTING
1150	PORET	PO	RETURN ENTRY
1151	PORETPRT	PO	RETURN PRINTING
1152	PORQN	PO	REQUISITION ENTRY
1153	PORQNAPR	PO	REQUISITIONS MANUAL APPROVAL
1154	PORQNPRT	PO	REQUISITION PRINTING
1155	POTRANSI	PO	TRANSACTION INQUIRY
1156	PTAPPROVAL	PT	APPROVAL AND SUBSTITUTION RIGHTS
1157	PTCLRHST	PT	CLEAR HISTORY
1158	PTCREATEPO	PT	CREATE POS (FROM PRS)
1159	PTEXPORT	PT	EXPORT PROCESSING
1160	PTIMPORT	PT	IMPORT PROCESSING
1161	PTITEMS	PT	ITEMS AND CATALOG
1162	PTMANAGE	PT	MANAGE WORKFLOW PROCESSES
1163	PTPOENTRY	PT	PO ENTRY
1164	PTPORPRT	PT	PURCHASE ORDER PRINTING
1165	PTPRENTRY	PT	REQUISTION ENTRY
1166	PTREALLOC	PT	REALLOCATE DOCUMENTS
1167	PTRECVRPT	PT	RECEIVING REPORT
1168	PTREPORT	PT	REPORTING
1169	PTREQPRT	PT	REQUISITION PRINTING
1170	PTREVAL	PT	REVALUATION
1171	PTSETUP	PT	SET MAINTENANCE
1172	PTTEMPL	PT	REQUISITION TEMPLATES
1173	TXAUDIT	TX	PRINT TAX TRACKING REPORT
1174	TXEXPORT	TX	EXPORT TAX SERVICES DATA
1175	TXIMPORT	TX	IMPORT TAX SERVICES DATA
1176	TXTABLES	TX	MAINTAIN TAX INFORMATION
 
Use AS0022 to get the security resource descriptions.
 
Hi Ettienne,

I tried to get information from the "AS0022" view:

Code:
Dim mDBLinkCmpRW As AccpacCOMAPI.AccpacDBLink
Set mDBLinkCmpRW = OpenDBLink(DBLINK_COMPANY, DBLINK_FLG_READWRITE)

Dim mDBLinkSysRW As AccpacCOMAPI.AccpacDBLink
Set mDBLinkSysRW = OpenDBLink(DBLINK_SYSTEM, DBLINK_FLG_READWRITE)

Dim ASSEC2 As AccpacCOMAPI.AccpacView
Dim ASSEC2Fields As AccpacCOMAPI.AccpacViewFields
mDBLinkSysRW.OpenView "AS0022", ASSEC2
Set ASSEC2Fields = ASSEC2.Fields

Do While ASSEC2.GoNext
            grid.TextMatrix(i, 2) = ASSEC2Fields.FieldByName("RSCDESC").Value
                i = i + 1
loop

I am not getting any results.
 
You need to look at the view fields, you need to give it the PGMID (AP, AR, AS, etc) and PGMVER (AccpacSession.AppVersion) and then loop through the records.

So to fix your code:

Dim mDBLinkSysRW As AccpacCOMAPI.AccpacDBLink
Set mDBLinkSysRW = OpenDBLink(DBLINK_SYSTEM, DBLINK_FLG_READWRITE)

Dim ASSEC As AccpacCOMAPI.AccpacView
mDBLinkSysRW.OpenView "AS0022", ASSEC

ASSEC.Fields("PGMID").PutWithoutVerification "AP"
ASSEC.Fields("PGMVER").PutWithoutVerification AccpacSession.AppVersion

Do While ASSEC.GoNext
Debug.Print ASSEC.Fields("RSCID").Value & "|" & ASSEC.Fields("RSCDESC").Value
loop
 
So if you wanna you can set up an array:

strModules = Array("AP", "AR", "AS", "BK", "CS", "GL", "IC", "OE", "PO", "TX")

and then

For i = 0 To UBound(strModules)

ASSEC.Fields("PGMID").PutWithoutVerification strModules(i)
ASSEC.Fields("PGMVER").Value = AccpacSession.AppVersion

Do While ASSEC.Fetch
Debug.Print ASSEC.Fields("RSCID").Value & "|" & ASSEC.Fields("RSCDESC").Value
Loop

Next i
 
Amazing! It works! I had wasted 3 hours typing out the Resource Description. Thank you Ettienne!
 
I have a question though:

How do you know which Accpac views require parameters, passed to them, before you can extract information from them and which don't?
And if a view requires parameters which parameters do they require?

For example I couldn't print the AS0022 because I didn't pass the PGMID and PGMVER parameters.
However, I could print the As0001 without any parameters.

I am looking at Accpac View info and cannt tell the difference between AS0022 and AS0001.

 
Generally if a view is not associated with a table then you need to give it parameters - like an SQL query with parameters.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top